OnClick auf Image

[Cheffu]

Zitat von ste_ett:

Dafür gibt's ne API-Funktion.

Delphi-Quellcode:

var
  r: TRect;
  p: TPoint;
begin
  r.x := ...;
  r.y := ...;
  
  p.left := 200;
  p.top := 200;
  p.right := 300;
  p.bottom := 300;

  if (PtInRect(r, p)) then
  begin
    ShowMessage('ja');
  end
  else
  begin
    ShowMessage('nein');
  end;
end;

Muss da nicht irgendwie noch
with Image1.Canvas do oder sowas rein? weil da steckt ja nicht drin bei was er dies amchen soll oder?