Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.312 Beiträge
 
Delphi XE2 Professional
 
#1

Komponente:Mit Create auf erstelltes Panel zugreifen

  Alt 23. Dez 2006, 15:05
Hallo und frohe Weihnachten,

ich steh gerade auf dem Schlauch:

Ich erzeuge eine Komponente abgeleitet von TPanel.

Im constructor werden neben 1 StaticText auch ein Panel und in diesem Panel ein Image erzeugt.

Delphi-Quellcode:
constructor TMaskFrame.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);

  //interne Variablen erzeugen
  FPicture := TPicture.Create;


  //feste Werte für MaskFrame
  BevelInner := bvNone;
  BevelOuter := bvRaised;
  BevelWidth := 1;
  BorderWidth := 1;
  BorderStyle := bsNone;
  Enabled := true;
  Visible := false;
  Caption := '';

  //StaticText erzeugen
  FStatic_Caption := TStaticText.Create(self);
  with FStatic_Caption do
    begin
      Parent := self;
{ .. }
    end;

  //Panel erzeugen
  FWork_Panel := TPanel.Create(self);
  with FWork_Panel do
    begin
      Parent := self;
{ .. }
    end;

  //Image erzeugen
  FBackground_Image := TImage.Create(FWork_Panel);
  with FBackground_Image do
    begin
      Parent := FWork_Panel;
{ .. }
end;
Soweit so gut - nur wenn ich diese Komponente erzeuge, z. B.:
Maske := TMaskFrame.Create(Form1); wird ja auf das erste Panel zugegriffen.
Ich möchte aber auf das Work_Panel mit dem o. s. Create zugreifen können.
Dies wird leider aber erst erzeugt, wenn das HauptPanel erzeugt wird.

wie könnte ich das realisieren? (ich hoffe es ist verständlich was für ein Problem ich hab)
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat