摘要:
MessageBox 弹出的窗口 不能一直在主窗体上面 尽量不用 messagedlg 和 application.MessageBox这两个可以 阅读全文
摘要:
消息框是个很常用的控件,属性比较多,本文列出了它的一些常用方法,及指出了它的一些应用场合。 1.最简单用法,不带图形 MessageBox(0,'不同意','提示',MB_OK); MessageBox(0,'不同意','提示',MB_OKCANCEL ); 2.警告对话框: MessageBox( 阅读全文
摘要:
1. 警告信息框 MessageBox(Handle,'警告信息框','警告信息框',MB_ICONWARNING);2.疑问信息框 MessageBox(Handle,'疑问信息框','疑问信息框',MB_ICONQUESTION);3.错误提示框 MessageBox(Handle,'错误信息框 阅读全文
摘要:
procedure TForm1.Button1Click(Sender: TObject);varS:string;beginif MessageDlg('提示框',mtInformation,[mbok,mbyes],0)=mryes then messagebeep(MB_ICONEXCLAM 阅读全文
摘要:
在delphi中经常要用到一个提示对话框,根据用户选择执行不同的命令,MessageBox就是常用的对话框,它不仅能够定义显示的信息内容、 信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信息对话框信息提示图标,而且可以定义按钮组合及对话框的标题,是一个功能齐全的信 息对框。 1、 阅读全文
摘要:
if MessageDlg('Welcome to my Delphi application. Exit now?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin Close; end; MessageDlg用法 对话框类型:mtwar 阅读全文
摘要:
通过 InputBox 可获取用户输入的字符串: procedure TForm1.Button1Click(Sender: TObject); var str: string; begin str := InputBox('输入窗口标题', '输入提示', '默认输入内容'); ShowMessa 阅读全文
摘要:
看了 InputBox、InputQuery 函数实现的源码, 有些收获与心得... 通过 InputBox 可获取用户输入的字符串: procedure TForm1.Button1Click(Sender: TObject); var str: string; begin str := Inpu 阅读全文