怎么使用 MessageBox 函数？

[gzl]

… …
StrError :='打开本地数据缓存失败。' + #13 + #13 + '详细描述：' + E.Message;

ShowMessage(StrError); //成功，显示出正确的错误内容。

//但是，如果将ShowMessage函数换成MessageBox函数，就不行了。
MessageBox(Application.Handle, @StrError, '错误', MB_OK + MB_ICONERROR); //显示出乱码。
… …

在这种情况下，我该如何使用MessageBox函数。即：第二个参数使用变量时。

感谢！！

[ehom]

PChar(StrError)

[ehom]

StrError本身就是指针,取指针的地址的指针当然得不到你要的数据

[wwwcan]

with Application do
begin
NormalizeTopMosts;
MessageBox('出错提示内容', '提示窗口标题', MB_OK);
RestoreTopMosts;
end;

[thomas_cat]

MessageBox(Application.Handle, PChar(StrError), '错误', MB_OK + MB_ICONERROR);
还出错换
MessageBox(0, PChar(StrError), '错误', MB_OK + MB_ICONERROR);
还出错换
MessageBox(0, PChar(StrError), '错误', MB_OK or MB_ICONERROR);
还出错换
MessageBox(0, PChar(StrError), '错误', MB_ICONERROR); // 照样有确定按钮的

[shinanlov]

StrError :='打开本地数据缓存失败。' + #13 + #13 + '详细描述：' + E.Message;

ShowMessage(StrError); //成功，显示出正确的错误内容。
strerror:=pchar(StrError); //加上句//
//但是，如果将ShowMessage函数换成MessageBox函数，就不行了。
MessageBox(Application.Handle, StrError, '错误', MB_OK + MB_ICONERROR);