怎么样吧String类型的转换为PAnsiChar类型的呢？

怎么样吧String类型的转换为PAnsiChar类型的呢？本来只是一个消息的提示Showmessage(),
但是这个只有一个参数，不能修改标题栏，标题栏只能显示exe的名字。
于是换了一个MesssageBox(),
这个倒是可以，但是里面的第二个参数是PAnsiChar类型的，于是报错。最终目的就是能够显示有一个标题栏能够自由显示的消息提示框。
更好的办法请教中。。我要传一个参数
precedure showmsg(msg:string)
begin
messagebox(wnd,msg,'message',MB_ok);
end;