我要配置界面，下拉颜色表等？

Question

哪里有合适的delphi 7源代码？

Answer 1

占个坑...
R
 0 255
G
 0 255
B 
 0 255

Answer 2

说得太简单了，我是要做界面
要类似讯雷的配置界面：
就是可以设置颜色，如线型，颜色，
可以填写配置用的参数数据如果不知道讯雷的样子，我要
internet explorer　的选项功能！！！
有类似的代码吗？

Answer 3

你是要可以显示彩色的COMBOBOX???

Answer 4

procedure   TForm1.ComboBox1DrawItem(Control:   TWinControl;   Index:   Integer;   
      Rect:   TRect;   State:   TOwnerDrawState);   
  var   
      Bitmap:   TBitmap;   
      Offset:   Integer;   
  begin   
      Bitmap   :=   TBitmap.Create;   
      with   TComboBox(Control).Canvas   do   try   
          FillRect(Rect);   
          Offset   :=   2;   
          ImageList1.GetBitmap(Index,   Bitmap);   
          BrushCopy(Bounds(Rect.Left   +   Offset,   Rect.Top,   Bitmap.Width,   Bitmap.Height),   
              Bitmap,   Bounds(0,   0,   Bitmap.Width,   Bitmap.Height),   clRed);   
              Offset   :=   Bitmap.width   +   6;   
          TextOut(Rect.Left   +   Offset,   Rect.Top,   TComboBox(Control).Items[Index]);   
      finally   
          Bitmap.Free;   
      end;   
  end;
   
ComboBox1.Style   :=   csOwnerDrawFixed; 你要画彩色的块的话就自己CASE OF
然后FILLRECT