Einzelnen Beitrag anzeigen

Benutzerbild von dummzeuch
dummzeuch

Registriert seit: 11. Aug 2012
Ort: Essen
1.604 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#3

AW: Formular zur Laufzeit mit Edit, Labels und Buttons + Events

  Alt 2. Sep 2022, 11:50
Du kannst Referenzen auf die erzeugten Controls in Formularfeldern speichern und dann ganz normal über diese Felder darauf zugreifen.

Delphi-Quellcode:
type
  TMyForm = class(TForm)
  private
   FEdit1: TEdit;
   FButton1: TButton;
   procedure HandleButton1Click(_Sender: TObject);
  public
    constructor Create(_Owner: TComponent); override;
  end;

constructor TMyForm.Create(_Owner: TComponent);
begin
  inherited;
  FEdit1 := TEdit.Create(Self);
  FEdit1.Parent := self;
  // Position etc. setzen
  FButton1 := TButton.Create(Self);
  FButton1.Parent := self;
  // Position etc. setzen
  FButton1.OnClick := HandleButton1Click;
end;

procedure TMyForm.HandleButton1Click(_Sender: TObject);
begin
  FEdit1.Text := 'bla';
end;
Thomas Mueller
  Mit Zitat antworten Zitat