Galgenraten

[Amateurprogammierer]

Hallo,
Ich möchte gern mit Delphi Galgenraten/Hangman programmieren.

Die gesuchten Wörter habe ich in einer .txt Datei.
Frage Nummer 1: Wie wähle ich zufällig eines dieser Worte aus, und zeige dieses Wort dann unaufgedeckt (in Strichen, also pro Buchstabe ein Label) auf dem Bildschirm?

Den Buchstaben, den ich vermute, gebe ich in ein Edit Feld ein. Beim Klick auf einen Button wird kontrolliert ob diese in dem Wort vorkommt. Wenn ja, sie wird dieser Buchstabe in dem Wort aufgedeckt, wenn nein wird ein Teil des Galgens gezeichnet.Nun Frage Nummer 2: wie überprüfe ichob der Buchstabe im Wort enthalten ist?


MfG

[Mathematiker]

Hallo,
sehr viele Fragen auf einmal.

Zitat von Amateurprogammierer:

Die gesuchten Wörter habe ich in einer .txt Datei.
Frage Nummer 1: Wie wähle ich zufällig eines dieser Worte aus, und zeige dieses Wort dann unaufgedeckt (in Strichen, also pro Buchstabe ein Label) auf dem Bildschirm?

Mein Vorschlag:
Eine Tstringlist erzeugen, die Datei laden, einen zufälligen Eintrag ermitteln ..., z.B.

Delphi-Quellcode:

var woerter:tstringlist;
    anzahl,zufall:integer;
    ratewort:string;
begin
    randomize;
    woerter:=tstringlist.create;
    woerter.loadfromfile('deindateiname.txt');
    anzahl:=woerter.count;
    zufall:=random(anzahl);
    ratewort:=woerter[zufall];
    ...
    woerter.free;
end;

Bei den ... würde ich vorschlagen, das Wort für den Anfang (ist einfacher) in Großbuchstaben umwandeln. Einen zweiten String, z.B. gerateneswort, machst Du so lang wie Dein ratewort, aber mit einem Zeichen, z.B. #:

Delphi-Quellcode:

    gerateneswort:='';
    for i:=1 to length(ratewort) do gerateneswort:=gerateneswort+'#';

So, das war schon ziemlich viel Hilfe. Versuche es erst einmal bis hier hin.

Beste Grüße
Mathematiker

[Sir Rufo]

Bitte Randomize nur einmal in der Anwendung aufrufen, wenn es halbwegs zufällig sein soll

[Volker Z.]

Hallo,

nicht nur Randomize nur einmal aufrufen! Auch die Liste der gesuchten Wörter nur einmal pro Spiel einlesen; ist nicht wirklich prickelnd, wenn nur N Worte in der Liste vorliegen und eines davon mehrfach pro Spiel zufällig ausgewählt wird.
Besser (sicherstellen, dass genügent Worte für einen Hangman vorliegen) beim Spielstart alle Möglichkeiten einlesen, ein Wort per Zufall bestimmen und den Zufallswert aus der Liste entfernen.

Gruß

[Mathematiker]

Hallo,

Zitat von Sir Rufo:

Bitte Randomize nur einmal in der Anwendung aufrufen, wenn es halbwegs zufällig sein soll

Zitat von Volker Z.:

Besser (sicherstellen, dass genügent Worte für einen Hangman vorliegen) beim Spielstart alle Möglichkeiten einlesen, ein Wort per Zufall bestimmen und den Zufallswert aus der Liste entfernen.

Beides vollkommen richtig.
Ich glaube aber, das überfordert ihn noch mehr. Selbst die Stringliste dürfte schon schwierig sein. Wenn ich es richtig verstanden habe, geht es um die ersten Schritte mit Delphi.

Beste Grüße
Mathematiker