Mega Code Archive

 

Categories / Delphi / Hardware

 

Swap the mouse buttons

Title: 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;