Panel zur Laufzeit erstellen

[kleiner pogo]

procedure blabla // das übliche gedöns hier obn^^
var
panel:=tpanel;
begin
panel:=tpanel.create(form1);
panel.parent:=form1;
panel.height:=20;
panel.width:=20;
panel.left:=50;
panel.top:=50;
end;

Die Prozedur ist ein Button.OnClick-Ereigniss in einer Form2, was halt in form1 ein panel erstellen soll... Richtig soweit?

[LudenJupp]

Jein.

procedure ...
var panel : TPanel;
begin
  panel := TPanel.Create(Form1); // hier kann auch "self" benutzt werden
  panel.SetBounds(10,20,30,40);
  panel.SetParent( self );
end;

[theone]

Warum Jein?
SetBounds fasst doch nur height, width, left und top zusammen.
Und soweit ich das gesehen habe gibt es die Methode "SetParent" nicht, sondern nur "Parent".
@kleiner pogo Warum probierst du es nicht einfach aus?

[LudenJupp]

Ich war der Ansicht, dass man - den Grund habe ich vergessen - SetBounds benutzen sollte.
Kann aber auch gut sein, dass ich mich irre. Delphi liegt laaange zurück.
SetParent gibt es und man kann es dort benutzen.

[gORDon_vdLg]

zur not geht es auch per CreateWindow(Ex)

[K1ngC0bra]

Teste es doch einfach? ^^
Wenn eins erstellt wird stimmt der Code, ansonsten nicht.

[kleiner pogo]

war nich zuhause also kein Delphi am start gehabt umd hab heute dann halt klausur geschriebn in info^^ hat aber gepasst^^