Delphi如何修改其colordialog对话框的默认选择颜色？

Question

Delphi如何修改colordialog对话框的默认选择颜色？默认弹出为黑色。
如何将colordialgo默认选取颜色随不同edit.color变化

Answer 1

  self.ColorBox1.ItemIndex:=self.ColorBox1.Items.IndexOf(ColorToString(self.Edit1.Color));

Answer 2

不好意思写错了，应该是
  
  self.ColorDialog1.Color:=self.Edit1.Color;
  self.ColorDialog1.Execute;

Answer 3

 ColorBox1.ItemIndex := ColorBox1.Items.IndexOfObject(TObject(Edit1.Color));