|
Hmm...
Po-moemu w delphi wse mojno i tak...
Uses Windows;
var
LibHndl :THandle;
Proc :Function FIn() :LongInt; stdcall;
LibHndl:=LoadLibrary("SHELL32.DLL");
Proc:=GetProcAddress(LibHndl, "Control_RunDLL");
if Assigned(Proc)
then Proc()
else MessageBox("Failed to import func", "", MB_IconExclamation);
End.
|