Zitat von
biby90:
habt ihr eine Idee?
Joah.
Die Gewinnabfrage musst du einfach vor dem Aktualisieren der Labels machen.
Ansonsten hat er ja gar nicht die Chance den Code vorzeitig zu verlassen.
Delphi-Quellcode:
procedure TForm1.CountClick;
begin
if CheckForWin(GBuffer) then // nicht direkt auf true bzw false prüfen (wurde dir schon öfters nahe
// gelegt)
begin
Exit;
end;
if GPlayer = 1 then
begin
i := i +1;
Label14.Caption := IntToStr(i);
end
else
begin
j := j +1;
Label13.Caption := IntToStr(j); // ohne Begin/End wird der Teil immer ausgeführt
end;
end;