Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Куда девается память? [D7, Win2k]


AGGRESSOR ©   (2005-07-25 16:37:00) 

При многократном исполнении этого кода происходит заметная утечка памяти (примерно мегабайт на каждые 100 исполнений). Дырка где-то здесь, но я ее в упор не вижу. А вы?

   if not
       (CreateProcess(nil,RunStr,nil,nil,False,CREATE_DEFAULT_ERROR_MODE,nil,nil,sui,pi))
   then
   begin
       PostMessage(ah,WM_USER,NO_CODEC,0);
       exit;
   end;
   WaitForSingleObject(pi.hProcess,INFINITE);


AGGRESSOR   (2005-07-25 16:55:00) [1]

Юрий, огромное спасибо!


Юрий Зотов   (2005-07-25 16:42:00) [2]

if not CreateProcess(..., sui, pi) then
begin
 PostMessage(ah, WM_USER, NO_CODEC, 0);
 exit;
end;
CloseHandle(pi.hThread;
WaitForSingleObject(pi.hProcess, INFINITE);
CloseHandle(pi.hProcess);


Наверх

Титульная страница Поиск, карта сайта Написать письмо