t_id
510
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ Old file: tbs0337.pp } { } program vartest; {$ifdef fpc}{$mode objfpc}{$endif} uses Classes; type TMyComponent = class(TComponent) aaaaaaaaaa: TComponent; b: TComponent; private public constructor Create(AOwner: TComponent); override; end; constructor TMyComponent.Create(AOwner: TComponent); begin inherited Create(AOwner); aaaaaaaaaa := TComponent.Create(Self); end; var MyComponent: TMyComponent; begin MyComponent := TMyComponent.Create(nil); end.