MessageBox æ¯ Windows APIï¼å¯ä»¥æ¾ç¤ºå¤ç§é£æ ¼çæ¶æ¯å¯¹è¯æ¡ï¼æ¯ delphi ç ShowMessage è¦å¥½ç¨ï¼ä»¥ä¸æ¯ç¤ºä¾ä»£ç ï¼
procedure TForm1.Button1Click(Sender: TObject);è¿è¡æªå¾ï¼
如何让Lazarus或Delphi的MessageBox能显示中文
在Lazarus中有一个问题,就是当你使用MessageBox时不能显示中文信息,这对于英文不好的说实属一个大问题。实质上现如今的软件都基本上是使用UNICODE编码,支持几十种语言,所以就不是什么大问题了,但对于新手来说可能略显困难!正确显示中文的做法如下:MessageBox(0,PChar(UTF8ToAnsi('正常显示中文'))...
如何让Lazarus或Delphi的MessageBox能显示中文
MessageBox 是 Windows API,可以显示多种风格的消息对话框,比 delphi 的 ShowMessage 要好用,以下是示例代码:procedure TForm1.Button1Click(Sender: TObject);begin Application.MessageBox('被除数不能为零,请重新设置', '信息提示', MB_ABORTRETRYIGNORE + MB_ICONSTOP);end;运行截图: