Abort (TSterotypeClassTestSuite)

<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 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 :

<source lang='delphi'> //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; </source>

Voir aussi

• Stéréotype classe de test

{{#if:Classe de test (stereotype)|

{{#if:Classe de test (stereotype)|— Classe de test (stereotype) |}} — Développement DSM —

|

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

}}