ImageEn, unit iexColorPalette |
|
TIEColorPalette.ColorUnderCursor
Declaration
property ColorUnderCursor: TColor; (Read-Only)
Description
Returns the color of the cell that is currently under the cursor.
procedure TForm1.ColorPalette1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
// Show the color under the cursor
pnlHoverColor.ParentBackground := False;
pnlHoverColor.Color := ColorPalette1.SelectedColor;
end;