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

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

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

выгрузка dll из пямяти

Антон © (2008-02-21 21:41:00)
если я в dll при проверке некоторых условий сделаю exit, то длл выгрузиться сама из памяти???

Дмитрий Патрушев (2008-02-22 00:02:00) [1]
Ты прав

Антон (2008-02-21 22:16:00) [2]
ну не 32 а <> 0,прост копирнул код не из дельфи, а с сайта с котого код брал :)

а с exit чет и вправду ступил...думаю над закрыть тему,пока еще больше не попозорился...=)

Loginov Dmitry (2008-02-21 22:03:00) [3]
> if xz then begin
> result := 'error';
> exit;
> end;

exit в данном контексте - это досрочный выход из процедуры.

Loginov Dmitry (2008-02-21 22:01:00) [4]
> if LibHandle >= 32then begin

Откуда такая магическая цифра? Где взял?

Leonid Troyanovsky (2008-02-21 22:00:00) [5]

> Антон (21.02.08 21:53) [3]

> делаю условие

Плохо делаешь.
Небось, пространный комментарий в заготовке длл и не осмыслял.

--
Regards, LVT.

Антон (2008-02-21 21:53:00) [6]
загружаю dll так:
@GetSimpleText := nil;
LibHandle := LoadLibrary('MYDLL.DLL');
if LibHandle >= 32 then begin
@GetSimpleText := GetProcAddress(LibHandle,'GetSimpleText');
if @GetSimpleText <> nil then
memo.lines.text := GetSimpleText(text_1);
end;
FreeLibrary(LibHandle);

в длл в функции GetSimpleText когда получаю text_1 и например делаю условие
if xz then begin result := 'error'; exit; end;

Антон (2008-02-21 21:53:00) [7]
Удалено модератором

Leonid Troyanovsky (2008-02-21 21:52:00) [8]

> Leonid Troyanovsky © (21.02.08 21:48) [1]

Мда.
Даже на FreeLibrary не обязана.

--
Regards, LVT.

Leonid Troyanovsky (2008-02-21 21:48:00) [9]

> Антон (21.02.08 21:41)

> если я в dll при проверке некоторых условий сделаю exit,
> то длл выгрузиться сама из памяти???

Смотря где сделаешь, и, в общем случае, не обязана.

--
Regards, LVT.

Наверх

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