Aborts (Propriété)

Cette collection contient les déclencheurs permettant à l'utilisateur de signaler une interruption.

Une interruption se traduit par le passage de la variable UserAbort à vrai , variable que le code métier exécuté doit tester.

Exemple :

<source lang='delphi'> {Procedure ExecuterEnAttente(vVueList:TVueIncidentAttenteList);} var i : integer; begin

 ProgressClear;
 ProgressMax(vVueList.Count);
 try
  for i := 0 to vVueList.Count - 1 do
  begin
    if UserAbort then
      raise ERule.Create(_TP('Interruption par lutilisateur'))
    else
    begin
      ...
    end;
    ProgressValue(i);
  end;
 Except
   ProgressMessage(E.Message);
 end;
 ProgressFull;

end; </source>

Voir aussi :

• UserAbort

{{#if:|

{{#if:|— [[]] |}} — Développement DSM —

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM —

}}