author | Xeli |
Fri, 17 Feb 2012 15:55:31 +0100 | |
changeset 6698 | 804e9076d136 |
parent 6697 | 4a04c02bc8c3 |
child 6699 | 83dd3447a212 |
--- a/hedgewars/uTouch.pas Fri Feb 17 15:35:20 2012 +0400 +++ b/hedgewars/uTouch.pas Fri Feb 17 15:55:31 2012 +0100 @@ -542,6 +542,7 @@ end; function isOnRect(rect: TSDL_Rect; finger: TTouch_Data): boolean; +begin isOnRect:= (finger.x > rect.x) and (finger.x < rect.x + rect.w) and (cScreenHeight - finger.y > rect.y) and