Syfre le 1 août 2009 à 14:34

2009-08-01T14:34:18Z

Syfre : Nouvelle page : property UserAbort:Boolean; '''Lecture seule''' Cette propriété est à True si l'utilisateur a interrompu le traitement. Exemple:
'''Lecture seule'''

Cette propriété est à True si l'utilisateur a interrompu le traitement.

Exemple:
<source lang='delphi'>
begin
Cursor := MyClass.CreateCursor;
Cursor.Open;
try
Cursor.First;
while not Cursor.Eoi do
begin
if UserAbort then raise Exception.Create('Traitement interrompu');
...
Cursor.Next;
end;
finally
Cursor.Close;
end;
end;
</source>

Voir aussi:

{{Footer|Interactions utilisateurs (code)}}
[[category:Interactions utilisateurs]]

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