Thema
:
Wie auf Komponenten und Ereignisse im eigebettenten Formular zugreifen?
Einzelnen Beitrag anzeigen
Fritzew
Registriert seit: 18. Nov 2015
Ort: Kehl
678 Beiträge
Delphi 11 Alexandria
#
10
AW: Wie auf Komponenten und Ereignisse im eigebettenten Formular zugreifen?
26. Jan 2018, 14:27
Zitat von
needatip
:
Sorry wollte schreiben:
zusammenfalten
·
markieren
Delphi-Quellcode:
procedure
TMainForm.FormCreate(Sender: TObject);
var
NewFormClass: TFormClass;
NewForm: TForm;
begin
NewFormClass := TForm1;
if
ContainerPanel.ControlCount > 0
then
ContainerPanel.Controls[0].Free;
if
Assigned(NewFormClass)
then
begin
Form1 := NewFormClass.Create(self);
NewForm.Hide;
NewForm.BorderStyle := bsNone;
NewForm.Parent := ContainerPanel;
NewForm.Align := alClient;
NewForm.Show;
end
;
end
;
Warum nicht einfach?
zusammenfalten
·
markieren
Delphi-Quellcode:
procedure
TMainForm.FormCreate(Sender: TObject);
begin
if
ContainerPanel.ControlCount > 0
then
ContainerPanel.Controls[0].Free;
Form1 := TForm1.Create(self);
Form1.Hide;
Form1.BorderStyle := bsNone;
Form1.Parent := ContainerPanel;
Form1.Align := alClient;
Form1.Show;
end
;
end
;
Fritz Westermann
Zitat
Fritzew
Öffentliches Profil ansehen
Mehr Beiträge von Fritzew finden