TImageEnView.IsPointInsideSelection

Declaration

function IsPointInsideSelection(x, y: Integer): Boolean;

Description

Returns true if the point specified with x, y is inside the current selection.
If SelectionBase is iesbClientArea (default) all coordinates depend on the zoom and image view (scrolling).

Example

procedure TForm1.ImageEnView1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
  if ImageEnView1.IsPointInsideSelection(X, Y) then
    lblSelection.Caption := format('%d %d is selected', [X, Y])
  else
    lblSelection.Caption := format('%d %d is NOT selected', [X, Y]);
end;

---