Doppelkopf-Projekt

[tankm26]

wie kann ich diese for-Schleife abbrechen? es soll überprüft werden, ob 'w' in spieler2 enthalten ist.

Delphi-Quellcode:

 for s:=0 to 10 do begin
   if not spieler2[s]=w then womputerzug(a) else begin 
     if wr2=1 then begin
       wr3:=2;
       arstich[0]:=spieler2[s];
       arstich[1]:=nummern[48];
       arstich[2]:=nummern[48];
       arstich[3]:=nummern[48];
       hintgr(3);
     end;
   if wr2=2 then begin wr3:=3; arstich[1]:=spieler2[s]; hintgr(3); end;
   if wr2=3 then begin wr3:=4; arstich[2]:=spieler2[s]; hintgr(3); end;
   if wr2=4 then begin kartenaufnahme.Enabled:=true; arstich[3]:=spieler2[s]; end;
   spieler2[s]:=nummern[48];
   cleangrd(gridspieler2);
   sortiere(48,1,0,1);
   gridstich.Refresh;
   gekarten:=gekarten+1;
   label3.CAption:=IntToStr (gekarten);
   end;
  end;