TXForm - Exemples
| TXForm = class (TObject) | Interface de TXForm | Exemples de TXForm |
Dans un script, on a importé un XForms dans une ressource nommée "dialog.xfm".
uses XForms;
var inputs := new TStrings;
var outputs := new TStrings;
inputs.Values['in_1'] := 'test';
inputs.Values['in_2'] := '12';
var xfm := TXForm.CreateFromData(ResourceAsString('dialog.xfm'));
xfm.Execute(inputs, outputs);
InformationDlg(outputs.Text); // affichage des données de sortie
var inputs := new TStrings;
var outputs := new TStrings;
inputs.Values['in_1'] := 'test';
inputs.Values['in_2'] := '12';
var xfm := TXForm.CreateFromData(ResourceAsString('dialog.xfm'));
xfm.Execute(inputs, outputs);
InformationDlg(outputs.Text); // affichage des données de sortie