如何设置Delphi中TColorBox组件禁止选择特定颜色？

本文共计109个文字，预计阅读时间需要1分钟。

了解，以下是简化后的内容：

从TColorBox下拉列表中删除特定颜色：需要删除的颜色：clGreen代码示例：procedure TForm7.FormCreate(Sender: TObject);var i: Integer;begin i :=ColorBox1.Items.IndexOf('clGreen'); if i > -1 then ColorBox1.Items.Delete(i);end;

有谁知道如何从TColorBox的下拉列表中删除某种颜色？ 您需要删除列表中的颜色：

procedure TForm7.FormCreate(Sender: TObject); var i: Integer; begin i := ColorBox1.Items.IndexOf('clGreen'); if i <> -1 then ColorBox1.Items.Delete(i) else Showmessage('invalid color'); end;