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

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

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

Динамическое ;подключение библиотеки [D6, Win95/98, WinME, Win2k]

ZavDim © (2002-06-13 13:04:00)
У меня такая штука:
Динамическиподключаю библиотеку и работаю с ней.
В 98 и МЕ все хоккей - работает.
В 2000 при подключени выдается такая штука
Точка входа в процедуру ThunkConnect32 не найдена в библиотеке DLL KERNEL32.dll
Что ей надо? Когда пускаешь прогу под Delphi этого не происходит - все работает, а в свободном плавании - происходит.
Я пробовал Try Except - ни черта, это происходит черт знает где.
Может кто чего знает?
Код такой:

HInst:=LoadLibrary("rsrc32.dll");
try
if HInst>32 then
begin
FPointer:=GetProcAddress(HInst,"_MyGetFreeSystemResources32@4");
if FPointer<>nil then
begin
MyFunc:=TMyFunc(FPointer);
try
lDescr.Caption:="System:"+intToStr(MyFunc(rSystem))+"%";
lGDi.Caption:="GDI:"+intToStr(MyFunc(rGDi))+"%";
lUser.Caption:="User:"+intToStr(MyFunc(rUSER))+"%";
ShowMessage("all""right")
except
ShowMessage("What?")
end
end else
ShowMessage("Func not found")
end else
ShowMessage("Library not found");
finally
FreeLibrary(HInst);
ShowMessage("all")
end
А?!

ZavDim (2002-06-13 13:28:00) [1]
В общем штука была вот в чем:
Этой библиотеки нет в 2000, а она у меня так стояла, что 2000 ее видела и пыталась зацепить, а она не цеплялась и та ругалась жутко.
Когда спрятал, то она ее не находит и все хоккей.
Извиняюсь, но напрягают эти разные Окошечки.

Наверх

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