Incompatible types: 'Char' and 'AnsiChar'

var mysting:string;

用 PAnsiChar(AnsiString(mysting))代替 pchar(mysting)

你可能感兴趣的:(char,Delphi,AnsiChar)