System.Exit
Delphi
procedure Exit;
Propriétés
| Type | Visibilité | Source | Unité | Parent |
|---|---|---|---|---|
| procedure | public | System.pas | System | System |
Description
Exit quitte la procédure en cours.
Dans Delphi, la procédure Exit fait immédiatement passer le contrôle d'exécution en dehors de la procédure. Si la procédure en cours correspond au programme principal, Exit termine l'exécution du programme.
Exit provoque la poursuite de la procédure appelante avec l'instruction qui suit celle qui a transmis le contrôle à la procédure.
Remarque : Exit fait passer le contrôle en dehors de la procédure en cours, pas seulement du bloc en cours. Mais Exit ne déroge pas du contrôle de flux dicté par une construction try..finally ; si Exit est appelée dans la clause try, la clause finally est encore exécutée.
A partir de Delphi 2009, Exit peut prendre un paramètre spécifiant un résultat. Le paramètre doit être du même type que le résultat de la fonction. Par exemple :
function DoSomething(aInteger: integer): string;
begin
if aInteger < 0 then
begin
Exit('Negative');
end;
Result := 'Positive';
end;