Ich bin grade dabei Hangman zu programieren. Allerdings habe ich ein problem, wenn ein buchstabe in einem Wort zweimal vorkommt. Bin über jede Hilfe dankbar.
Delphi-Quellcode:
v:= pos(b,x); {x= das lösungswort}
if pos(b,x)<>0 then
begin
delete(z,v,1);
insert(b,z,v) ; {z= das gesuchte wort in strichen, b= der geratene buchstabe}
edit1.Text:= z;
end;