Habe ich auch schon probiert, klappt aber leider nicht. Trotzdem danke für die fixe Antwort
Delphi-Quellcode:
procedure TMain.NeuesFenster(Sender:TObject);
begin
F2:=TFormular2.Create(Main);
F2.Show;
bt2:= TButton.Create(F2);
bt2.SetBounds(20,20,160,100);
bt2.Parent:= F2;
bt2.Caption:= 'Formular schließen';
bt2.OnClick:= F2Close;
bt1.enabled:=false;
bt1.Visible := True; //<< warum soll das nicht gehen?
bt2.Visible := True; //<< warum soll das nicht gehen?
end;
ohne sie sichtbar zu schalten wirst du auch nichts sehen können.
Delphi-Quellcode:
bt2:= TButton.Create(self); //Form1, oder self, oder wie bei dir F2
bt2.SetBounds(20,20,160,100);
bt2.Parent:= self;
bt2.Caption:= 'Formular schließen';
bt2.Visible := True; //<< warum soll das nicht gehen?
Ich sehe einen wunderschönen Button.
gruss