Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.13;
Скачать: CL | DM;

Вниз

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

 
dima   (2005-01-27 09:42) [0]

Добрый день....
Что то я не понимаю....
Вот реализая StrAlloc
function StrAlloc(Size: Cardinal): PChar;
begin
 Inc(Size, SizeOf(Cardinal));
 GetMem(Result, Size);
 Cardinal(Pointer(Result)^) := Size;
 Inc(Result, SizeOf(Cardinal));
end;
Т.е. выделеляется памяти на 4 байта больше, куда пишется размер блока. Потом эта величина используется при освобождении памяти StrDispose. А зачем все это? Ведь и так при резервировании блока(GetMem), менеджер памяти также добавляет свой "кусок" с размером выделяемого блока. И правомерно тогда использовать для выделения памяти под PChar GetMem, ReallocMem, FreeMem...Может для Delphi критичны эти 4 байта?


 
Kerk ©   (2005-01-27 10:04) [1]

В случае с GetMem, ReallocMem, FreeMem ты сам следишь за размером выделяемой памяти.. в StrAlloc это делает делфи.. вот и вся разница


 
dima   (2005-01-27 10:11) [2]

Что значит слежу сам?
P: Pointer;
GetMem(P, 1024);
FreeMem(P); // 1024 указывать не надо, т.к. этот размер
           // по такому же приницу хранится "перед указателем"


 
REA   (2005-01-27 10:14) [3]

Там еще есть видимо ReferenceCount на строку, где указывается число ссылок на нее.


 
Kerk ©   (2005-01-27 10:15) [4]

dima   (27.01.05 10:11) [2]
// 1024 указывать не надо, т.к. этот размер


в старом добром паскале надо. :)
видимо для совместимости такая ситуация.

а PChar можно использовать в любом блоке памяти, не важно чем выделенной.


 
Poirot ©   (2005-01-27 10:30) [5]

Дружно смотрим структуру Манеджера Памяти Делфи. Очень много интересного найдёте:)
И ваш вопрос про то, что вы не указываете размер при FreeMem Тоже. Ибо его и не надо знать - он хранится в описателе выделенного блока памяти!


 
KSergey ©   (2005-01-27 10:37) [6]

Объяснение простое - см. наличие ф-ции StrBufSize



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

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

Наверх




Память: 0.47 MB
Время: 0.047 c
1-1106839554
serg128
2005-01-27 18:25
2005.02.13
Дайте совет, как написать планировщик?


11-1090947892
Андрей
2004-07-27 21:04
2005.02.13
TKOLButton + TKOLAction = EAccessViolation at 00000000


1-1106918067
Novas
2005-01-28 16:14
2005.02.13
Подскажите новичку как написать программу


4-1103797611
digger
2004-12-23 13:26
2005.02.13
Горизонтальная прокрутка мышью


14-1106577272
Knight
2005-01-24 17:34
2005.02.13
Кто сталкивался с глюком оптической мыши на Win2kServer?