diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-02-20 09:25:56 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-02-20 09:25:56 +0000 |
| commit | 60acc634aa134f16b2845dc9a7a93b24b62c89b5 (patch) | |
| tree | 3c84dc43d25b58b1332983ad64f3f66ef72a845b /src | |
| parent | 59b5a60fbf884cc477bb34b8607cdd6300b3a611 (diff) | |
| download | fpGUI-60acc634aa134f16b2845dc9a7a93b24b62c89b5.tar.xz | |
* Added a new cursor: mcHand
Diffstat (limited to 'src')
| -rw-r--r-- | src/corelib/gdi/gfx_gdi.pas | 3 | ||||
| -rw-r--r-- | src/corelib/gfxbase.pas | 3 | ||||
| -rw-r--r-- | src/corelib/x11/gfx_x11.pas | 1 |
3 files changed, 6 insertions, 1 deletions
diff --git a/src/corelib/gdi/gfx_gdi.pas b/src/corelib/gdi/gfx_gdi.pas index cd926cb0..09802c57 100644 --- a/src/corelib/gdi/gfx_gdi.pas +++ b/src/corelib/gdi/gfx_gdi.pas @@ -182,6 +182,7 @@ type hcr_move: HCURSOR; hcr_crosshair: HCURSOR; hcr_wait: HCURSOR; + hcr_hand: HCURSOR; FFocusedWindow: THANDLE; LastClickWindow: TfpgWinHandle; // double click generation LastWinClickTime: longword; @@ -926,6 +927,7 @@ begin hcr_move := LoadCursor(0, IDC_SIZEALL); hcr_crosshair := LoadCursor(0, IDC_CROSS); hcr_wait := LoadCursor(0, IDC_WAIT); + hcr_hand := LoadCursor(0, IDC_HAND); FIsInitialized := True; wapplication := TfpgApplication(self); @@ -1269,6 +1271,7 @@ begin mcMove: hc := wapplication.hcr_move; mcCross: hc := wapplication.hcr_crosshair; mcHourGlass: hc := wapplication.hcr_wait; + mcHand: hc := wapplication.hcr_hand; else hc := wapplication.hcr_default; end; diff --git a/src/corelib/gfxbase.pas b/src/corelib/gfxbase.pas index ed8aeb43..ffba04bb 100644 --- a/src/corelib/gfxbase.pas +++ b/src/corelib/gfxbase.pas @@ -28,7 +28,8 @@ type TWindowAttributes = set of TWindowAttribute; TMouseCursor = (mcDefault, mcArrow, mcCross, mcIBeam, mcSizeEW, mcSizeNS, - mcSizeNWSE, mcSizeNESW, mcSizeSWNE, mcSizeSENW, mcMove, mcHourGlass); + mcSizeNWSE, mcSizeNESW, mcSizeSWNE, mcSizeSENW, mcMove, mcHourGlass, + mcHand); TGradientDirection = (gdVertical, // Fill vertical gdHorizontal); // Fill Horizontal diff --git a/src/corelib/x11/gfx_x11.pas b/src/corelib/x11/gfx_x11.pas index de987f0b..c41d873c 100644 --- a/src/corelib/x11/gfx_x11.pas +++ b/src/corelib/x11/gfx_x11.pas @@ -1391,6 +1391,7 @@ begin mcMove: shape := XC_fleur; mcCross: shape := XC_crosshair; mcHourGlass: shape := XC_watch; + mcHand: shape := XC_hand2; else shape := XC_left_ptr; //XC_arrow; end; |