heyho... hab leider nicht ganz so viel ahnung von delphi aber wir benutzen diese programm in der schule.
Momentan müssen wir eni hangmanspiel programmieren. Funktioniert soweit auch ganz gut ... komm jetzt allerdings nicht weiter. also:
Delphi-Quellcode:
var
Form1: TForm1;
buchstabe, wort, anzeige : string;
laenge, index : integer;
procedure TForm1.Button1Click(Sender: TObject);
var ausgabe : string;
begin
wort := (edwort.text);
laenge := length(edwort.text);
ausgabe := ' ';
For index:=1 to laenge do
ausgabe := ausgabe + ' _';
edwort.text := (ausgabe);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
buchstabe := (edbuchstabe.text);
anzeige := (edanzeige.text);
if pos (buchstabe, wort) > 0 then
anzeige := 'enthalten'
else
anzeige := 'nich drin' ;
edanzeige.text := (anzeige);
end;
... heißt: er verschlüsselt das wort, so wie gedacht und er zeigt mir auch an, wenn ein buchstabe in diesem wort enthalten ist, oder nicht. Ich weiß jetzt allerdings nicht, wie ich diesen buchstaben dann ersetzten kann, also wie aus _ _ _ _ _ _ a _ _ o oder sowas wird
wär toll, wenn mir wer helfen kann...
thx im vorraus
[edit=Admin]Code in Delphi-Tags gesetzt. Künftig bitte selber machen, danke. Mfg, Daniel[/edit]