Windows Cursor Veränderung abfragen

[Union]

UpdateLabel muss eine Public procedure von TForm1 sein (Ausschnitt):

Delphi-Quellcode:

 TForm1 = class(TForm)
  public
    { Public declarations }
    procedure UpdateLabel;
  end;