Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как освободить память от соединения с базой Oracle [D6]

ruslan_as © (2003-02-26 16:33:00)
Программа один раз час включается и проверяет наличие новых записей, а потом снова отключается. Но после отключения в моем коде она все также занимает 8 МБ. Помогите оптимизировать код.

procedure TfmSentry.Timer1Timer(Sender: TObject);
begin
Application.CreateForm(TDM, DM);
DM.osOGE.Connected:=True;//появилось 8 МБ
DM.odsEnergonositel.Open;
if DM.odsEnergonositelSUMMA.AsFloat>0
then begin
Application.ProcessMessages;
RxTrayIcon1.Active:=True;
Timer2.Enabled:=False;
Timer1.Enabled:=False;
DM.odsEnergonositel.Close;
DM.osOGE.Connected:=False;
DM.odsEnergonositel.Free;
DM.osOGE.Free;
DM.FreeOnRelease;
Refresh;
end
else begin
Timer2.Enabled:=True;
Timer1.Enabled:=False;
DM.odsEnergonositel.Close;
DM.osOGE.Connected:=False;
DM.odsEnergonositel.Free;
DM.osOGE.Free;
DM.Free;
end;
end;

Sergey13 (2003-02-27 10:11:00) [1]
2ruslan_as © (26.02.03 16:33)
А как ты видишь, что она именно столько занимает? Программа занималастолько пока работала, и пока системе не нужна эта память она (память) за программой и числится(программа то торчит в памяти постоянно насколько я понял). Как только понадобится система отберет ее. ИМХО так.

2PrettyFly © (26.02.03 19:55)
Ты про что?

PrettyFly (2003-02-26 19:55:00) [2]
Если ставишь на машину Oracle, то освободить уже ничего не получиться - убивай винду...

Наверх

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