renhao
2023-09-21 1aa9f2bb83dd9e4b7517f1cbf06b0db53979bb31
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Quintiq file version 2.0
#parent: ListInitElement
Response OnDrop (LibWiz_InitElement information, LibWiz_InitElementGroup target) id:Response_ListInitElement_OnDrop
{
  #keys: '[121114.1.2065623279]'
  Body:
  [*
    // Move init element
    if ( MessageBox::Question( this, 
                               'Are you sure you want to change the sequence of steps?', 
                               '&Yes|&No' ) = 0 )
    {
      target.MoveLast( information );
    }
  *]
  CanBindMultiple: false
  DefinitionID: 'Responsedef_GUIComponent_OnDrop'
  Precondition:
  [*
    feedback := "Cannot move to itself";
    return information.CanMoveTo( target );
  *]
}