一个很菜非常菜的问题!哪位大哥哥指点下~~~ ( 积分: 50 )

V

vip74250

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-09

• #1

程序编译不能通过,以下是代码:<br><br>var<br> &nbsp;a1:Integer;<br>begin<br> &nbsp;a1 &nbsp;:= &nbsp;StrToInt(edit2.text);<br> &nbsp;ShellExecute(Self.Handle,'Open',PChar('http://wpa.qq.com/msgrd?V=1&amp;Uin='+a1+'&amp;Site=QQ&amp;Menu=yes'),nil,nil,1);<br>end;

 

V

vip74250

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-09

• #2

程序编译不能通过,以下是代码:<br><br>var<br> &nbsp;a1:Integer;<br>begin<br> &nbsp;a1 &nbsp;:= &nbsp;StrToInt(edit2.text);<br> &nbsp;ShellExecute(Self.Handle,'Open',PChar('http://wpa.qq.com/msgrd?V=1&amp;Uin='+a1+'&amp;Site=QQ&amp;Menu=yes'),nil,nil,1);<br>end;

 

H

hygsxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-09

• #3

字符串不能换行。。

 

V

vip74250

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-09

• #4

没换行呀,发到论坛上才换行了,

 

H

hygsxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-09

• #5

'http://wpa.qq.com/msgrd?V=1&amp;Uin='+a1+'&amp;Site=QQ&amp;Menu=yes'换个别的网址试一下...

 

V

vip74250

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-09

• #6

&nbsp;a1 &nbsp;:= &nbsp;StrToInt(edit2.text);<br> &nbsp;ShellExecute(Self.Handle,'Open',PChar('http://www'+a1+'com'),nil,nil,1);<br><br><br>-------------错误:<br>[Error] Unit1.pas(33): Incompatible types: 'String' and 'Integer'

 

V

vvyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-10

• #7

晕啊，都 2005 年了，还犯这种低级错误。<br>a1 不是整型么，怎么跟字符串连上了？<br>ShellExecute(Self.Handle, 'Open', PChar('http://www' + edit2.text + 'com'), nil, nil, 1);

 

C

cst_zf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-10

• #8

你把字符串和整形数a1相加了<br>何必用a1呢,直接用Edit2.Text不就行了

 

C

cst_zf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-10

• #9

对不起,没看到vvyang的注释

 

H

hygsxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-10

• #10

无语了。

 

V

vip74250

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-02-10

• #11

接受答案了.