在application.messagebox()函数中的第一个参数要用到PAnsiChar。

所有的原生字符串类型String转PAnsiChar都需要经过AnsiString过渡

strAnsi:= PAnsiChar(AnsiString(str));