diff options
| author | Vadim Dashevskiy <watcherhd@gmail.com> | 2014-03-08 15:01:30 +0000 |
|---|---|---|
| committer | Vadim Dashevskiy <watcherhd@gmail.com> | 2014-03-08 15:01:30 +0000 |
| commit | ebbc20d1aabb7c462251e126929a4b2c7d3c3753 (patch) | |
| tree | fcca9187f311c19ed6c50113feae34f76ba0d5f8 /plugins/Libs/visual_xp_styles.inc | |
| parent | 5f366013221edfc085a66446a24da366d4ea0739 (diff) | |
temporary revert
git-svn-id: http://svn.miranda-ng.org/main/trunk@8479 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Libs/visual_xp_styles.inc')
| -rw-r--r-- | plugins/Libs/visual_xp_styles.inc | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/plugins/Libs/visual_xp_styles.inc b/plugins/Libs/visual_xp_styles.inc index f2bf826779..5db52144c1 100644 --- a/plugins/Libs/visual_xp_styles.inc +++ b/plugins/Libs/visual_xp_styles.inc @@ -996,7 +996,7 @@ begin end;
{$ENDIF}
//*************************** Control Message event **************************//
-function WndXPMessage( Sender: PControl; var Msg: TMsg; var Rslt: LRESULT ): Boolean;
+function WndXPMessage( Sender: PControl; var Msg: TMsg; var Rslt: Integer ): Boolean;
var
pt : TPoint;
Mouse: TMouseEventData;
@@ -1086,7 +1086,7 @@ begin if Msg.wParam = VK_SPACE then
begin
if Assigned(Sender.EV.fOnKeyDown) then
- Sender.EV.fOnKeyDown(Sender, LongInt(Pointer(Msg.wParam)^), GetShiftState);
+ Sender.EV.fOnKeyDown(Sender, Msg.wParam, GetShiftState);
{$IFDEF USE_FLAGS} Sender.fFlagsG4 := Sender.fFlagsG4 + [G4_Pressed];
{$ELSE} Sender.fPressed := true; {$ENDIF}
dDC := GetWindowDC(Msg.hWnd);
@@ -1100,7 +1100,7 @@ begin if Msg.wParam = VK_SPACE then
begin
if Assigned(Sender.EV.fOnKeyUp) then
- Sender.EV.fOnKeyUp(Sender, LongInt(Pointer(Msg.wParam)^), GetShiftState);
+ Sender.EV.fOnKeyUp(Sender, Msg.wParam, GetShiftState);
{$IFDEF USE_FLAGS} Sender.fFlagsG4 := Sender.fFlagsG4 - [G4_Pressed];
{$ELSE} Sender.fPressed := false; {$ENDIF}
dDC := GetWindowDC(Msg.hWnd);
@@ -1216,7 +1216,7 @@ begin {$ENDIF}
end;
//********************* Handling of message WM_THEMECHANGED ******************//
-function WndXP_WM_THEMECHANGED( Sender: PControl; var Msg: TMsg; var Rslt: LRESULT ): Boolean;
+function WndXP_WM_THEMECHANGED( Sender: PControl; var Msg: TMsg; var Rslt: Integer ): Boolean;
begin
Result := false;
|