Преобразование String в Pchar
Тарасов Николай Валентинович советует:
|
function strtoPchar(s:string):Pchar; begin S := S+#0; result:=StrPCopy(@S[1], S) ; end; |
Алексей Варламов добавляет:
Преобразование String в Pchar:
| pch:=PChar(str); //Delphi 3+ |
обратно:
| str:=String(pch); |
[000884]
