Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.03.23;
Скачать: CL | DM;

Вниз

выгрузка dll из пямяти   Найти похожие ветки 

 
Антон   (2008-02-21 21:41) [0]

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


 
Leonid Troyanovsky ©   (2008-02-21 21:48) [1]


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

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

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

--
Regards, LVT.


 
Leonid Troyanovsky ©   (2008-02-21 21:52) [2]


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

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

--
Regards, LVT.


 
Антон   (2008-02-21 21:53) [3]

загружаю 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) [4]

Удалено модератором


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


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

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

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

--
Regards, LVT.


 
Loginov Dmitry ©   (2008-02-21 22:01) [6]

> if LibHandle >= 32 then begin


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


 
Loginov Dmitry ©   (2008-02-21 22:03) [7]

> if xz then begin
> result := "error";
> exit;
> end;


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


 
Антон   (2008-02-21 22:16) [8]

ну не 32 а  <> 0,прост копирнул код не из дельфи, а с сайта с котого код брал :)

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


 
Дмитрий Патрушев ©   (2008-02-22 00:02) [9]

Ты прав



Страницы: 1 вся ветка

Текущий архив: 2008.03.23;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.006 c
9-1168164864
DJ KARIES
2007-01-07 13:14
2008.03.23
Yok - игры на Delphi, OpenGL без VCL


15-1202844973
ocean
2008-02-12 22:36
2008.03.23
Пароль на включение ноутбука


2-1203522656
Answer_i3
2008-02-20 18:50
2008.03.23
Записать в exe файл слово


15-1202569817
korstin
2008-02-09 18:10
2008.03.23
Нынче заказчики пошли )))


11-1186278717
ElectriC
2007-08-05 05:51
2008.03.23
Проблем-ка с TIcon





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский