Statt
if Application.MessageBox('Neues Spiel anfangen?','Frage',36) = 7 then Close;
besser
if MessageBox(Handle,'Neues Spiel anfangen?','Frage',mb_YesNo or mb_IconQuestion or mb_DefButton1) = id_NO then Close;
Statt "
Handle" kannst Du auch eine Null ("0") schreiben.
Klick mal in Delphi (nicht hier) auf das Wort "MessageBox" und drück dann [F1]
Edith meint, daß "Medium" oben mit erhobenem Zeigefinger nur mehrwertlos herumschwafelt