Вниз
Скачать: CL | DM;

Динамическое подключение библиотеки   Найти похожие ветки 

 
ZavDim   (2002-06-13 13:04) [0]

У меня такая штука:
Динамически подключаю библиотеку и работаю с ней.
В 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) [1]

В общем штука была вот в чем:
Этой библиотеки нет в 2000, а она у меня так стояла, что 2000 ее видела и пыталась зацепить, а она не цеплялась и та ругалась жутко.
Когда спрятал, то она ее не находит и все хоккей.
Извиняюсь, но напрягают эти разные Окошечки.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c
1-85081
Fissher
2002-08-14 17:10
2002.08.26
Курсор в главном меню


7-85264
МИФИст
2002-06-13 21:15
2002.08.26
TreeView


1-84972
Геннадий
2002-08-14 19:03
2002.08.26
Desktop Wallpaper - Как ?


1-85000
Schummi
2002-07-30 08:45
2002.08.26
ReadBinary...


1-85042
LEKSYS
2002-08-14 10:50
2002.08.26
Компиляция pas




   Наверх