Changement de répertoire de travail (P9 & P7).

Cet ensemble de fiches montre comment changer de répertoire de travail [ WORKDIR( ) ou :WORK: ] par code (object-Pal).

Utilisation :

• Créer le répertoire C:\AAA
• Copiez-y le fichiers MULTIDIR.ZIP
• Décompresser le fichier, par l'instructions :  PKUNZIP -de MULTIDIR *.*
• Allez sous Paradox, dans ce répertoire
• Pour expérimenter, lancez la fiche MENU.FSL
• Chaque bouton (001, 002, 003) lance le fiche correspondante dans le répertoire correspondant (il devient le répertoire de travail)
• Le répertoire de travail est affiché dans les fiches.

Principe :

L'instruction SETWORKINGDIR( ), normalement, ferme toutes les fenêtres. L'astuce, souvent indiquée dans les NG, livres ou sites, est d'intercepter l' évènement "MenuChangingWork", en affectant "setErrorCode(1)"

Cependant il y a des choses à savoir, très rarement (jamais ?) indiquées :

• il ne doit pas y avoir de code après le "SetWorkingDir( )" ; ainsi le simple fait d'ajouter l'instruction "sleep(10)" dans la fiche MENU.FSL, et dans le bouton "001", rend le changement de répertoire inopérant. En conclusion, si l'on doit ouvrir une fiche, il faut le faire AVANT.
• une fiche ouverte dans un autre répertoire risque fort d'ouvrir les librairies et autres tables dans le répertoire d'appel, AVANT le changement. Le plus simple alors est de passer par une fiche intermédiaire, qui ne fait qu'attendre le changement de répertoire avant d'appeler la fiche suivante.