Lade...
 

NotifyEvent

NotifyEvent

NotifyEvent(windowID, widgetID), NotifyEvent(, widgetID), NotifyEvent

Parameter: Bezeichner eines Windows und eines OLE-Control-Widgets

Stack
Stack Position Beschreibung
Stack(In) Top Zeichenkette
  Top-1 MESSAGE
Stack(Out) Top -

Mit diesem Befehl wird eine ActiveX-Message in eine ClassiX-Message übersetzt. Gleichzeitig meldet sich das ClassiX-Control-Widget bei dem ActiveX-Message-Provider an, so dass die als Zeichenkette definierte Message in ClassiX abgefangen werden kann.

Beispiel:

 

Control(OLECtrl, HIDDEN, 10, 10, 200, 100)
    INITIALIZE: // Create the control
                  %22OWC11.ChartSpace%22 CreateControl // Office 2003
                  // If the control is not avaliable, try to load an older version
                  Widget Call(IsValid) ifnot { %22OWC10.ChartSpace%22 CreateControl } // Office XP

                  Widget Call(IsValid) if
                  {
                    (-1) Widget(, OLECtrl) Call(GetCharts) Call(Add) -> smallChart

                    25 smallChart Call(PutType) // chChartTypeScatterLine

                    (-1) smallChart Call(GetSeriesCollection) Call(Add)
                    (-1) smallChart Call(GetSeriesCollection) Call(Add)
                    (-1) smallChart Call(GetSeriesCollection) Call(Add)

                    smallChart -> chartControl
                    10 UpdateChart

                    (CHART_CONTEXT_MENU) %22BeforeContextMenu%22 NotifyEvent,
                    (SHOW_CHART) %22DblClick%22 NotifyEvent,

                    Unlock(, ChartBtn)
                    Hide(, NotAvailPrompt)
                    Show

                    DropAll
                  }
                  else
                  {
                    // chart can not be used
                    Lock(, ChartBtn)
                    return
                  }

      CHART_CONTEXT_MENU: FALSE Swap Call(PutValue) NULL Swap Call(PutValue) DropAll
      SHOW_CHART: OpenWindow(ChartWin, 1)