Преобразование String в PChar
function strtoPchar(s:string):Pchar; begin S := S+#0; result:=StrPCopy(@S[1], S) ; end; |
или
pch:=PChar(str); |
str:=String(pch); |
Далее: Преобразование Unicode строк в DFM файлах Delphi 6 в Ansi строки »»
 
function strtoPchar(s:string):Pchar; begin S := S+#0; result:=StrPCopy(@S[1], S) ; end; |
или
pch:=PChar(str); |
str:=String(pch); |
Далее: Преобразование Unicode строк в DFM файлах Delphi 6 в Ansi строки »»