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

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

DLL [D7]


Страницы:   1 2

fedpavel ©   (2006-03-10 15:32:00) 

Доброго времени суток Мастера.
Подскажите пожалуйста: у меня при выгрузке DLL выскакивает ошибка память не может быть прочитана по адресу 0х0000000.
Загрузка DLL: динамическая
var
  H:HWDR;
  f_ReadDel:function:Boolean;stdcall;

...
...
...
begin
 H:=LoadLibrary('katini.dll');
 if H<>0 then begin
   f_ReadDel:=GetProcAddress(H,'f_ReadDel');
 end;
и при деактивации формы пишу следующее
While FreeLibrary(H) do;
Заранее спасибо!


fedpavel   (2006-03-10 15:46:00) [21]

В DLL-ке бонално:
function f_ReadDel:Boolean; stdcall;
begin
 sFile:=ExtractFilePath(Application.ExeName)+'\katalog.ini';
 if FileExists(sFile) then INI:=TIniFile.Create(sFile);
 f_ReadDel:=StrToBool(INI.ReadString('Delite','DeliteInformation',''));
end;


Desdechado   (2006-03-10 15:46:00) [22]

If the function succeeds, the return value is nonzero.
If the function fails, the return value is zero.


Sergey Masloff   (2006-03-10 15:43:00) [23]

Crash Coredump ©   (10.03.06 15:39) [3]
Что цикл понятно. Что ЭТОТ цикл делает автору понятно?


Crash Coredump   (2006-03-10 15:39:00) [24]

Sergey Masloff   (10.03.06 15:37) [2]


> Что это?!


Цикл ?


Sergey Masloff   (2006-03-10 15:37:00) [25]

>While FreeLibrary(H) do;
Что это?!


Сергей М.   (2006-03-10 15:36:00) [26]

Самое интересное - в потрохах этой DLL ...


Страницы:   1 2

Наверх

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