« ProgressClearMessage (ihm) » : différence entre les versions

Dernière version du 1 août 2009 à 14:31

<source lang='delphi'>procedure ProgressClearMessage;</source>

Cette procedure efface les messages de progression dans l'interface utilisateur.

Pas de paramètre

Exemple:

Voir aussi:

{{#if:Interactions utilisateurs (code)|

{{#if:Interactions utilisateurs (code)|— Interactions utilisateurs (code) |}} — Développement DSM —

|

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

}}

@@ Ligne 9 : / Ligne 9 : @@
 Exemple:
-<source lang='delphi'>
-begin
+*[[ProgressMessage (ihm)|Voir l'exemple dans ProgressMessage.]]
-  ProgressClearMessage;
-  //
-  Cursor := MyClass.CreateCursor;
-  Cursor.Open;
-  try
-   Cursor.First;
-   while not Cursor.Eoi do
-    begin
-      if UserAbort then raise Exception.Create('Traitement interrompu');
-      ProgressMessage(Format(_TP('Traitement de l''instance %s'),[Cursor.Instance.Caption]));
-      ...
-      Cursor.Next;
-    end;
-  finally
-  Cursor.Close;
-  end;
-end;
-</source>
 Voir aussi: