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

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

Как правильно освобождать память из-под COM/ActiveX? [D3]


BaSergey ©   (2002-12-23 18:05:00) 

Ситуация такая: работаю с ADO в Delphi3 через Import type library...
Мне надо вызвать 201 раз одну хранимую процедуру - обычная ADO-шная команда, возвращает Recordset с результатами:
Cmd:= CoCommand.Create;
Cmd.ActiveConnection:= MyConn;
Cmd.CommandText:= "my_SP";
Cmd.CommandType:= adCmsStoredProc
Cmd.Parameters.Refresh;
for i:=0 to 200 do
begin
Cmd.Parameters["CoolParam"].Value:= i;
RS:= Cmd.Execute(...);
Process(RS.Fields["CoolReturn"].Value);
RS.Close;
end;



В общем, типа того... И в процессе выполнения в Task Manager видно, что память выделяется, но не освобождается! .

Чего ему надо? Кто знает - как правильно освобождать память из-под COM/ActiveX?


Fantasist   (2002-12-24 01:57:00) [1]

Делфи сам проследить за ссылками; обнулять их не обязательно - при уничтожении интерфейсной переменной будет вызван Release. Конечно, если эта переменная живет долго, то можно ее обнулить, форсирую вызов Release. Однако:

1) Уничтожение СОМ объекта не гарантирует выгрузку библиотеки в которой он живет. Для форсирования этого дела надо либо вызвать CoUninitialize(что нежелательно - функциями СОМ нельзя будет пользоваться; Делфи вызывает эту API сам секции финализации), либо вызывать CoFreeUnusedLibraries.
2) Освобождаемая менеджером памяти процесса память возращается менеджеру памяти, а не системе. То есть со стороны системы может выглядеть так, как будто память и не освободилась. У длл, естессвенно, свой менеджер памяти.


asmith   (2002-12-23 18:29:00) [2]

Нужно освободить все интерфейсные ссылки, в данном случае
Cmd := nil;


Наверх

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