1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
| Quintiq file version 2.0
| #parent: #root
| Method ShowAtGridPoint (
| Product_MPs products,
| Number x,
| Number y
| )
| {
| Description: 'Move an object to any grid point'
| TextBody:
| [*
| if( products.Size() > 0 and x.IsFinite() and y.IsFinite() )
| {
| gridx := 0;
| gridy := 0;
| Node::NearestGridPoint( x, y, gridx, gridy, this.GridPointDistance() );
|
| traverse( products, Elements.ProductNode, node, node.ViewBase() = this )
| {
| node.MoveToGridPoint( gridx, gridy );
| node.IsUserVisible( true );
| }
| }
| *]
| }
|
|
