我正在尝试向TColorBox
控件添加自定义颜色。我已将控件添加到我的表单和Style
属性中,设置cbCustomColor
为 True。对于该OnGetColors
事件,我有以下代码:
procedure TfrmAbout.GetColors(Sender: TCustomColorBox; Items: TStrings);
begin
ShowMessage('GetColors has been triggered');
Items.AddObject('clWebSnow',TObject(clWebSnow));
Items.AddObject('MyOrange',TObject(Rgb(255,128,0)));
end;
我没有看到消息框或下拉菜单中出现的颜色。为了让它发挥作用,我还需要做些什么吗?