function checkCircleClick(X,Y: Integer): Boolean; var midx: Integer; midy: Integer; r: Integer; begin midx:=28; midy:=29; r:=24; if Sqr(midx-X)+Sqr(midy-Y)<=Sqr(r) then Result:= True else Result:=False end end;