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;