This can be reproduced both for TAdvColorSelector and TAdvTextColorSelector.
Copy this and paste into the form:
object AOCS_FmtTxtColorBg: TAdvOfficeColorSelector
Left = 153
Top = 2
Width = 32
Height = 22
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
NotesFont.Charset = DEFAULT_CHARSET
NotesFont.Color = clWindowText
NotesFont.Height = -11
NotesFont.Name = 'Tahoma'
NotesFont.Style = []
ParentFont = False
Rounded = True
Version = '1.6.3.1'
TabOrder = 6
OnClick = AOCS_FmtTxtColorBgClick
AllowFloating = False
CloseOnSelect = False
CaptionAppearance.BorderColor = clNone
CaptionAppearance.Color = 14406862
CaptionAppearance.ColorTo = clNone
CaptionAppearance.Direction = gdHorizontal
CaptionAppearance.TextColor = clBlack
CaptionAppearance.TextColorHot = clBlack
CaptionAppearance.TextColorDown = clBlack
CaptionAppearance.ButtonAppearance.ColorChecked = 16111818
CaptionAppearance.ButtonAppearance.ColorCheckedTo = 16367008
CaptionAppearance.ButtonAppearance.ColorDisabled = 15921906
CaptionAppearance.ButtonAppearance.ColorDisabledTo = 15921906
CaptionAppearance.ButtonAppearance.ColorDown = 16111818
CaptionAppearance.ButtonAppearance.ColorDownTo = 16367008
CaptionAppearance.ButtonAppearance.ColorHot = 16117985
CaptionAppearance.ButtonAppearance.ColorHotTo = 16372402
CaptionAppearance.ButtonAppearance.ColorMirror = clSilver
CaptionAppearance.ButtonAppearance.ColorMirrorTo = clWhite
CaptionAppearance.ButtonAppearance.ColorMirrorHot = 16107693
CaptionAppearance.ButtonAppearance.ColorMirrorHotTo = 16775412
CaptionAppearance.ButtonAppearance.ColorMirrorDown = 16102556
CaptionAppearance.ButtonAppearance.ColorMirrorDownTo = 16768988
CaptionAppearance.ButtonAppearance.ColorMirrorChecked = 16102556
CaptionAppearance.ButtonAppearance.ColorMirrorCheckedTo = 16768988
CaptionAppearance.ButtonAppearance.ColorMirrorDisabled = 11974326
CaptionAppearance.ButtonAppearance.ColorMirrorDisabledTo = 15921906
DragGripAppearance.BorderColor = clGray
DragGripAppearance.Color = 9867402
DragGripAppearance.ColorTo = 9867402
DragGripAppearance.ColorMirror = 9867402
DragGripAppearance.ColorMirrorTo = 9867402
DragGripAppearance.Gradient = ggVertical
DragGripAppearance.GradientMirror = ggVertical
DragGripAppearance.BorderColorHot = 5819121
DragGripAppearance.ColorHot = 9102333
DragGripAppearance.ColorHotTo = 9102333
DragGripAppearance.ColorMirrorHot = 9102333
DragGripAppearance.ColorMirrorHotTo = 9102333
DragGripAppearance.GradientHot = ggRadial
DragGripAppearance.GradientMirrorHot = ggRadial
DragGripPosition = gpTop
DropDownButton = True
Appearance.BorderColor = 13815240
Appearance.BorderColorHot = 5819121
Appearance.BorderColorDown = 3181250
Appearance.BorderColorChecked = 3181250
Appearance.ColorTo = 15590880
Appearance.ColorChecked = 14285309
Appearance.ColorCheckedTo = 7131391
Appearance.ColorDisabled = 15921906
Appearance.ColorDisabledTo = 15921906
Appearance.ColorDown = 7131391
Appearance.ColorDownTo = 8122111
Appearance.ColorHot = 9102333
Appearance.ColorHotTo = 14285309
Appearance.ColorMirror = 15590880
Appearance.ColorMirrorTo = 15590880
Appearance.ColorMirrorHot = 14285309
Appearance.ColorMirrorHotTo = 9102333
Appearance.ColorMirrorDown = 8122111
Appearance.ColorMirrorDownTo = 7131391
Appearance.ColorMirrorChecked = 7131391
Appearance.ColorMirrorCheckedTo = 7131391
Appearance.ColorMirrorDisabled = 11974326
Appearance.ColorMirrorDisabledTo = 15921906
Appearance.GradientHot = ggVertical
Appearance.GradientMirrorHot = ggVertical
Appearance.GradientDown = ggVertical
Appearance.GradientMirrorDown = ggVertical
Appearance.GradientChecked = ggVertical
Appearance.TextColorDown = clWindowText
Appearance.TextColorHot = clWindowText
SelectedColor = clNone
ShowRGBHint = True
BorderDropDownColor = 13815240
ColorDropDown = 16251129
ColorDropDownFloating = 16374724
SelectionAppearance.BorderColorHot = 5819121
SelectionAppearance.BorderColorDown = 3181250
SelectionAppearance.BorderColorChecked = 3181250
SelectionAppearance.ColorTo = 15855597
SelectionAppearance.ColorChecked = 14285309
SelectionAppearance.ColorCheckedTo = 7131391
SelectionAppearance.ColorDisabled = 15921906
SelectionAppearance.ColorDisabledTo = 15921906
SelectionAppearance.ColorDown = 7131391
SelectionAppearance.ColorDownTo = 8122111
SelectionAppearance.ColorHot = 9102333
SelectionAppearance.ColorHotTo = 9102333
SelectionAppearance.ColorMirror = clNone
SelectionAppearance.ColorMirrorTo = clNone
SelectionAppearance.ColorMirrorHot = 9102333
SelectionAppearance.ColorMirrorHotTo = 14285309
SelectionAppearance.ColorMirrorDown = 8122111
SelectionAppearance.ColorMirrorDownTo = 7131391
SelectionAppearance.ColorMirrorChecked = 7131391
SelectionAppearance.ColorMirrorCheckedTo = 7131391
SelectionAppearance.ColorMirrorDisabled = 11974326
SelectionAppearance.ColorMirrorDisabledTo = 15921906
SelectionAppearance.GradientHot = ggVertical
SelectionAppearance.GradientMirrorHot = ggVertical
SelectionAppearance.GradientDown = ggVertical
SelectionAppearance.GradientMirrorDown = ggVertical
SelectionAppearance.GradientChecked = ggVertical
SelectionAppearance.GradientDisabled = ggVertical
SelectionAppearance.GradientMirrorDisabled = ggVertical
SelectionAppearance.TextColorChecked = clBlack
SelectionAppearance.TextColorDown = clBlack
SelectionAppearance.TextColorHot = clBlack
SelectionAppearance.TextColorDisabled = clGray
SelectionAppearance.TextColor = clWindowText
SelectionAppearance.Rounded = False
Tools = <
item
BackGroundColor = clBlack
Caption = 'Automatic'
CaptionAlignment = taCenter
Enable = True
Hint = 'Automatic'
ImageIndex = -1
ItemType = itFullWidthButton
end
item
BackGroundColor = clBlack
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 13209
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 13107
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 13056
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 6697728
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clNavy
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 3486515
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 3355443
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clMaroon
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 26367
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clOlive
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clGreen
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clTeal
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clBlue
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 10053222
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clGray
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clRed
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 39423
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 52377
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 6723891
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 13421619
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 16737843
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clPurple
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 10066329
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clFuchsia
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 52479
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clYellow
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clLime
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clAqua
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 16763904
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 6697881
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clSilver
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 13408767
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 10079487
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 10092543
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 13434828
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 16777164
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 16764057
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = 16751052
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = clWhite
CaptionAlignment = taCenter
Enable = True
ImageIndex = -1
end
item
BackGroundColor = -2
Caption = 'More Colors...'
CaptionAlignment = taCenter
Enable = True
Hint = 'More Colors'
ImageIndex = -1
ItemType = itFullWidthButton
end>
OnSelectColor = AOCS_FmtTxtColorBgSelectColor
UIStyle = tsOffice2010Silver
end
Compile, run.
On 100% DPI, the selection of color buttons is quick and no lag.
On 150% DPI, the selection visually lags, like it takes 3 times more time to redraw/refresh, like it is very slow.
So open the drop-down to select the color and move mouse quickly over the colors. On 100% the refresh will be immediate. On 150% the refresh will look like a trail following mouse cursor when the colors are deselected and redrawn.