Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Remembering Different Classes for Different Projects
Message
De
02/01/2008 06:06:31
Lutz Scheffler
Lutz Scheffler Software Ingenieurbüro
Dresden, Allemagne
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de projet
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Divers
Thread ID:
01278897
Message ID:
01278899
Vues:
13
Stanley,

I have stored the registry key (somewhere under [HKEY_CURRENT_USER\Software\Microsoft\VisualFoxPro\9.0\Options])

to a regfile. I open my projects via fpw files.
(doubleclick on fpw file calls "C:\Programme\Microsoft\VFP9\vfp9.exe" -t -c"%1")

the fpw sets appropriate foxuser and calls an auxillary prg
RESOURCE = PathOfFPW\FOXUSER_9.dbf
COMMAND  = DO PathOfFPW\Startup.prg
Startup.prg set some stuff like specific paths etc and runs the regfile. The regfile will be loaded afterwards
lcReg = pathtoregfile+'\RegFile.reg'
IF FILE(lcReg) THEN
 DECLARE INTEGER ShellExecute IN "Shell32.dll" ;
  INTEGER HWND, ;
  STRING lpVerb, ;
  STRING lpFile, ;
  STRING lpParameters, ;
  STRING lpDirectory, ;
  LONG nShowCmd

 IF ShellExecute(0,"open","REGEDIT","/S "+lcReg+CHR(0),lcProg+CHR(0),10)<=32 THEN
  RUN "REGEDIT /S " +lcReg
 ENDIF &&ShellExecute(0,"open","REGEDIT","/S " +lcReg+CHR(0),lcProg+CHR(0),10)<=32

*set registry
 CLEAR DLLS ShellExecute
*load registry to VFP
 SYS(3056,1)
ENDIF &&FILE(lcReg)
This works for all vfp version, you only need to store the right key.

Agnes
>Using VFP9sp2, how is the best way to save and load project info such as "Class Info", "Field Mapping" and "File Locations" and the other env settings found in the Options menu. Each of my projects have their own class libraries and I do not want to reconfigure them everytime I switch projects.
>
>Thanks,
>Stanley
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord

Weeks of programming can save you hours of planning.

Off

There is no place like [::1]
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform