HandleLIBGPIB := dlopen(GPIBLIBRARYNAME,RTLD_NOW);
if (HandleLIBGPIB = nil) then ... // NO Module !!!!
step 3 - Get the procedures one by one: (only the procedures that you
will use are necessary)
Pibcnt := TPibcnt(dlsym(HandleLIBGPIB,'ibcnt'));
if Pibcnt = nil then exit;
ibclr := Tibclr(dlsym(HandleLIBGPIB,'ibclr'));
if @ibclr = nil then exit;
ibconfig := Tibconfig(dlsym(HandleLIBGPIB,'ibconfig'));
if @ibconfig = nil then exit;
This is not as the ultimate code, but it works! The advantage of
"dynamic" loading as oposed to "compile time" loading is that you can
test the loading of the routines one by one. It is not easy to
understand the " .h" file sometimes.
On Tue, 2005-08-09 at 08:32 -0400, Paul Aviles wrote: