Label und der Zähler

[jimo]

Grüße euch alle,

bin neu hier dabei und habe erstmal eine Frage, also erstmal bin ich in diesem Gebiet ein Anfänger, habe aber schon paar Tuorials gemacht. So nun zu Sachen, ich habe mich vor kurzen an ein Spielchen rangesetzt(Tic-Tac-Toe) ist ja nichts großes, läuft auch einwandfrei. Ich habe vor dort zwei zähler reinzubauen die dann in einem Label aufgezählt werden wie oft X bzw. O gewonnen hat. Kling simple,aber nicht für mich. Ich hab so versucht:

Code:

Var
win_x: Integer;

begin

if(Button1.Caption ='X') and (Button2.Caption ='X') and (Button3.Caption ='X') then

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

Spiel lässt sich auch starten, der Zähler zählt auch, allerdings nur einmal, dann steigt er nicht mehr.

Danke schon mal für die Hilfe

PS: SuFu , lieferte keine Ergebnisse