Re: Saisie assistée

Posté par R&B le 10/12/2004 13:39:17
Bonjour,
Avez vous seulement tenté de télécharger une des ressources présentes sur ce site ?

Il eixte déjà un nombre important de classes/projets d'illustration susceptible de couvrir votre demande.

Sinon, voici une recette 'du cru' :
MaClasse est une classe
   ... les membres
   // des constantes publiques 
   /(visibles dans le code du projet)
   PUBLIC CONSTANT
      CST_CRE = 1
      CST_MOD = 2
      CST_SUP = 3
   FIN
FIN

// méthode avec CST CRE par défaut
// les constantes sont disponible via ::<NomConstante>
PROCEDURE ADroit(pParam=::CTS_CRE)
SELON pParam
   CAS ::CST_CRE:
      ...traitement création...
   CAS ::CST_MOD:
      ...traitement Modfication...
   CAS ::CST_SUP:
      ...traitement suppression...
FIN

// Utilisation dans le projet
oClasse est un Maclasse
oClasse:aDroit(MaClasse::CST_MOD)


A NOTER :
- Les constantes sont disponible avec les doubles points ::
- Leur portée doit être publique pour une utilisation dans le projet
- Les constantes appartiennent à la classe et non l'instance, d'où la notation :: et non ::

Une fois intégrée, cette notion permet des merveilles.

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1557&post_id=6412