我想知道什么是测试在dunit中的异常的最佳实践。我对Delphi中的方法指针不是很熟悉。是否有可能绑定参数到方法指针,以便它可以没有参数调用。目前我总是写一个附加的方法,这手动“绑定”。如果SUT有很多抛出方法,这将是恼人的。
// What i did before i knew abput CheckExcepion procedure MyTest.MyMethod_BadInput_Throws; var res: Boolean; begin res := false; try sut.MyMethod('this is bad'); except on e : MyExpectedException do: res := true; end; CheckTrue(res); end; // What i do now procedure MyTest.MyMethodWithBadInput; begin sut.MyMethod('this is bad'); end; procedure MyTest.MyMethod_BadInput_Throws; begin CheckException(MyMethodWithBadInput,MyExpectedException); end; // this would be nice procedure MyTest.MyMethod_BadInput_Throws; begin CheckException( BindArguments(sut.MyMethod,'this is bad'),// <-- how to do this MyExpectedException); end;