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

Вниз

StrAlloc...StrDispose   Найти похожие ветки 

 
Новиков_Н   (2004-10-31 21:20) [0]

Мастера, подскажите! Нужно ли в данной ситуации 2 раза выделять память
переменной Buffer и два раза же ее освобождать?
Спасибо!



const
   MAX_BUFF_SIZE :Byte = High(Byte);
var
 Buffer :PChar;

begin

with ListBox1.Items do
 begin
Buffer :=StrAlloc(MAX_BUFF_SIZE);
   GetWindowsDirectory(Buffer,MAX_BUFF_SIZE);
   Add("Windows directory: "+Buffer);
StrDispose(Buffer); // ?
   Buffer :=StrAlloc(MAX_BUFF_SIZE); // ?

   GetSystemDirectory(Buffer,MAX_BUFF_SIZE);
   Add("System directory: "+Buffer);
StrDispose(Buffer);
 end;
end;

end;



 
panov ©   (2004-10-31 21:40) [1]

А зачем тебе 2 раза выделять память? Выделяй 1 раз, используй сколько угодно раз, затем один же раз освобождай.


 
Новиков_Н   (2004-10-31 21:44) [2]

Просто хотел уточнить на всякий.. Спасибо!



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

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

Наверх




Память: 0.46 MB
Время: 0.083 c
1-1099339331
Skiter
2004-11-01 23:02
2004.11.14
Работа с TImages


14-1099077782
VID
2004-10-29 23:23
2004.11.14
Разыскивается книга.


14-1098902121
reticon
2004-10-27 22:35
2004.11.14
Вопрос по асму...


14-1098879796
Шишкин Илья
2004-10-27 16:23
2004.11.14
Аналог IntToStr в Turbo Pascal


14-1098719800
Александр1
2004-10-25 19:56
2004.11.14
Сети