t_id
1456
t_adddate
2005/01/20
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
565136150 | 954639 | True | False | Successfully run |
Record count: 1
{$mode objfpc} uses sysutils; resourcestring sMyNewErrorMessage = 'Illegal value: %d'; begin try raise Exception.CreateResFmt(@sMyNewErrorMessage, [-1]); except on e : exception do begin if e.message='Illegal value: -1' then halt(0) else begin writeln('error : ',e.message); halt(1); end; end; end; end.