PAnsiChar 和string之间的转换
怎么样吧String类型的转换为PAnsiChar类型的呢？

本来只是一个消息的提示Showmessage(),
但是这个只有一个参数，不能修改标题栏，标题栏只能显示exe的名字。
于是换了一个MesssageBox(),
这个倒是可以，但是里面的第二个参数是PAnsiChar类型的，于是报错。

最终目的就是能够显示有一个标题栏能够自由显示的消息提示框。
更好的办法请教中。。。。。

[解决办法]
“但是这个只有一个参数，不能修改标题栏，标题栏只能显示exe的名字。”

C/C++ code

//这样子就可以了Application->MessageBox("3860!","标题信息：",MB_ICONWARNING) ;
[解决办法]
Delphi(Pascal) code
procedure TForm1.showmsg(msg:string);var  c:PAnsiChar;begin c:=Pchar(msg); MessageBox(Form1.Handle ,c,'message',MB_ok);end;procedure TForm1.Button1Click(Sender: TObject);begin     showmsg('3860提示你：');end;
[解决办法]
Delphi(Pascal) code
precedure showmsg(msg: String)begin  MessageBox(0, PChar(msg), 'message', MB_OK);end;