t_id
586
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
type tproc = procedure of object; trec = record l1,l2 : longint; end; var pfn : tproc; begin pfn:=nil; if (trec(pfn).l1<>0) or (trec(pfn).l2<>0) then begin writeln('Error!'); halt(1); end; end.