Configure (TTaskConfigureController)

De Wiki1000
(Différences entre les versions)
m (Remplacement du texte — « TTaskFormController » par « TTaskConfigureController »)
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]]

Version du 20 novembre 2019 à 16:55

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

Outils personnels