Вниз
Скачать: CL | DM;

Преобразование   Найти похожие ветки 

 
Veace$lav ©   (2004-01-10 16:48) [0]

Как преобразовать "String" and "PAnsiChar"
Дельфя выдаёт -[Error] Unit1.pas(71): Incompatible types: "String" and "PAnsiChar"


 
Burmistroff   (2004-01-10 16:53) [1]

s: string
p: pchar;

p:=pchar(s);
можно и экзотически: p:=@s[1];


 
YuRock ©   (2004-01-10 19:14) [2]

Надо делать так (если хотите, чтоб работало):


...
begin
 p := StrAlloc(Length(s) + 1);
 StrPCopy(p, s);
 
 // Потом нужно обязательно:
 StrDispose(p);
end;
...


 
VMcL ©   (2004-01-11 04:11) [3]

>>Veace$lav ©  (10.01.04 16:48)

Итоги подведем:

Если требуемый PChar - только для чтения, тогда Burmistroff  (10.01.04 16:53) [1].
Если же в него может понадобиться что-нибудь записать, то или YuRock ©  (10.01.04 19:14) [2] или вот так:

var
 S: String;
// ...
SetLength(S, MaxLengthThatCanBeUsedInFunction);
Func(..., PChar(S), ...);
SetLength(S, StrLen(S));


 
VMcL ©   (2004-01-11 04:13) [4]

Ой, sorry, глюканул.

var
S: String;
// ...
SetLength(S, MaxLengthThatCanBeUsedInFunction);
Func(..., PChar(S), ...);
SetLength(S, StrLen(PChar(S)));


 
Veace$lav ©   (2004-01-11 13:06) [5]

Всем Спасибо!!!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.019 c
7-1073319421
iusupp
2004-01-05 19:17
2004.03.28
Проблема установки ZIP Omega с SCSI контролером...


7-1072975461
Номолос
2004-01-01 19:44
2004.03.28
Как же всё-таки с любых накопителей читать "напрямую"?


1-1078922080
Demand2k
2004-03-10 15:34
2004.03.28
PopupMenu


3-1077165271
Evgen77
2004-02-19 07:34
2004.03.28
Разветвленные базы данных


14-1077721057
Ega23
2004-02-25 17:57
2004.03.28
Сколько стоит сходить в бассейн?




   Наверх