ColorDialogの使い方

ColorDialogの使い方

ColorDialogは「色の設定」コモンダイアログをカプセル化したコンポーネントです。

使用例

procedure TForm1.Color2Click(Sender: TObject);
begin
  if ColorDialog1.Execute then
    Shape1.Brush.Color := ColorDialog1.Color;
end;