ExecuteForm (rtl)

De Wiki1000
Version du 11 août 2009 à 16:33 par Syfre (discuter | contributions)
(diff) ← Version précédente | Voir la version courante (diff) | Version suivante → (diff)
Procedure ExecuteForm(const iFormName:string; const iClassName:string; const iOID:string; iParameter:variant; iInsertMode:Boolean);

Cette procédure ouvre un écran.

iFormName Nom de l'écran à exécuter.
iClassName Nom de la classe de l'objet identifié par iOID.

Si ce nom de classe est omis l'identifiant doit correspondre au dataset principal de l'écran, sinon un dataset correspondant est rechercher lors de l'ouverture de l'écran.

iOID Identifiant d'objet sur lequel ouvrir l'écran.
iParameter Paramètres à passer.

Les paramètres sont passés sous forme d'une interface IParameter, cette interface peut être obtenue sur une forme par la propriété IParameter.

iInsertMode Ouvrir l'écran en mode insertion.


Exemple

//Procedure AfficherPiece;
begin
  if assigned(PieceFactEnCours) then
   begin
    if PieceFactEnCours.estAvoir 
     then ExecuteForm('egescom_avoirfinfour.dfm','',PieceFactEnCours.oid,NULL,false)
     else ExecuteForm('egescom_saisiefactachat.dfm','',PieceFactEnCours.oid,NULL,false);
   end;
end;

Voir aussi:

Développement DSMDéveloppement DSM





Whos here now:   Members 0   Guests 1   Bots & Crawlers 0
 
Outils personnels