Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
DLL Management
Message
From
30/03/2004 10:15:35
Charlie Schreiner
Myers and Stauffer Consulting
Topeka, Kansas, United States
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Miscellaneous
Thread ID:
00890629
Message ID:
00890789
Views:
19
Hi John,
I have no opinion either. However, once you get to VFP 8, you can use this type of code.
PROCEDURE LoadDLLs()
LOCAL DLLPath, arrDLL[1], RetVal, oErr As Exception 
RetVal = .T.
IF ADLLS(arrDLL) = 0 OR ASCAN(arrDLL,'cxx',1,-1,2,1+6+8) = 0
   DLLPath = ADDBS(SYS(2004)) && I put DLLs in the same folder as VFP runtime files.
   TRY
      *DEBUGOUT "Declaring DLLs..."
      DECLARE Integer compress IN (m.DLLPath + "zlib.dll") As cxx String @, String @, String @, Integer sourcelen
      * etc...
   CATCH TO oErr
      ASSERT .F. MESSAGE oErr.Message 
      RetVal = .F.
   ENDTRY
ENDIF
RETURN m.RetVal
Charlie
Previous
Reply
Map
View

Click here to load this message in the networking platform