Code-Beispiel: Syntax - Windowobjekte

Window(windowB, 25, 30, 180, 180, T("Beispiel 2", "Example 2"))
    [ Var(x)  // Definition einer Variablen 
      Message(FOO) // Definition einer Message 
      Define(Drop2)  // Definition einer Anweisung 
              Drop Drop;
      CLOSE: Unlock(windowC, button1) // ausführbare Anweisungen 
               SendMsg(FOO)
    ] 
    {  . . . 
       String(CX_PERSON::name, 10, 10, 120)
       [ SELECT:
         NON_CURRENT: GetValue 
                      "name == %s"
                      FindFirst(CX_PERSON)
                      FillWindow 
       ]
       . . . 
    }