ExecuteForm (rtl)
De Wiki1000
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: