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;