Pchar

← →
Zuvom © (2002-11-04 02:34) [0]

Есть переменная типа PChar. Как этой переменной присвоить дополнительные 10 пустых символов.

← →
PVOzerski © (2002-11-04 02:48) [1]

как возможный путь:

var
s:AnsiString;
p:pChar="Hello";
begin
s:=string(p)+" ";
p:=@s[1];

При этом, естественно, значение p как указателя тоже изменится.

← →
MBo © (2002-11-04 06:15) [2]

см. также ReAllocMem

var
ps: PChar;

begin
ps:=AllocMem(4);
try
StrPCopy(ps, "fff");
ReallocMem(ps, 14);
FillChar((ps+3)^, 10, " ");
(ps+13)^:=#0;
finally
FreeMem(ps);
end;
end;

Pchar Найти похожие ветки