FailNotEquals method |
Applies to
TTestCase
Declaration
Procedure FailNotEquals(expected, actual: string; msg: string = ''; errorAddr :Pointer = nil);
Implementation
procedure TTestCase.FailNotEquals( expected, actual :string; msg :string = ''; errorAddr :Pointer = nil); begin Fail(notEqualsErrorMessage(expected, actual, msg), errorAddr); End; |
|