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

Вопрос по 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

---

← →
REA ©   (2002-10-10 10:37) [2]

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

---

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

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



Память: 0.45 MB
Время: 0.013 c