Statt direkt aus der Registry gibs auch hier
API-Calls unter Windows:
Delphi-Quellcode:
//Schreiben
Windows.SetDoubleClickTime(SpinEditSpeed.Value);
Windows.SystemParametersInfo(SPI_SETDOUBLECLKHEIGHT,SpinEditHeight.Value,NIL,(SPIF_UPDATEINIFILE or SPIF_SENDCHANGE));
Windows.SystemParametersInfo(SPI_SETDOUBLECLKWIDTH,SpinEditWidth.Value,NIL,(SPIF_UPDATEINIFILE or SPIF_SENDCHANGE));
//Lesen
SpinEditHeight.Value := Windows.GetSystemMetrics(SM_CYDOUBLECLK);
SpinEditWidth.Value := Windows.GetSystemMetrics(SM_CXDOUBLECLK);
SpinEditSpeed.Value := Windows.GetDoubleClickTime;