t_id
414
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Old file: tbs0212.pp } { problem with properties OK 0.99.11 (PFV) } program proptest; {$mode objfpc} type TMyRec = record Int: Integer; Str: String; end; TMyClass = class private FMyRec: TMyRec; public property AnInt: Integer read FMyRec.Int; property AStr: String read FMyRec.Str; end; begin end.