Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.28;
Скачать: 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 вся ветка

Текущий архив: 2004.03.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
6-1074255192
Behemoth
2004-01-16 15:13
2004.03.28
TIdTCPServer - как узнать кол-во подключенных клиентов?


1-1078419634
Norfolk
2004-03-04 20:00
2004.03.28
Дерево каталогов в TMemo


14-1078421430
Rouse_
2004-03-04 20:30
2004.03.28
С Днем Рождения 1 - 2 Марта (Наверстывая упущенное :)


11-1056787923
mox
2003-06-28 12:12
2004.03.28
TaskBar


14-1078214953
_none_
2004-03-02 11:09
2004.03.28
високосный год?