Главная страница
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.027 c
4-1096918932
Viper
2004-10-04 23:42
2004.11.14
Управление с пульта


14-1098882421
SPeller
2004-10-27 17:07
2004.11.14
А у нас отопление дали


1-1098873662
Leonid
2004-10-27 14:41
2004.11.14
TMainmenu


6-1094133088
Евгений30048
2004-09-02 17:51
2004.11.14
Как закачать на сервер БИНАРНЫЙ файл по http?


9-1090281375
Gun
2004-07-20 03:56
2004.11.14
SIN