Button zur Lauzeit erstellen

SpeedyGTD · Beiträge: 89

Hallo ich weiss das es irgendwo im Forum schon das Thema gibt, konnte es aber nicht finden

, ich hab gestern über ne Stunde sowohl den VCL als auch den Non-Vcl Thread manuel und mit hilfe der suchen funktion durchsucht, fand aber nix. also jetzt nochmal mein prob, ich will zur Lauzeit ein paar buttons, Timer und Formulare erzeugen. ich weiss das das alles mit dem gleichen code geht, aber irgendwie komme ich nicht weiter :lol:

also bitte helft mir :lol:

_________________
...hab ich vergessen

Ehemaliges Mitglied Erhaltene Danke: 1

markieren

Quelltext

1:
2:
3:
4:
5:
6:

var
  MyButton: TButton;
begin
  MyButton := TButton.Create;
  MyButton.Parent := Form1;
  ...

Rest aus der Hilfe holen.

SpeedyGTD · Beiträge: 89

danke

das geht jetzt schonmal, wie kann ich jetzt aber auf den button zugreifen, ein button ohne funktion ist ja nicht wirklich sinnvoll :lol:

_________________
...hab ich vergessen

Ehemaliges Mitglied Erhaltene Danke: 1

Du brauchst eine eigene Prozedur für das "OnClick"-Ereignis des Buttons. Dann hat er seine Funktion.

markieren

Quelltext

1:
2:
3:
4:
5:
6:

MyButton.OnClick := KlickMich;

procedure TForm1.KlickMich(Sender: TObject);
begin
  ShowMessage('Geklickt');
end;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme