Ja klappt aber leider nicht
Hier mal die Typ Definitionen:
Delphi-Quellcode:
type
TObjektMit2Objekten = class
public
Objekt1 : TObjekt1;
constructor Create(ZuBenutzendesFormular : TWinControl);
destructor Destroy; override;
procedure Change(Sender: TObject1);
end;
type
TObjekt2 = class(TEdit)
public
constructor Create(AOwner: TComponent); override;
procedure Change(); override;
end;
type
TObjekt1 = class(TStringGrid)
public
Objekt2 : TObjekt2;
constructor Create(AOwner: TComponent; Anders : byte); reintroduce;
destructor destroy; override;
procedure Change(Sender : TObjekt2);
end;