Erstes Delphi Programm =)

[DeddyH]

Ich greife meinen Code von oben nochmals auf.

Delphi-Quellcode:

procedure TMainForm.TuWas;
begin
  if falsch then
    begin
      inc(FZaehler);
      LabelFehler.Caption := IntToStr(FZaehler); //diese Zeile sorgt für die Anzeige
      if FZaehler > 9 then
        begin
          MessageBox(Handle,'Du hast 10 Fehler gemacht, das Spiel wird beendet.','Information',MB_OK or MB_ICONINFORMATION);
          Close;
        end;
    end;
end;