Главная страница
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.049 c
4-1097126691
CJ Shark
2004-10-07 09:24
2004.11.14
Как писать биты напрямую в LPT в WinXP?


1-1099384580
Роман
2004-11-02 11:36
2004.11.14
Сохранение данных


3-1098106003
Елена
2004-10-18 17:26
2004.11.14
Дата в dBAse


3-1098078738
Merlot
2004-10-18 09:52
2004.11.14
ib и novell


14-1098879075
Pentium133
2004-10-27 16:11
2004.11.14
Было на одном форме...