Label und der Zähler

[jimo]

Hmm irgendwie habe ich es nicht so mit den Zählern >.<, hatte jetzt vor. Probeweise, einen Button zu machen, der, jedes mal wenn man darauf klickt, den zähler erhöht und den Button dementsprechend umbennent.

Delphi-Quellcode:

Var
   win_x: Integer;

begin

     win_x := win_x+1;
     Button1.Caption := IntToStr (win_x);
end;

also ich sehe da keinen Fehler, aber wenn ich das erste mal auf den klicke kommt ein Zahl raus, die völlig der Logik entweicht.
Kann es daran Liegen das ich den Wert des Zähle nicht festgelegt habe? wenn ja wo soll ich den Festlegen? wenn ich es zwischen begin und end festlege, macht er das ja jedes mal wenn ich den button drücke...aber würde es denn so funktionieren?

Delphi-Quellcode:

Var
   win_x: Integer;

begin
     begin
     if(Button1.Caption = '0') then
     win_x := 0;
     win_x := win_x+1;
     Button1.Caption := IntToStr (win_x)
     end else

     win_x := win_x+1;
     Button1.Caption := IntToStr (win_x);
end;