关于APPLICATION。MESSAGEBOX的疑问(20分)

  • 主题发起人 主题发起人 JackyHu999
  • 开始时间 开始时间
J

JackyHu999

Unregistered / Unconfirmed
GUEST, unregistred user!
我在程序中写下:<br>&nbsp;if application.messagebox('xinxi','ts',mb_okcancel)=idok then<br>&nbsp; ********<br>可是提示我如下错误:<br>&nbsp; incompatible:'integer'and'set';<br>这是为什么?<br>&nbsp; 我可是参照帮助写的呀,这有错吗!!!
 
刷完牙告诉你<br>&nbsp;if application.messagebox('xinxi','ts',mb_okcancel)=mrok then<br>********
 
呵呵,就是这样了
 
我改了还是不行
 
:D<br>procedure TForm1.Button1Click(Sender: TObject);<br>begin<br>&nbsp;if application.messagebox('xinxi','ts',mb_okcancel)=idok then<br>&nbsp; &nbsp; &nbsp;showmessage('ok')<br>&nbsp;else<br>&nbsp; &nbsp; showmessage('cancel') &nbsp; ;<br>end;<br><br><br>---- that‘s &nbsp;no problem~<br>
 
mrok &nbsp;idok 都没问题<br>我是delphi6
 
直接试试数字呢?<br><br>&nbsp;if application.messagebox('xinxi','ts',mb_okcancel) = 6 then<br>********
 
解决了谢谢大富翁们。
 

Similar threads

D
回复
0
查看
867
DelphiTeacher的专栏
D
D
回复
0
查看
836
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部