Thema: Delphi Hangman Problem

Einzelnen Beitrag anzeigen

Dazek1x

Registriert seit: 20. Mär 2008
4 Beiträge
 
#1

Hangman Problem

  Alt 20. Mär 2008, 12:42
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;
  Mit Zitat antworten Zitat