您的位置:首页 > 其它

输出语句showmessage,messageDlg的用法

2009-05-30 17:50 246 查看
1.showmessage,弹出自定义字符串,用法:showmessage(string),比较简单;

用法:

showmessage('hello,delphi');2.messageDlg, 是在对话框显示消息,并等待用户点击一个按钮,然后返回一个整数确定知道是那个按钮;

原型:messageDlg(const Msg:string; DlgType:TMsgDlgType;Buttons:TMsgDlgButtons;HelpCtx:longint):integer; overload;

procedure TForm1.Button1Click(Sender: TObject);
begin
Messagedlg('你确定吗',mtWarning,[mbYES,mbNO],0);
MessageDlg('错误(1001)',mtError,[mbCancel],0);
end;
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: