Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
DLL Management
Message
De
30/03/2004 10:15:35
Charlie Schreiner
Myers and Stauffer Consulting
Topeka, Kansas, États-Unis
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00890629
Message ID:
00890789
Vues:
18
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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform