Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Hangman Problem

    Delphi
    by ChristianR, 5. Mai 2009
  Wenn ich in dem Edit Feld nur 1 Buchstaben, z.B. "a" eingebe, dann ist der String doch von Länge 1 und dann dürfte das doch gar kein problem sein oder?
• Forum: Multimedia

  Re: Hangman Problem

    Delphi
    by ChristianR, 5. Mai 2009
  procedure TForm1.Button1Click(Sender: TObject);
  var hilfwort:String;
  var k:integer;
  begin
  buchstabe := Edit1.Text;
  hilfwort := label2.caption;
  Label3.Caption := inttostr(length(hilfwort));
  for k := 1 to length(hilfwort) do
  begin
  if odd(k) then
• Forum: Multimedia

  Re: Hangman Problem

    Delphi
    by ChristianR, 4. Mai 2009
  jup daran wirds wohl gelegen haben. Jetzt habe ich aber das problem das die ausgabe einfach eine durchgezogne linie ist (______) so kann aber schlecht erkennen wieviel Buchstaben das gesuchte Wort hat. Deswegen hatte ich ja das Leerzeichen drin. Wie bekomm ich das denn hin das es so aussieht (_ _ _ _)? Ich weiss nich ich steh voll auf dem Holzweg :gruebel:
• Forum: Multimedia

  Hangman Problem

    Delphi
    by ChristianR, 4. Mai 2009
  Hallo,
  ich bin grade dabei ein kleines Hangman Spiel zu programmieren...Leider komme ich im Moment kein Stückchen weiter und zwar beim Buchstaben vergleichen. Eigentlich kein Problem aber irgendwie stresst er noch rum.
  das zu erratene Wort ist "Testwort" Ich Gebe über ein Edit Feld den Buchstaben ein. Klappt soweit auch bis ich das komplette wort erraten habe, nur wenn das wort erraten wurde,...