hangman programm - delphi 3

[rollstuhlfahrer]

erst einmal wprde ich sagen, dass ein Download eines gepackten archives auch ohne Werbung geht und zwar hier in der DP. Rar sollte so klein sein, dass die Grenze nicht überschritten wird. Also: das nächste mal unterm Posttext das Attachment hinzufügen.

rollstuhlfahrer

nachtrag:
Das sollte weiterhelfen

Delphi-Quellcode:

var fehlversuche: Cardinal; // kann ja eigentlich nicht negativ werden ;)


procedure TMain.BBPruefenClick(Sender: TObject);
begin
  if Pos(EdBuchstabe.Text, Ratewort) <> 0 then
  begin   // Vorhanden
  //...
  end
  else
  begin  // nicht vorhanden
    Fehlversuche := Fehlversuche + 1;
    Label5.Caption := IntToStr(Fehlversuche);
  end;
end;