Objekt zur laufzeit

[Taladan]

Soderle

Delphi-Quellcode:

procedure TRasse.Erstelle_Etwas_Jetzt_und_nicht_Frueher(sender: System.Object; e: System.EventArgs);
var b : button;
  i : integer;
begin

  b:= System.Windows.Forms.Button.Create;
  b.Location := System.Drawing.Point.Create(20, (convert.ToInt32(self.Tag) * 20));
  b.Height := 20;
  b.Width := 100;
  b.text := 'MyButton1';
  Include(b.Click, Erstelle_Etwas_Jetzt_und_nicht_Frueher);
  self.Tag := convert.ToInt32(self.Tag)+1;
  Self.Controls.Add(B);
end;

gruß dat Tala