关于Pansichar和string的转换(50分)

yaya_delphi · 2004-05-30

在delphi中的函数中有些，比如Tapplication中的MessageBox()的第一个参数，字符串是
Pansichar型的，但我的字符串变量是string型的，怎样将string型转换成pansichar型的？

LeeChange · 2004-05-30

PChar(s);
强制类型转换就可以了。

yaya_delphi · 2004-05-30

LeeChange:我用pansichar（s）试了，不行吗？

LeeChange · 2004-05-30

奇怪，下面代码运行正常
procedure TForm1.Button2Click(Sender: TObject);
var
s: string;
begin
s:='Hello';
MessageBox(0, PChar(s), nil, 0)
end;

yaya_delphi · 2004-05-30

麻烦你这样再帮我试试，谢谢！我现在无法验证
procedure TForm1.Button2Click(Sender: TObject);
var
s: string;
begin
s:='Hello';
application.messagebox(pchar(s),'',mb_ok);
end

LeeChange · 2004-05-30

也正常
D7, W2K Pro

yaya_delphi · 2004-05-30

好谢谢，给分！

yaya_delphi · 2004-05-30

接受答案了.