Einzelnen Beitrag anzeigen

Benutzerbild von Jens Hartmann
Jens Hartmann

Registriert seit: 11. Jan 2009
Ort: Wilnsdorf
1.439 Beiträge
 
Delphi XE2 Professional
 
#31

Re: Erstes Delphi Programm =)

  Alt 13. Apr 2009, 07:54
Hallo,

also ich schon viel besser , aber wie schon gesagt worden ist, kann man trotz das man schon 10 Fehler gemacht hat weiter spielen. Es kommt zwar immer die Message das man verloren hat, aber egal. Du solltest das mrOK der MessageBox abfangen und anschließend damit das Spiel neu Starten.

Oder noch besser, änder das ganze auf eine Abfrage...

Sie haben verloren, wollen Sie das spiel beenden oder es erneut versuchen.

Delphi-Quellcode:

    case FVerloren.ShowModal of
    mrOK:
      begin
        Close;
      end;

    mrCancel:
      begin
        'Spiel Neu Starten'
      end;

// Oder so...

    if FVerloren.ShowModal = mrOK then
      begin
        Close;
      end
    else
      begin
        'Spiel Neu Starten'
      end;
Also viel Glück.

Gruß Jens
Jens Hartmann
Das Leben selber ist zu kurz, also nutze jeden Tag wie er kommt.
  Mit Zitat antworten Zitat