t_id
339
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Old file: tbs0107.pp } { shows page fault problem (run in TRUE DOS mode) OK ??.?? } { PAGE FAULT PROBLEM ... TEST UNDER DOS ONLY! Not windows... } { -Cr -g flags } Program Test1; type myObject = object constructor init; procedure v;virtual; end; constructor myobject.init; Begin end; procedure myobject.v; Begin WriteLn('Hello....'); end; var my: myobject; Begin my.init; my.v; end.