陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Quintiq file version 2.0
#parent: CustomDrawComponentRoutingConfigurator/CustomDrawDataLayerExcludedOperationInput
Response OnDrawObject (
  OperationInput object
) id:Response_CustomDrawComponentRoutingConfigurator_CustomDrawDataLayerExcludedOperationInput_OnDrawObject
{
  #keys: '[124808.0.1222257144]'
  Body:
  [*
    //Draw exclusion indicator
    
    //Initialize borders
    surface.Pen().Style( PenSpecification::StyleSolid() );
    surface.Pen().Width( 1 )
    surface.Pen().Color( ColorScheme.Outline() );
    
    //Initialize borders
    if( object.IsElementOfInputGroup() )
    {
     diameter := minvalue( region.Width(), region.Height() );
      left := [Number]( region.Width()/2 ) - [Number]( diameter/2 );
    
      circle := Shape::Circle( left, region.Top(), diameter )
      surface.Fill( circle, Color::Gray() );
      surface.Circle( left, region.Top(), diameter, surface.Pen().Color() );
    
    }
    else
    {
      surface.Fill( shape, Color::Gray() );
      surface.Draw( shape );
    }
  *]
  CanBindMultiple: false
  DefinitionID: 'Responsedef_CustomDrawDataLayer_OnDrawObject'
  Precondition:
  [*
    return not isnull( DataHolderRCView.Data() );
  *]
}