Jump to content




Recent Status Updates

  • Photo
      18 Aug
    KodeKool

    When faced with a wall of errors and no hope to fix them, remember the following "Programs always do what you tell them to, and seldom what you want them to, but eventually you'll run out of things that can go wrong and it'll just work. and that's the secret to good programming."

    Show comments (2)
View All Updates

Developed by Kemal Taskin
Photo
- - - - -

Detect If Mouse Buttons is Swapped

delphi mouse button swap swapped mouse button

  • Please log in to reply
No replies to this topic

#1 Luthfi

Luthfi

    CC Leader

  • Expert Member
  • PipPipPipPipPipPipPip
  • 1,318 posts
  • Programming Language:PHP, Delphi/Object Pascal, Pascal, Transact-SQL
  • Learning:C, Java, PHP

Posted 22 February 2013 - 01:28 AM

In Windows, users may swapped mouse button to make physical right button to be considered as left button, and vice versa. This feature is to support left-handled people. And if you need to detect this possibility (like after you detect a mouse button is pressed, like in this code snippet), you can use the following code.

 

uses
  ...
  , Windows
  ...
  ;

(* This function returns true if the mouse buttons are swapped *)
function IsMouseBtnSwapped: Boolean;
begin
  Result := GetSystemMetrics(SM_SWAPBUTTON) <> 0;
end;

Edited by LuthfiHakim, 22 February 2013 - 01:33 AM.

  • 0