1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Quintiq file version 2.0
| #parent: #root
| StaticMethod GetRGB (
| Number colorvalue,
| output Number red_o,
| output Number green_o,
| output Number blue_o
| ) declarative remote
| {
| Description: 'Returns RGB'
| TextBody:
| [*
| blue_o := colorvalue.BitShiftRight( 16 );
| green_o := ( colorvalue - blue_o.BitShiftLeft( 16 ) ).BitShiftRight( 8 );
| red_o := colorvalue - blue_o.BitShiftLeft( 16 ) - green_o.BitShiftLeft( 8 );
| *]
| }
|
|
