Einzelnen Beitrag anzeigen

Benutzerbild von rollstuhlfahrer
rollstuhlfahrer

Registriert seit: 1. Aug 2007
Ort: Ludwigshafen am Rhein
1.529 Beiträge
 
Delphi 7 Professional
 
#10

Re: hangman programm - delphi 3

  Alt 19. Mai 2008, 20:31
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;
Bernhard
Iliacos intra muros peccatur et extra!