extras/tiopf/gui/tiGUIUtils.pas


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

unit tiGUIUtils;

{$mode objfpc}{$H+}

interface

uses
  Classes
  ;

  // Mouse cursor routines
//  function tiAutoWaitCursor: IUnknown;
//  function tiAutoCursor(ACursor: TCursor = crHourglass): IUnknown;

implementation

end.