branch | ios-revival |
changeset 11088 | 378882cc9148 |
parent 10108 | c68cf030eded |
child 11224 | 24bafdcf1860 |
11087:99578075df24 | 11088:378882cc9148 |
---|---|
61 procedure printFinger(finger: TTouch_Data); |
61 procedure printFinger(finger: TTouch_Data); |
62 implementation |
62 implementation |
63 |
63 |
64 const |
64 const |
65 clickTime = 200; |
65 clickTime = 200; |
66 nilFingerId = High(TSDL_FingerId); |
|
66 baseRectSize = 96; |
67 baseRectSize = 96; |
67 |
68 |
68 var |
69 var |
69 rectSize, halfRectSize: LongInt; |
70 rectSize, halfRectSize: LongInt; |
70 |
71 |