Shape wärend Laufzeit erzeugen.

[hummer]

Hallo,
ich möchte wärend der Laufzeit meines Programms, wenn ich einen Button drücke ein neues Shape erzeugen und in einer bestimmten Größe und an einer bestimmten Stelle platzieren.

Ich weiss aber nicht wie ich ein neues Shape erzeuge.

Thx.

[Stanlay Hanks]

Hi! Als Beispiel:

Delphi-Quellcode:

 var Shape : TShape;
begin
 Shape := TShape.Create(Form1);

 With Shape do
  begin
   Parent := Form1;
   Left := 20;
   Top  := 20;
   Width:= 20;
   Height:=20;
   Name := 'Shape1';
  end;

end;

Anschließend kannst du das neue Shape über Shape1 ansprechen.
Vorher die Unit ExtCtrls einbinden.

Man liest sich, Stanlay