Check (TSterotypeClassTestSuite)

De Wiki1000
procedure Check(iCondition:boolean; const iMessage:string);

Cette opération teste une condition et génère une exception ETestFailure si la condition n'est pas vrai.

iCondition Valeur boolean à tester
iMessage Message de l'exception si la condition n'est pas remplie.

Exemple :

procedure TMyTest.TestSomething;
begin
  CleanAll;
  CreateSomePreConditionObjects;
  ExecuteTheProcessusInTest;
 
  Check(TProcessResultClass.Count<>0, 'Le processus n''a pas créé l''objet espéré');
end;

Voir aussi

Classe de test (stereotype)Développement DSM





Whos here now:   Members 0   Guests 0   Bots & Crawlers 1
 
Outils personnels