t_id
487
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Old file: tbs0302.pp } { inherited property generates wrong assembler OK 0.99.13 (PFV) } {$ifdef fpc}{$mode objfpc}{$endif} type c1=class Ffont : longint; property Font:longint read Ffont; end; c2=class(c1) function GetFont:longint; end; function c2.GetFont:longint; begin result:=Font; result:=inherited Font; end; begin end.