Einmal für alle:
- Ein Quiz lässt sich nur dann neu starten, wenn ein Quiz geladen ist! Wenn kein Quiz geladen ist, dann gibts auch nichts zum neu starten! Um das zuletzt benutzte Quiz zu laden, auf das Menu "Quiz" und dort den Menüpunkt mit der "1" davor
Delphi-Quellcode:
var
s: string;
begin
if lbNoFile.Visible then Exit;
// lbNoFile ist nur dann Visible, wenn kein Quiz geladen ist.
s := quiz.filename;
Closequiz;
Canceled := False;
LoadMain(s);