![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DLL [D7]
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 ...