| changeset 9291 | 15f7bb217b66 |
| parent 9285 | 8e8b908970c2 |
| child 9387 | 6478ed9ead25 |
| child 9642 | 8a691e0f117a |
| 9289:6bc1df062f04 | 9291:15f7bb217b66 |
|---|---|
1487 if col then |
1487 if col then |
1488 DeleteCI(gear); |
1488 DeleteCI(gear); |
1489 gear^.X:= int2hwfloat(x); |
1489 gear^.X:= int2hwfloat(x); |
1490 gear^.Y:= int2hwfloat(y); |
1490 gear^.Y:= int2hwfloat(y); |
1491 if col then |
1491 if col then |
1492 AddGearCI(gear); |
1492 AddCI(gear); |
1493 SetAllToActive |
1493 SetAllToActive |
1494 end |
1494 end |
1495 end; |
1495 end; |
1496 lc_setgearposition:= 0 |
1496 lc_setgearposition:= 0 |
1497 end; |
1497 end; |