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?
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
