Befehlsübermittlung über Internet

[x3no]

Zitat von Apollonius:

Du kannst doch nicht einfach einen String in eine Klassen-Instanz casten!

Ich habs daher abgeleitet:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    procedure FormActivate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  Btns : array [1..2] of TButton;
implementation

{$R *.dfm}

procedure TForm1.FormActivate(Sender: TObject);
var i : integer;
begin
  for i := 1 to 2 do
   Btns[i] := TButton('Button' + IntToStr(i));
end;