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

PChar and Null-terminator   Найти похожие ветки 

← →
Hog   (2003-06-11 09:47) [0]

Подскажите пожалуйста, почему если я вызываю PChar в функции с var
параметром

GetMem(P,SizeOf(Str));
Func(P^);
RichEdit1.Lines.Add(P);

Получаю строку и на конце "I am gonna get youђ"

А если
S:String;
P:PCHar;

P:=Pchar(S);

Все нормально.

Ведь дельфи должна нулевой символ в конец добавлять, ну хорошо,
даже если она не добавила откуда на конце ђ, я ведь задал строку
размера "I am gonna get you" и больше ничего...


← →
Крот ©   (2003-06-11 10:19) [1]

Нулевой символ надо добавлять самому

P: PChar;
Size: integer;//Длина строки, кол-во символов

P := PChar(AllocMem(Size) + 1);
(P + Size)^ := #0;




← →
Hog   (2003-06-11 12:23) [2]


> P := PChar(AllocMem(Size) + 1);


Не понял этой строки, зачем приводить к типу PChar - AllocMem(Size)



← →
MBo ©   (2003-06-11 12:24) [3]

SizeOf(Str) - так не делай!


← →
Palladin ©   (2003-06-11 12:31) [4]


> Hog (11.06.03 12:23)

StrAlloc тебе поможет, PChar это хоть и указатель, но для корректной работы необходимо использовать предназначеные для этого типа функции


← →
Anatoly Podgoretsky ©   (2003-06-11 12:53) [5]

И так делать не надо (P + Size)^ := #0;а то будет str+бред+#0


← →
Крот ©   (2003-06-11 14:35) [6]


> Anatoly Podgoretsky © (11.06.03 12:53)


Я перед тем как написать ответ все это проделал. Никаких проблем, все работает.


← →
Крот ©   (2003-06-11 14:42) [7]


> Hog (11.06.03 12:23)


Так ведь AllocMem возвращает Pointer.


← →
han_malign ©   (2003-06-11 14:57) [8]

>SizeOf(Str) - так не делай!
- ну если Str: ShortString - то вполне можно
> P := PChar(AllocMem(Size ) + 1);
- P := PChar(AllocMem(Size + 1));

а воообще, у тебя ошибка в Func, в 17-ой строке



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

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



Память: 0.46 MB
Время: 0.023 c
9-83851
ArtGamer my name
2003-01-12 21:37
2003.06.26
А как в GLScene удалять объекты из сцены в Runtime???


14-84563
Navi
2003-06-07 07:20
2003.06.26
Психологический тест


11-84060
Gandalf
2002-08-11 16:08
2003.06.26
Кому чего в KOLnMCK НЕ хватает?


1-84399
Serg!!™™
2003-06-09 15:28
2003.06.26
Delphi 6-7 TreeView


14-84514
Leonid
2003-06-03 13:19
2003.06.26
Надо решить пару задач на Delphi - 10$




   Наверх