ImageEn, unit iexColorPalette

TIEColorPalette.OnCellClick

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;