Einzelnen Beitrag anzeigen

egal

Registriert seit: 14. Jul 2004
190 Beiträge
 
Delphi XE4 Professional
 
#6

Re: Auf andere Klasse zugreifen

  Alt 23. Mär 2005, 17:13
hab das Problem gelöst; War, wie immer eine Kleinigkeit.
Delphi-Quellcode:
Constructor TETUKomponente.Create(AOwner: TComponent);
begin
  inherited;
  SetBounds(0,0,190,33);
  Caption := '';
  FConSpBut := TSVButton.Create(Self);
  FConSpBut.SetSubComponent(true);
  FConSpBut.Parent := self;
  FConSpBut.Left := 5;
  FConSpBut.Flat := true;
  FConSpBut.Top := 5;
  FConSpBut.Height := 25;
  FConSpBut.Width := 20;
  FConSpBut.Name := 'SBStandWert';
  FConSpBut.Glyph.LoadFromFile('VCRFSFOR.bmp');
  FConEditFeld := TNumEdit.Create(Self);
  FConEditFeld.SetSubComponent(true);
  FConEditFeld.Parent := self;
  FConEditFeld.Left := 30;
  FConEditFeld.Name := 'NumEdit';
  FConEditFeld.Top := 6;
  FConEditFeld.Height := 21;
  FConEditFeld.Width := 80;
  FConEditFeld.Max := 1000;
  FConEditFeld.Min := 0;
  FConEditFeld.StandardValue := 2;
  NumEdit := FConEditFeld; // man musste einfach im Constructor von Oberklasse Variable //zuweisen
end;
  Mit Zitat antworten Zitat