Haloa zusammen, versuche gerade einen Ableger vom bekannten "Glücksrad" zu machen.
Das Poblem liegt nu daran das wenn ich Worte mit 2 gleichen Buchstaben habe er nur eins hinschreibt:
Delphi-Quellcode:
procedure TForm1.btnVersuchClick(Sender: TObject);
var i,v : Integer;
begin
for i := 0 to length(wort) do
Begin
try
v := pos(LowerCase(edtVersuch.Text),LowerCase(wort))-1;
if v = 0 then objEdt[0].Text := Uppercase(edtVersuch.Text)
else objEdt[v].Text := LowerCase(edtVersuch.Text);
except
end;
end;
end;
Das er nur einmal soweit geht bis ers gefunden hat und dann aufhört ist klar. Nur wie bekomm ich hin
das er auch das zweite findet? Und das zweite Problem wäre das wenn ich was falsches eingebe (andren Buchstaben als gesucht) er mir nen .exe error ausgibt
Hoffe könnt mir helfen
Mfg Bansh