« Abort (TSterotypeClassTestSuite) » : différence entre les versions
(Page créée avec « <source lang='delphi'>procedure Abort(iCondition:boolean; const iMessage:string);</source> Cette opération teste une condition et génère une exception ETestAbort si la co… ») |
Aucun résumé des modifications |
||
| Ligne 31 : | Ligne 31 : | ||
{{Footer|Classe de test (stereotype)}} | {{Footer|Classe de test (stereotype)}} | ||
[[Category:Tests unitaires]] | |||
Dernière version du 15 mars 2013 à 07:26
procedure Abort(iCondition:boolean; const iMessage:string);
Cette opération teste une condition et génère une exception ETestAbort si la condition n'est pas vrai.
Sur cette exception l'enchaînement de l'exécution des tests unitaires est interrompu.
| iCondition | Valeur boolean à tester |
| iMessage | Message de l'exception si la condition n'est pas remplie. |
Exemple :
//Procedure Test_1_drop_database;
var dbi:TDatabaseinfo;
begin
dbi := ClassManager.DatabaseByURL(ClassManager.DefDatabaseURL);
Abort(Assigned(dbi),'No database context');
Abort(ClassManager.DropDatabase(dbi),'Drop database failed');
end;
Voir aussi