Klicken in Bereich auf Image

[DeddyH]

Und eine Prüfung auf eine gültige Region wäre auch zu empfehlen.

Delphi-Quellcode:

  rgn := CreatePolygonRgn(plist,4,Winding);
  if rgn <> 0 then
    begin
      if PtInRegion(rgn, x, y) then
        ShowMessage('in');
      DeleteObject(rgn);
    end;