loShell = CreateObject( 'WScript.Shell' ) lcBgColor = loShell.RegRead( 'HKCU\Control Panel\Colors\Hilight' ) *** This returns the RGB values of the highlight color as space delimited *** set of values. In order to use this to set the background color for the *** current grid row, call this code from the grid’s Init(): lcBgColor = 'RGB( ' + STRTRAN( lcBgColor, ' ', ', ' ) + ' )' lcNormalBg = loShell.RegRead( 'HKCU\Control Panel\Colors\Window' ) lcNormalBg = 'RGB( ' + STRTRAN( lcNormalBg, ' ', ', ' ) + ' )' This.SetAll( 'DynamicBackColor', ; "IIF( RECNO( This.RecordSource ) = This.nRecNo, " + ; lcBgColor + ", " + lcNormalBg + " )", 'COLUMN' )Or, if you don't like the WSH, you can always use the WinAPI GetSysColor() function, but I don't have the syntax for that at my fingertips