t_id
885
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=6 Percentage= 12.00
Skipped=44 Percentage= 88.00
{$ifdef fpc}{$mode delphi}{$endif} uses SysUtils; type TTest = record a, b: integer; end; procedure Test(const T: TTest); begin if @T = nil then exit; // do something end; begin Test(TTest(nil^)); {case 1} Test(TTest(Pointer(nil)^)); {case 2} end.