« Configure (TTaskConfigureController) » : différence entre les versions

De Wiki1000
Aucun résumé des modifications
m (a déplacé Configure (TTaskFormController) vers Configure (TTaskConfigureController) : Remplacement du texte — « TTaskFormController » par « TTaskConfigureController »)
 
(Une version intermédiaire par le même utilisateur non affichée)
Ligne 17 : Ligne 17 :
<source lang="delphi">
<source lang="delphi">
function doConfigureMyTask:string;
function doConfigureMyTask:string;
var inst:TTaskFormController; aReason:string;
var inst:TTaskConfigureController; aReason:string;
begin
begin
   inst := TTaskFormController.Create;
   inst := TTaskConfigureController.Create;
   inst.FormName := 'myprocessus.dfm';
   inst.FormName := 'myprocessus.dfm';
   inst.TaskParameters := myProcessusParameters;
   inst.TaskParameters := myProcessusParameters;
Ligne 32 : Ligne 32 :
Voir aussi
Voir aussi


{{Footer|TTaskFormController_(class)}}
{{Footer|TTaskConfigureController_(class)}}
[[Category:TTaskFormController]]
[[Category:TTaskConfigureController]]

Dernière version du 20 novembre 2019 à 15:56

function Configure(var aReason:string):boolean;

Cette méthode exécute l'interface FormName et récupère la configuration de la tâche.

Result True : Succès, False : L'utilisateur a annulé la configuration
aReason Information sur l'erreur


Exemple :

function doConfigureMyTask:string;
var inst:TTaskConfigureController; aReason:string;
begin
  inst := TTaskConfigureController.Create;
  inst.FormName := 'myprocessus.dfm';
  inst.TaskParameters := myProcessusParameters;
  if inst.Configure(aReason) then
   begin
     // TaskParameters has been populate
     myProcessusParameters := inst.TaskParameters;
   end;
end;

Voir aussi

TTaskConfigureController_(class)Développement DSM