Window XP下，如何使MessageBox显示中文？

ralsjvj6rz

系统版本
Lazarus-0.9.30.1-32200-fpc-2.4.4-20110907-win32.exe
WinXP SP2 English

TForm1


procedure TForm1.Button1Click(Sender: TObject);
var
  wLangId: Word;
begin
  {
   MAKELANGID(p, s) LANG_NEUTRAL SUBLANG_SYS_DEFAULT
   MAKELANGID(p, s) LANG_NEUTRAL SSUBLANG_CHINESE_SIMPLIFIED
  }
  wLangId := MakeLangID(LANG_NEUTRAL, SUBLANG_CHINESE_SIMPLIFIED);
  MessageBoxExW(0, '哈咯，你好吗？', '向您问好', mb_OK, wLangId);
end;  

出来的message box，中文无法显示：
MessageBoxExW


要怎么令Message　Box显示中文呢？

delphicn

试试Application.MessageBox('内容','标题',0);

samsam598

字符串用utf8ToCp936括起来。需引用lconvEncoding单元

aaa

MessageBox(Handle, PChar(UTF8ToSys('你好阿')), PChar(UTF8ToSys('你好阿')), 1);

a1927555456

        

yhw1999

http://www.lazarus.freepascal.or ... .msg84154;topicseen

QuestionDlg('Title','Question?',
              mtCustom,  // removes the bitmap
             [mrYes,'YesOnYourLanguage',mrNo,'NoOnYourLanguage'],0);