Ich habe es aufgegeben das Ding sauber zum Laufen zu bekommen, nutze jetzt nurnoch
Delphi-Quellcode:
try
Platform.SetCursor(nil, crHourGlass);
[...]
finally
Platform.SetCursor(nil, crDefault);
end;
Wobei ein
Application.ProcessMessages;
im try-Part den Cursor wieder auf crDefault setzt.
Gruß