ARGH... Buttonproblem

[blablab]

nimm doch als variable einen integer.

Delphi-Quellcode:

var 
 int: integer;

procedure TForm1.FormCreate(...); 
begin 
  int := 0; 
end;

procedure TForm1.Button1Click(...); 
begin 
  int := int + 1;
  case int of
    1: Edit1.Text := 'Hallo';
    2: Edit1.Text := 'Bla';
    3: ... 
end;