Hi,
empfehle noch try finally...
Delphi-Quellcode:
Screen.Cursor := crHourGlass;
try
// Laden/Speichern/odersonnstwas
Application.ProcessMessages;
finally
// bei Exception soll die Sanduhr trotzdem verschwinden
Screen.Cursor := crDefault;
end;
Cu, Frank