Вопрос по PChar

← →
Alexander © (2002-10-10 07:17) [0]

Делаю так:

S, D: PChar GetMem(D, Length(S) + 1); StrCopy(D, S);

но, когда S := nil, то вылетает ошибка и приходится делать присваивание так:

if Assigned(S) than StrCopy(D, S) else StrCopy(D, "");

нельзя ли это делать как-то проще?

И ещё, если я присваиваю D новое значение, то надо делать так?:

ReallocMem(D, Length(S) + 1); if Assigned(S) than StrCopy(D, S) else StrCopy(D, "");

← →
Dimka Maslov © (2002-10-10 10:20) [1]

Работай со строками AnsiString, а при необходимости приводи их к типу PChar

var
S, D: AnsiString;
P: PChar;
begin
S:="asdfghj";
D:=S;
P:=PChar(D);
...

И забудь про GetMem и StrCopy

SetString тоже полезная функция

Вопрос по PChar Найти похожие ветки