TIEColorPalette.OnCellClick

Declaration

property OnCellClick: TIECellClickEvent;

Description

Occurs whenever the user clicks a color cell.

Set Allow to false, if you do not want to allow the selection.

Example

procedure TForm1.ColorPalette1CellClick(Button: TMouseButton; Shift:
    TShiftState; Index: Integer; aColor: TColor; var Allow: Boolean);
begin
  if aColor = clRed then
    // Don't allow red cells to be clicked
    Allow := False;
end;

---