break; umschreiben bei einer Sequenzschleife

break, goto, usw. sind ja berechtigterweise eher verhasst bei den Programmiersprachen.
Ich arbeite zur Zeit an einem Art Scrabble Programm, bei dem ein Buchstabensatz ausgewürfelt wird und nun die Eingabe des Benutzers mit den wirklich vorhandenen ausgewürfelten Buchstaben verglichen wird, ob diese auch da sind.

Im Endeffekt habe ich einfach folgendes Problem: Ich möchte die Sequenzschleife abbrechen um einen sonst folgenden Fehler zu vermeiden. Dies konnte ich aber nur mit break; reliaiseren, da Borland wohl kein Veränderung der Sequenzvariable innerhalb der Schleife erlaubt. Eine Idee wie ich das umshcreiben kann?

zusammenfalten · markieren

Delphi-Quellcode:

			for i := 1 to length(wort) do

    for j := 1 to length(buchstaben) do

        if wort[i] = buchstaben[j] then

           begin

           if check >= length(wort) then

           else

            begin

             backup := backup + buchstaben[j];

             delete(buchstaben, j, 1);

             pnlWurf.Caption := buchstaben;

             inc(check);

             break;

            end;

           end

        else

            begin

            end;

wort ist die Eingabe des Users
buchstaben die ausgewürfelten Buchstaben

break; umschreiben bei einer Sequenzschleife

break; umschreiben bei einer Sequenzschleife

Forumregeln