Mega Code Archive

 

Categories / Delphi / Hardware

 

How to swap the mouse buttons

Title: How to swap the mouse buttons procedure SwapMouseButtons(bValue: Boolean); begin if bValue then SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 1, nil, 0) else SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 0, nil, 0); end;