程序中的对话框应用(4)- ”颜色“对话框

TColorDialog组件用于显示选择颜色的对话框,当用户选择一个颜色并单击 OK 按钮后,所选颜色会被保存到 Color 属性中。

1、将”颜色“对话框中所选的颜色值应用到组件中示例:

ColorDialog1.Execute;
Memo1.Text:= ColorToString(ColorDialog1.Color);//颜色值转换为字符串
Memo1.Color:= ColorDialog1.Color;//直接赋值

2、使用Create 方法动态创建颜色对话框

procedure TForm1.Button2Click(Sender: TObject);
var
  colors: TColorDialog;
begin
  colors:= TColorDialog.Create(Self);
  if Colors.Execute then
  begin
    Memo1.Color:= colors.Color;
  end;
end;

3、Options属性下fdFullOpen为True时,完全展开颜色对话框。

原文地址:https://www.cnblogs.com/fansizhe/p/12784137.html