summaryrefslogtreecommitdiff
path: root/src/corelib/fpg_base.pas
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2009-02-04 13:09:58 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2009-02-04 13:09:58 +0000
commit837d6ef5259b48a86af26d551a611285f6fffa38 (patch)
treef42bdb1deb0568ebb335383734b2e18eccd53f39 /src/corelib/fpg_base.pas
parent4c590ac929e9df181a336701f870f4906297d8c4 (diff)
downloadfpGUI-837d6ef5259b48a86af26d551a611285f6fffa38.tar.xz
* added a custom user message constant.
* prevent AV when tooltip owner window is released. * language update
Diffstat (limited to 'src/corelib/fpg_base.pas')
-rw-r--r--src/corelib/fpg_base.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/corelib/fpg_base.pas b/src/corelib/fpg_base.pas
index 979ac61a..15270468 100644
--- a/src/corelib/fpg_base.pas
+++ b/src/corelib/fpg_base.pas
@@ -81,6 +81,7 @@ const
FPGM_MOVE = 16;
FPGM_POPUPCLOSE = 17;
FPGM_HINTTIMER = 18;
+ FPGM_CUSTOM = 50000;
FPGM_KILLME = High(Integer);
// The special keys, based on the well-known keyboard scan codes
@@ -1145,8 +1146,7 @@ begin
DoMoveWindow(x, y);
end;
-function TfpgWindowBase.WindowToScreen(ASource: TfpgWindowBase;
- const AScreenPos: TPoint): TPoint;
+function TfpgWindowBase.WindowToScreen(ASource: TfpgWindowBase; const AScreenPos: TPoint): TPoint;
begin
Result := DoWindowToScreen(ASource, AScreenPos);
end;