Neue Komponenten erzeugen während ein Programm läuft?

soisseteben · Beiträge: 111 Win XP D7

Hallo erstmal,

Als ich würd gern auf Knopfdruck neue Komponenten erzeugen und die dann im Formular darstellen lassen. Geht so etwas? Hab schon was geschrieben, wobei hier nur die Koordinaten des Senders (Button2) verändert werden. :gruebel:

markieren

Delphi-Quelltext

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

procedure TForm1.Button2Click(Sender: TObject);
var NewM : TMemo;
begin
  NewM.left := 240;
  NewM.Top := 400;
end;

Danke schonmal!

soisset

wulfskin · Verfasst: Sa 16.09.06 14:55

Ja, geht. Beispiel mit Button aus dem Kopf:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

var
  Btn: TButton;
begin
  Btn := TButton.Create(Self);
  Btn.Parent := Self;
  Btn.Visible := True;
  Btn.Width := 10;
  Btn.Height := 200;
end;

Gruß Hape!

_________________
Manche antworten um ihren Beitragszähler zu erhöhen, andere um zu Helfen.

soisseteben · Beiträge: 111 Win XP D7

Danke, hab mir schon gedacht das ich irgentwie den Construktor aufrufen muss.

+

soisset

soisseteben · Beiträge: 111 Win XP D7

OK, es funktioniert. Aber eine Frage hätt ich noch: ich muss doch als "Parent" das Formular angeben oder? Wiese klappt den das mit "self"? Oder was stellt "self" hier dar?

Danke!

soisset

wulfskin · Verfasst: Sa 16.09.06 15:13

Parent gibt an, auf was die Komponente liegt. Self bezieht sich immer auf die aktuelle Klasse und da du es höchstwarscheinlich aus deinem Formular aufruft, entspricht Self hier TFormXY.

Gruß Hape!

_________________
Manche antworten um ihren Beitragszähler zu erhöhen, andere um zu Helfen.

soisseteben · Beiträge: 111 Win XP D7

Danke nochmal!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme