...swap the mouse buttons?

Author: Simon Grossenbacher
Homepage: http://www.swissdelphicenter.ch

Category: Misc

procedure SwapMouseButtons(bValue: Boolean);
begin
  if 
bValue then
    
SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 1, nil, 0)
  else
    
SystemParametersInfo(SPI_SETMOUSEBUTTONSWAP, 0, nil, 0);
end;

 

printed from
www.swissdelphicenter.ch
developers knowledge base