Código Delphi [-]procedure TForm1.MPRegionImage1Click(Sender: TObject); begin label1.Caption:=inttostr(MPRegionImage1.RegionAtCursorPos); end;
procedure TForm1.MPRegionImage1Click(Sender: TObject); begin label1.Caption:=inttostr(MPRegionImage1.RegionAtCursorPos); end;