Cursor

Parameter

: Integer;

Beschreibung

TScreen.Cursor ändert die Ansicht des aktuellen Cursors.

Mögliche Werte sind:

  • crHourGlass
  • crDefault

Beispiel

Screen.Cursor := crHourGlass;
try
  // Do something ...
finally
  Screen.Cursor := crDefault;
end;