METHOD OKButton( ) CLASS MainDialog SELF:EndDialog(0) RETURN SELF METHOD CancelButton( ) CLASS MainDialog SELF:EndDialog(1) RETURN SELF RESOURCE MainDialog DIALOGEX 9, 20, 275, 222 STYLE DS_3DLOOK|DS_MODALFRAME|DS_CENTER|WS_POPUP|WS_CAPTION|WS_SYSMENU|WS_MINIMIZEBOX CAPTION "Basic Dialog Application" FONT 8, "MS Shell Dlg" BEGIN CONTROL "OK", MAINDIALOG_OKBUTTON, "Button", WS_TABSTOP|WS_CHILD, 215, 203, 53, 13 CONTROL "Cancel", MAINDIALOG_CANCELBUTTON, "Button", WS_TABSTOP|WS_CHILD, 156, 203, 54, 13 CONTROL "TODO: Add controls && event handlers", MAINDIALOG_FIXEDTEXT1, "Static", WS_CHILD, 20, 27, 131, 13 END STATIC DEFINE MAINDIALOG_OKBUTTON := 100 STATIC DEFINE MAINDIALOG_CANCELBUTTON := 101 STATIC DEFINE MAINDIALOG_FIXEDTEXT1 := 102 class MainDialog inherit DIALOGWINDOW protect oCCOKButton as PUSHBUTTON protect oCCCancelButton as PUSHBUTTON protect oDCFixedText1 as FIXEDTEXT //{{%UC%}} USER CODE STARTS HERE (do NOT remove this line) method Init(oParent,uExtra) class MainDialog self:PreInit(oParent,uExtra) super:Init(oParent,ResourceID{"MainDialog",_GetInst()},TRUE) oCCOKButton := PushButton{self,ResourceID{MAINDIALOG_OKBUTTON,_GetInst()}} oCCOKButton:HyperLabel := HyperLabel{#OKButton,"OK",NULL_STRING,NULL_STRING} oCCCancelButton := PushButton{self,ResourceID{MAINDIALOG_CANCELBUTTON,_GetInst()}} oCCCancelButton:HyperLabel := HyperLabel{#CancelButton,"Cancel",NULL_STRING,NULL_STRING} oDCFixedText1 := FixedText{self,ResourceID{MAINDIALOG_FIXEDTEXT1,_GetInst()}} oDCFixedText1:HyperLabel := HyperLabel{#FixedText1,"TODO: Add controls "+_chr(38)+_chr(38)+" event handlers",NULL_STRING,NULL_STRING} self:Caption := "Basic Dialog Application" self:HyperLabel := HyperLabel{#MainDialog,"Basic Dialog Application",NULL_STRING,NULL_STRING} self:PostInit(oParent,uExtra) return self CLASS Flowchart INHERIT OleControl METHOD InitAutoObject() CLASS Flowchart LOCAL pDispatch AS PTR IF _VOOLEGetControlDispatch(ObjHandle, @pDispatch) SELF:oAuto := OLEAutoObject{pDispatch} ENDIF RETURN SELF ASSIGN FontRef(; uParam001; // REF OBJECT ) CLASS Flowchart // Default font for object text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUTREF oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Font(; uParam001; // REF OBJECT ) CLASS Flowchart // Default font for object text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Font( ) CLASS Flowchart // Default font for object text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PictureRef(; uParam001; // REF OBJECT ) CLASS Flowchart // Image to display in the background LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := -523 oMethod:wInvokeKind := INVOKE_PROPERTYPUTREF oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Picture(; uParam001; // REF OBJECT ) CLASS Flowchart // Image to display in the background LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := -523 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Picture( ) CLASS Flowchart // Image to display in the background LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := -523 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS BoxFillColor( ) CLASS Flowchart // Default value for the FillColor of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillColor") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxFillColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the FillColor of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillColor") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxFrameColor( ) CLASS Flowchart // Default value for the FrameColor of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFrameColor") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxFrameColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the FrameColor of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFrameColor") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowColor( ) CLASS Flowchart // Default value for the color of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowColor") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the color of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowColor") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AlignToGrid( ) CLASS Flowchart // Activates the grid LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AlignToGrid") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AlignToGrid(; uParam001; // AS LOGIC ) CLASS Flowchart // Activates the grid LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AlignToGrid") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShowGrid( ) CLASS Flowchart // Defines the visibility of the grid LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowGrid") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShowGrid(; uParam001; // AS LOGIC ) CLASS Flowchart // Defines the visibility of the grid LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowGrid") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS GridColor( ) CLASS Flowchart // The color of the grid points LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridColor") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN GridColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // The color of the grid points LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridColor") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS GridSize( ) CLASS Flowchart // The distance between the grid points LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridSize") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN GridSize(; uParam001; // AS SHORT ) CLASS Flowchart // The distance between the grid points LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridSize") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxStyle( ) CLASS Flowchart // The default box style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxStyle") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // The default box style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxStyle") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BackColor( ) CLASS Flowchart // The background is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BackColor") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BackColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // The background is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BackColor") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShowShadows( ) CLASS Flowchart // Controls the drawing of shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowShadows") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShowShadows(; uParam001; // AS LOGIC ) CLASS Flowchart // Controls the drawing of shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowShadows") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowColor( ) CLASS Flowchart // The color of the objects shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowColor") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ShadowColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // The color of the objects shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowColor") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TextStyle( ) CLASS Flowchart // Default value for the alignment of boxes text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextStyle") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TextStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the alignment of boxes text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextStyle") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PicturePos( ) CLASS Flowchart // Defines the placement of the background image LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PicturePos") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PicturePos(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Defines the placement of the background image LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PicturePos") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Arrows( ) CLASS Flowchart // Collection of the arrows in the current document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Arrows") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) CLASS IArrows INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IArrows SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 11 SELF:_dwVars := 0 RETURN SELF ACCESS _NewEnum( ) CLASS IArrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("_NewEnum") oMethod:iMemberid := -4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Item(; Index; // AS LONG ) CLASS IArrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Item") oMethod:iMemberid := 0 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) CLASS IArrowItem INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IArrowItem SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 125 SELF:_dwVars := 0 RETURN SELF ASSIGN FontRef(; uParam001; // REF OBJECT ) CLASS IArrowItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUTREF oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Font(; uParam001; // REF OBJECT ) CLASS IArrowItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Font( ) CLASS IArrowItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Style( ) CLASS IArrowItem // Defines the shape of the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Style") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Style(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Defines the shape of the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Style") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Color( ) CLASS IArrowItem // The arrow is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Color") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Color(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // The arrow is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Color") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS OriginBox( ) CLASS IArrowItem // The box from which the arrow is coming out LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OriginBox") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) CLASS IBoxItem INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IBoxItem SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 174 SELF:_dwVars := 0 RETURN SELF ASSIGN FontRef(; uParam001; // REF OBJECT ) CLASS IBoxItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUTREF oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Font(; uParam001; // REF OBJECT ) CLASS IBoxItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Font( ) CLASS IBoxItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Style( ) CLASS IBoxItem // Defines the shape of the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Style") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Style(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Defines the shape of the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Style") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IncomingArrows( ) CLASS IBoxItem // Collection of the arrows pointing to the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IncomingArrows") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS OutgoingArrows( ) CLASS IBoxItem // Collection of the arrows going out of the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OutgoingArrows") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS FillColor( ) CLASS IBoxItem // Color of the box interior LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FillColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Color of the box interior LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FrameColor( ) CLASS IBoxItem // Color of the box borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FrameColor") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FrameColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Color of the box borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FrameColor") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Picture( ) CLASS IBoxItem // Image painted inside the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Picture(; uParam001; // REF OBJECT ) CLASS IBoxItem // Image painted inside the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Text( ) CLASS IBoxItem // Text displayed in the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Text") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Text(; uParam001; // AS STRING ) CLASS IBoxItem // Text displayed in the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Text") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TextColor( ) CLASS IBoxItem // The box Text is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextColor") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TextColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // The box Text is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextColor") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TextStyle( ) CLASS IBoxItem // Defines the text position and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextStyle") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TextStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Defines the text position and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextStyle") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetCBox( ) CLASS IBoxItem // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetCBox") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Tag( ) CLASS IBoxItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Tag(; uParam001; // AS LONG ) CLASS IBoxItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Transparent( ) CLASS IBoxItem // Only the box picture and text are displayed if set LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Transparent") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Transparent(; uParam001; // AS LOGIC ) CLASS IBoxItem // Only the box picture and text are displayed if set LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Transparent") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicture(; FileName; // AS STRING ) CLASS IBoxItem // Loads in the box an image from a file LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicture") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ToolTip( ) CLASS IBoxItem // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ToolTip(; uParam001; // AS STRING ) CLASS IBoxItem // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenStyle( ) CLASS IBoxItem // The style of the pen for drawing the box frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // The style of the pen for drawing the box frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenWidth( ) CLASS IBoxItem // The width of the pen for drawing the frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PenWidth(; uParam001; // AS LONG ) CLASS IBoxItem // The width of the pen for drawing the frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetPolyShape(; count,; // AS SHORT ptc; // REF BYTE ) CLASS IBoxItem // Sets custom-defined box shape LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetPolyShape") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_PUI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FitSizeToPicture( ) CLASS IBoxItem // Makes the box the same size as its picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FitSizeToPicture") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZLevelUp( ) CLASS IBoxItem // Moves the box up in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelUp") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZLevelDown( ) CLASS IBoxItem // Moves the box down in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelDown") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZBottom( ) CLASS IBoxItem // Moves the box at the bottom of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZBottom") oMethod:iMemberid := 21 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZTop( ) CLASS IBoxItem // Moves the box at the top of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZTop") oMethod:iMemberid := 22 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ZIndex( ) CLASS IBoxItem // The index of the box in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ZIndex(; uParam001; // AS LONG ) CLASS IBoxItem // The index of the box in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Locked( ) CLASS IBoxItem // Prevents the user from modifying the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 24 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Locked(; uParam001; // AS LOGIC ) CLASS IBoxItem // Prevents the user from modifying the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 24 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CustomDraw( ) CLASS IBoxItem // Type of custom drawing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CustomDraw") oMethod:iMemberid := 25 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CustomDraw(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Type of custom drawing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CustomDraw") oMethod:iMemberid := 25 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BoundingRect(; left,; // REF LONG top,; // REF LONG right,; // REF LONG bottom; // REF LONG ) CLASS IBoxItem // Returns the position of the box bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoundingRect") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PI4 + VTS_PI4 + VTS_PI4 + VTS_PI4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetRect(; left,; // AS LONG top,; // AS LONG right,; // AS LONG bottom; // AS LONG ) CLASS IBoxItem // Sets the box position and size LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetRect") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS left( ) CLASS IBoxItem // The left side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("left") oMethod:iMemberid := 28 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS top( ) CLASS IBoxItem // The upper side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("top") oMethod:iMemberid := 29 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS right( ) CLASS IBoxItem // The right side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("right") oMethod:iMemberid := 30 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS bottom( ) CLASS IBoxItem // The lower side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("bottom") oMethod:iMemberid := 31 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Selected( ) CLASS IBoxItem // Returns TRUE if the box is selected LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Selected") oMethod:iMemberid := 32 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicFromRes(; hRsrcInst,; // AS USERTYPE (LONG) RsrcName,; // AS STRING RsrcType; // AS STRING ) CLASS IBoxItem // Loads an image from resources LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicFromRes") oMethod:iMemberid := 33 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT + VTS_BSTRW + VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPredefShape(; nId; // AS LONG ) CLASS IBoxItem // Sets this box shape to one of the predefined shapes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPredefShape") oMethod:iMemberid := 34 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetPolyShapeArray(; psaPoints; // AS ARRAY OF BYTE ) CLASS IBoxItem // Sets custom-defined box shape LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetPolyShapeArray") oMethod:iMemberid := 35 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_AUI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BeginUndoRecord(; inclConnected; // AS LOGIC ) CLASS IBoxItem // Start recording programmatic operations on this box for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BeginUndoRecord") oMethod:iMemberid := 36 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndUndoRecord( ) CLASS IBoxItem // Stop recording programmatic operations on this box for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndUndoRecord") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS MnpHandlesMask( ) CLASS IBoxItem // Bit-mask to enable/disable specific manipulation handles for the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MnpHandlesMask") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN MnpHandlesMask(; uParam001; // AS LONG ) CLASS IBoxItem // Bit-mask to enable/disable specific manipulation handles for the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MnpHandlesMask") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetX( ) CLASS IBoxItem // Horizontal offset of the box shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetX(; uParam001; // AS LONG ) CLASS IBoxItem // Horizontal offset of the box shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetY( ) CLASS IBoxItem // Vertical offset of the box shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetY(; uParam001; // AS LONG ) CLASS IBoxItem // Vertical offset of the box shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Expandable( ) CLASS IBoxItem // The box has an expand/collapse button LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Expandable") oMethod:iMemberid := 41 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Expandable(; uParam001; // AS LOGIC ) CLASS IBoxItem // The box has an expand/collapse button LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Expandable") oMethod:iMemberid := 41 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Expanded( ) CLASS IBoxItem // The box is currently expanded LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Expanded") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Expanded(; uParam001; // AS LOGIC ) CLASS IBoxItem // The box is currently expanded LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Expanded") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Expand( ) CLASS IBoxItem // Expand the box hierarchy starting from this one LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Expand") oMethod:iMemberid := 43 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Collapse( ) CLASS IBoxItem // Collapse the box hierarchy starting from this one LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Collapse") oMethod:iMemberid := 44 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IncmAnchor( ) CLASS IBoxItem // Anchor point for incoming arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IncmAnchor") oMethod:iMemberid := 45 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN IncmAnchor(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Anchor point for incoming arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IncmAnchor") oMethod:iMemberid := 45 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS OutgAnchor( ) CLASS IBoxItem // Anchor point for outgoing arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OutgAnchor") oMethod:iMemberid := 46 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN OutgAnchor(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Anchor point for outgoing arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OutgAnchor") oMethod:iMemberid := 46 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PicturePos( ) CLASS IBoxItem // Defines the placement of the box picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PicturePos") oMethod:iMemberid := 47 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PicturePos(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Defines the placement of the box picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PicturePos") oMethod:iMemberid := 47 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetShape(; libGUID,; // AS STRING shape; // AS LONG ) CLASS IBoxItem // Set a box shape, refering to an external shape library LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetShape") oMethod:iMemberid := 48 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetShape(; libGUID,; // REF STRING shape; // REF LONG ) CLASS IBoxItem // Get the external library shape this box is using LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetShape") oMethod:iMemberid := 49 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PBSTR + VTS_PI4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FillStyle( ) CLASS IBoxItem // Interior fill mode LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillStyle") oMethod:iMemberid := 50 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FillStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Interior fill mode LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillStyle") oMethod:iMemberid := 50 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FillColor2( ) CLASS IBoxItem // Additional color for gradient fill LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor2") oMethod:iMemberid := 51 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FillColor2(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Additional color for gradient fill LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor2") oMethod:iMemberid := 51 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Visible( ) CLASS IBoxItem // Visibility status of the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 52 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Visible(; uParam001; // AS LOGIC ) CLASS IBoxItem // Visibility status of the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 52 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS UserData( ) CLASS IBoxItem // User data associated with the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserData") oMethod:iMemberid := 53 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN UserData(; uParam001; // AS LONG ) CLASS IBoxItem // User data associated with the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserData") oMethod:iMemberid := 53 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FitSizeToText( ) CLASS IBoxItem // Makes the box big enough to display all its text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FitSizeToText") oMethod:iMemberid := 54 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackColor( ) CLASS IBoxItem // Color for giving visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackColor") oMethod:iMemberid := 55 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FeedbackColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Color for giving visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackColor") oMethod:iMemberid := 55 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackPenStyle( ) CLASS IBoxItem // The style of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenStyle") oMethod:iMemberid := 56 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FeedbackPenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // The style of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenStyle") oMethod:iMemberid := 56 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackPenWidth( ) CLASS IBoxItem // The width of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenWidth") oMethod:iMemberid := 57 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FeedbackPenWidth(; uParam001; // AS LONG ) CLASS IBoxItem // The width of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenWidth") oMethod:iMemberid := 57 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS LayoutGap( ) CLASS IBoxItem // Gap between items in container-style box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutGap") oMethod:iMemberid := 58 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN LayoutGap(; uParam001; // AS LONG ) CLASS IBoxItem // Gap between items in container-style box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutGap") oMethod:iMemberid := 58 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ContainedItems( ) CLASS IBoxItem // A collection of items contained in this box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ContainedItems") oMethod:iMemberid := 59 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) CLASS IGroupItem INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IGroupItem SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 26 SELF:_dwVars := 0 RETURN SELF ACCESS MainObject( ) CLASS IGroupItem // Main object in the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MainObject") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := iif( uRetValue:pInterface != NULL_PTR , OLEAutoObject{uRetValue}, NULL_OBJECT) RETURN (uRetValue) METHOD AttachToArrowPoint(; obj,; // AS OBJECT point; // AS LONG ) CLASS IGroupItem // Add object to the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachToArrowPoint") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AttachToArrowSegment(; obj,; // AS OBJECT segment; // AS LONG ) CLASS IGroupItem // Add object to the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachToArrowSegment") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AttachToCorner(; obj,; // AS OBJECT corner; // AS LONG ) CLASS IGroupItem // Add object to the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachToCorner") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AttachProportional(; obj,; // AS OBJECT left,; // AS BYTE top,; // AS BYTE right,; // AS BYTE bottom; // AS BYTE ) CLASS IGroupItem // Add object to the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachProportional") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 5 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_UI1 + VTS_UI1 + VTS_UI1 + VTS_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Detach(; obj; // AS OBJECT ) CLASS IGroupItem // Remove object from the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Detach") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetCGroup( ) CLASS IGroupItem // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetCGroup") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS AttachedBoxes( ) CLASS IGroupItem // Collection of boxes attached to the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachedBoxes") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxes{uRetValue} RETURN (uRetValue) CLASS IBoxes INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IBoxes SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 10 SELF:_dwVars := 0 RETURN SELF ACCESS _NewEnum( ) CLASS IBoxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("_NewEnum") oMethod:iMemberid := -4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Item(; Index; // AS LONG ) CLASS IBoxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Item") oMethod:iMemberid := 0 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) ACCESS count( ) CLASS IBoxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("count") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AttachedTables( ) CLASS IGroupItem // Collection of tables attached to the group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachedTables") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITables{uRetValue} RETURN (uRetValue) CLASS ITables INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS ITables SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 10 SELF:_dwVars := 0 RETURN SELF ACCESS _NewEnum( ) CLASS ITables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("_NewEnum") oMethod:iMemberid := -4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Item(; Index; // AS LONG ) CLASS ITables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Item") oMethod:iMemberid := 0 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) CLASS ITableItem INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS ITableItem SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 189 SELF:_dwVars := 0 RETURN SELF ASSIGN FontRef(; uParam001; // REF OBJECT ) CLASS ITableItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUTREF oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Font(; uParam001; // REF OBJECT ) CLASS ITableItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Font( ) CLASS ITableItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Font") oMethod:iMemberid := -512 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD GetRowIncomingArrows(; row; // AS LONG ) CLASS ITableItem // Collection of the arrows pointing to a table cell LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetRowIncomingArrows") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) METHOD GetRowOutgoingArrows(; row; // AS LONG ) CLASS ITableItem // Collection of the arrows going out of a table cell LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetRowOutgoingArrows") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) METHOD GetRelatedTables(; row,; // AS LONG rel; // AS USERTYPE (LONG) ) CLASS ITableItem // Tables having relationship to this table row LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetRelatedTables") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_VARIANT oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITables{uRetValue} RETURN (uRetValue) METHOD AddRelation(; row,; // AS LONG rel,; // AS USERTYPE (LONG) pTable,; // REF OBJECT relRow; // AS LONG ) CLASS ITableItem // Add relation to table field LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddRelation") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_VARIANT + VTS_PDISPATCH + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) METHOD BreakRelation(; row,; // AS LONG rel,; // AS USERTYPE (LONG) pTable; // REF OBJECT ) CLASS ITableItem // Break a relationship LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BreakRelation") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_VARIANT + VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FillColor( ) CLASS ITableItem // Color of the table interior LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FillColor(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Color of the table interior LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FrameColor( ) CLASS ITableItem // Color of the table borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FrameColor") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FrameColor(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Color of the table borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FrameColor") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Picture( ) CLASS ITableItem // Image painted inside the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Picture(; uParam001; // REF OBJECT ) CLASS ITableItem // Image painted inside the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Caption( ) CLASS ITableItem // Text displayed as table caption LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Caption") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Caption(; uParam001; // AS STRING ) CLASS ITableItem // Text displayed as table caption LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Caption") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CaptionColor( ) CLASS ITableItem // The table Caption is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionColor") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CaptionColor(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // The table Caption is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionColor") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetCTable( ) CLASS ITableItem // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetCTable") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Tag( ) CLASS ITableItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Tag(; uParam001; // AS LONG ) CLASS ITableItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicture(; FileName; // AS STRING ) CLASS ITableItem // Loads in the table an image from a file LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicture") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ToolTip( ) CLASS ITableItem // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ToolTip(; uParam001; // AS STRING ) CLASS ITableItem // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenStyle( ) CLASS ITableItem // The style of the pen for drawing the table frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // The style of the pen for drawing the table frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenWidth( ) CLASS ITableItem // The width of the pen for drawing the frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PenWidth(; uParam001; // AS LONG ) CLASS ITableItem // The width of the pen for drawing the frame LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FitSizeToPicture( ) CLASS ITableItem // Makes the table the same size as its picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FitSizeToPicture") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZLevelUp( ) CLASS ITableItem // Moves the table up in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelUp") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZLevelDown( ) CLASS ITableItem // Moves the table down in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelDown") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZBottom( ) CLASS ITableItem // Moves the table at the bottom of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZBottom") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZTop( ) CLASS ITableItem // Moves the table at the top of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZTop") oMethod:iMemberid := 21 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ZIndex( ) CLASS ITableItem // The index of the table in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 22 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ZIndex(; uParam001; // AS LONG ) CLASS ITableItem // The index of the table in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 22 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Locked( ) CLASS ITableItem // Prevents the user from modifying the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Locked(; uParam001; // AS LOGIC ) CLASS ITableItem // Prevents the user from modifying the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BoundingRect(; left,; // REF LONG top,; // REF LONG right,; // REF LONG bottom; // REF LONG ) CLASS ITableItem // Returns the position of the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoundingRect") oMethod:iMemberid := 24 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PI4 + VTS_PI4 + VTS_PI4 + VTS_PI4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetRect(; left,; // AS LONG top,; // AS LONG right,; // AS LONG bottom; // AS LONG ) CLASS ITableItem // Sets the table position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetRect") oMethod:iMemberid := 25 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS left( ) CLASS ITableItem // The left side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("left") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS top( ) CLASS ITableItem // The upper side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("top") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS right( ) CLASS ITableItem // The right side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("right") oMethod:iMemberid := 28 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS bottom( ) CLASS ITableItem // The lower side of the bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("bottom") oMethod:iMemberid := 29 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Selected( ) CLASS ITableItem // Returns TRUE if the box is selected LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Selected") oMethod:iMemberid := 30 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicFromRes(; hRsrcInst,; // AS USERTYPE (LONG) RsrcName,; // AS STRING RsrcType; // AS STRING ) CLASS ITableItem // Loads an image from resources LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicFromRes") oMethod:iMemberid := 31 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT + VTS_BSTRW + VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetText(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Get the text displayed in a cell LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetText") oMethod:iMemberid := 32 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetText(; col,; // AS LONG row,; // AS LONG newVal; // AS STRING ) CLASS ITableItem // Set the text displayed in a cell LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetText") oMethod:iMemberid := 33 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetTextStyle(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Get the text position and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetTextStyle") oMethod:iMemberid := 34 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD SetTextStyle(; col,; // AS LONG row,; // AS LONG newVal; // AS USERTYPE (LONG) ) CLASS ITableItem // Defines the text position and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetTextStyle") oMethod:iMemberid := 35 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddRow( ) CLASS ITableItem // Add a row to the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddRow") oMethod:iMemberid := 36 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD InsertRow(; row; // AS LONG ) CLASS ITableItem // Insert a row in the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InsertRow") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DeleteRow(; row; // AS LONG ) CLASS ITableItem // Delete a row from the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DeleteRow") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddColumn( ) CLASS ITableItem // Add a column to the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddColumn") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD InsertColumn(; col; // AS LONG ) CLASS ITableItem // Insert a column into the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InsertColumn") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DeleteColumn(; col; // AS LONG ) CLASS ITableItem // Delete a column from the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DeleteColumn") oMethod:iMemberid := 41 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ColumnsCount( ) CLASS ITableItem // Number of the table columns LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ColumnsCount") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ColumnsCount(; uParam001; // AS LONG ) CLASS ITableItem // Number of the table columns LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ColumnsCount") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RowsCount( ) CLASS ITableItem // Number of the table rows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RowsCount") oMethod:iMemberid := 43 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RowsCount(; uParam001; // AS LONG ) CLASS ITableItem // Number of the table rows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RowsCount") oMethod:iMemberid := 43 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CaptionStyle( ) CLASS ITableItem // Defines the caption text position and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionStyle") oMethod:iMemberid := 44 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CaptionStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Defines the caption text position and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionStyle") oMethod:iMemberid := 44 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CaptionHeight( ) CLASS ITableItem // Height of the table caption LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionHeight") oMethod:iMemberid := 45 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CaptionHeight(; uParam001; // AS SHORT ) CLASS ITableItem // Height of the table caption LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionHeight") oMethod:iMemberid := 45 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetColWidth(; col; // AS LONG ) CLASS ITableItem // Get the width of a table column LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetColWidth") oMethod:iMemberid := 46 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetColWidth(; col,; // AS LONG newVal; // AS LONG ) CLASS ITableItem // Set the width of a table column LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetColWidth") oMethod:iMemberid := 47 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetRowHeight(; row; // AS LONG ) CLASS ITableItem // Get the height of a table row LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetRowHeight") oMethod:iMemberid := 48 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetRowHeight(; row,; // AS LONG newVal; // AS LONG ) CLASS ITableItem // Set the height of a table row LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetRowHeight") oMethod:iMemberid := 49 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellBorders( ) CLASS ITableItem // Visual style of table cell borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellBorders") oMethod:iMemberid := 50 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellBorders(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Visual style of table cell borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellBorders") oMethod:iMemberid := 50 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetColType(; col; // AS LONG ) CLASS ITableItem // Get the type of a column LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetColType") oMethod:iMemberid := 51 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD SetColType(; col,; // AS LONG newVal; // AS USERTYPE (LONG) ) CLASS ITableItem // Set the type of a column LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetColType") oMethod:iMemberid := 52 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BeginUndoRecord( ) CLASS ITableItem // Start recording programmatic operations on this table for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BeginUndoRecord") oMethod:iMemberid := 53 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndUndoRecord( ) CLASS ITableItem // Stop recording programmatic operations on this table for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndUndoRecord") oMethod:iMemberid := 54 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetX( ) CLASS ITableItem // Horizontal offset of the table shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 55 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetX(; uParam001; // AS LONG ) CLASS ITableItem // Horizontal offset of the table shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 55 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetY( ) CLASS ITableItem // Vertical offset of the table shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 56 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetY(; uParam001; // AS LONG ) CLASS ITableItem // Vertical offset of the table shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 56 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Scrollable( ) CLASS ITableItem // The table can be scrolled LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Scrollable") oMethod:iMemberid := 57 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Scrollable(; uParam001; // AS LOGIC ) CLASS ITableItem // The table can be scrolled LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Scrollable") oMethod:iMemberid := 57 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CurrScrollRow( ) CLASS ITableItem // Number of the first visible row LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CurrScrollRow") oMethod:iMemberid := 58 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CurrScrollRow(; uParam001; // AS LONG ) CLASS ITableItem // Number of the first visible row LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CurrScrollRow") oMethod:iMemberid := 58 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PicturePos( ) CLASS ITableItem // Defines the placement of the table picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PicturePos") oMethod:iMemberid := 59 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PicturePos(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Defines the placement of the table picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PicturePos") oMethod:iMemberid := 59 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Visible( ) CLASS ITableItem // Visibility status of the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 60 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Visible(; uParam001; // AS LOGIC ) CLASS ITableItem // Visibility status of the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 60 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS UserData( ) CLASS ITableItem // User data associated with the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserData") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN UserData(; uParam001; // AS LONG ) CLASS ITableItem // User data associated with the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserData") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellPicture(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Image painted inside the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellPicture") oMethod:iMemberid := 62 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellPicture(; col,; // AS LONG row,; // AS LONG uParam003; // REF OBJECT ) CLASS ITableItem // Image painted inside the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellPicture") oMethod:iMemberid := 62 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellPicturePos(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Defines the placement of the cell picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellPicturePos") oMethod:iMemberid := 63 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellPicturePos(; col,; // AS LONG row,; // AS LONG uParam003; // AS USERTYPE (LONG) ) CLASS ITableItem // Defines the placement of the cell picture LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellPicturePos") oMethod:iMemberid := 63 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicInCell(; FileName,; // AS STRING col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Loads in the cell an image from a file LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicInCell") oMethod:iMemberid := 64 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicInCellFromRes(; hRsrcInst,; // AS USERTYPE (LONG) RsrcName,; // AS STRING RsrcType,; // AS STRING col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Loads an image from resources LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicInCellFromRes") oMethod:iMemberid := 65 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 5 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT + VTS_BSTRW + VTS_BSTRW + VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS UserString( ) CLASS ITableItem // User string associated with the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserString") oMethod:iMemberid := 66 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN UserString(; uParam001; // AS STRING ) CLASS ITableItem // User string associated with the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserString") oMethod:iMemberid := 66 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD MoveTo(; x,; // AS LONG y; // AS LONG ) CLASS ITableItem // Sets the table position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MoveTo") oMethod:iMemberid := 67 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetSize(; width,; // AS LONG height; // AS LONG ) CLASS ITableItem // Sets the table size LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetSize") oMethod:iMemberid := 68 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SubordinateGroup( ) CLASS ITableItem // Gets the group of subordinate objects in a hierarchy LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SubordinateGroup") oMethod:iMemberid := 69 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS MasterGroup( ) CLASS ITableItem // Gets the master group in a hierarchy LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MasterGroup") oMethod:iMemberid := 70 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS MnpHandlesMask( ) CLASS ITableItem // Bit-mask to enable/disable specific manipulation handles for the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MnpHandlesMask") oMethod:iMemberid := 71 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN MnpHandlesMask(; uParam001; // AS LONG ) CLASS ITableItem // Bit-mask to enable/disable specific manipulation handles for the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MnpHandlesMask") oMethod:iMemberid := 71 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelStyle( ) CLASS ITableItem // Selection/manipulation handles style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelStyle") oMethod:iMemberid := 72 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN SelStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Selection/manipulation handles style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelStyle") oMethod:iMemberid := 72 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowInplaceEdit( ) CLASS ITableItem // Specifies whether the table can be edited in-place LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowInplaceEdit") oMethod:iMemberid := 73 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowInplaceEdit(; uParam001; // AS LOGIC ) CLASS ITableItem // Specifies whether the table can be edited in-place LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowInplaceEdit") oMethod:iMemberid := 73 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CaptionFillColor( ) CLASS ITableItem // The table Caption area is filled with this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionFillColor") oMethod:iMemberid := 74 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CaptionFillColor(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // The table Caption area is filled with this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionFillColor") oMethod:iMemberid := 74 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackColor( ) CLASS ITableItem // Color for giving visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackColor") oMethod:iMemberid := 75 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FeedbackColor(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Color for giving visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackColor") oMethod:iMemberid := 75 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackPenStyle( ) CLASS ITableItem // The style of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenStyle") oMethod:iMemberid := 76 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FeedbackPenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // The style of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenStyle") oMethod:iMemberid := 76 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackPenWidth( ) CLASS ITableItem // The width of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenWidth") oMethod:iMemberid := 77 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FeedbackPenWidth(; uParam001; // AS LONG ) CLASS ITableItem // The width of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenWidth") oMethod:iMemberid := 77 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Printable( ) CLASS ITableItem // Enables or disables printing a table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 78 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Printable(; uParam001; // AS LOGIC ) CLASS ITableItem // Enables or disables printing a table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 78 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS LinkStyle( ) CLASS ITableItem // Determines whether arrows link to the whole table as a single node, to table rows, or both LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LinkStyle") oMethod:iMemberid := 79 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN LinkStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Determines whether arrows link to the whole table as a single node, to table rows, or both LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LinkStyle") oMethod:iMemberid := 79 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IncomingArrows( ) CLASS ITableItem // Collection of arrows pointing to the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IncomingArrows") oMethod:iMemberid := 80 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS OutgoingArrows( ) CLASS ITableItem // Collection of arrows going out of the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OutgoingArrows") oMethod:iMemberid := 81 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS VariantTag( ) CLASS ITableItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 82 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name IF IsInstanceOfUsual(uRetValue, #IDispatch) uRetValue := OleAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN VariantTag(; uParam001; // AS USUAL ) CLASS ITableItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 82 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellVariantTag(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellVariantTag") oMethod:iMemberid := 83 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name IF IsInstanceOfUsual(uRetValue, #IDispatch) uRetValue := OleAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellVariantTag(; col,; // AS LONG row,; // AS LONG uParam003; // AS USUAL ) CLASS ITableItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellVariantTag") oMethod:iMemberid := 83 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellFillColor(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Fill cell's interior with this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellFillColor") oMethod:iMemberid := 84 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellFillColor(; col,; // AS LONG row,; // AS LONG uParam003; // AS USERTYPE (LONG) ) CLASS ITableItem // Fill cell's interior with this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellFillColor") oMethod:iMemberid := 84 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FillColorAlpha( ) CLASS ITableItem // Specifies the table's semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColorAlpha") oMethod:iMemberid := 85 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FillColorAlpha(; uParam001; // AS SHORT ) CLASS ITableItem // Specifies the table's semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColorAlpha") oMethod:iMemberid := 85 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IgnoreLayout( ) CLASS ITableItem // Gets or sets whether layout algorithms ignore this item. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreLayout") oMethod:iMemberid := 86 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IgnoreLayout(; uParam001; // AS LOGIC ) CLASS ITableItem // Gets or sets whether layout algorithms ignore this item. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreLayout") oMethod:iMemberid := 86 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Style( ) CLASS ITableItem // Visual style of the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Style") oMethod:iMemberid := 87 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Style(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Visual style of the table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Style") oMethod:iMemberid := 87 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Obstacle( ) CLASS ITableItem // Specifies whether routed arrows should consider this table an obstacle. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Obstacle") oMethod:iMemberid := 88 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Obstacle(; uParam001; // AS LOGIC ) CLASS ITableItem // Specifies whether routed arrows should consider this table an obstacle. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Obstacle") oMethod:iMemberid := 88 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HyperLink( ) CLASS ITableItem // A hyperlink associated with the table. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HyperLink") oMethod:iMemberid := 89 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HyperLink(; uParam001; // AS STRING ) CLASS ITableItem // A hyperlink associated with the table. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HyperLink") oMethod:iMemberid := 89 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Constraints(; constraint; // AS USERTYPE (LONG) ) CLASS ITableItem // Constraints applied to interactive modification of a table. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Constraints") oMethod:iMemberid := 90 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Constraints(; constraint,; // AS USERTYPE (LONG) uParam002; // AS SHORT ) CLASS ITableItem // Constraints applied to interactive modification of a table. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Constraints") oMethod:iMemberid := 90 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD PutInContainer(; container; // REF OBJECT ) CLASS ITableItem // Puts the table into a container box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PutInContainer") oMethod:iMemberid := 91 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RemoveFromContainer( ) CLASS ITableItem // Removes the table from its container. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RemoveFromContainer") oMethod:iMemberid := 92 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellTextColor(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // The color of cell's text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellTextColor") oMethod:iMemberid := 93 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellTextColor(; col,; // AS LONG row,; // AS LONG uParam003; // AS USERTYPE (LONG) ) CLASS ITableItem // The color of cell's text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellTextColor") oMethod:iMemberid := 93 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RowAnchorPattern(; row; // AS LONG ) CLASS ITableItem // Gets or sets the row's anchor points. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RowAnchorPattern") oMethod:iMemberid := 94 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IAnchorPattern{uRetValue} RETURN (uRetValue) CLASS IAnchorPattern INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IAnchorPattern IF (ObjID=NIL) ObjId := "FlowChartPro.AnchorPattern.4.5" ENDIF SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 17 SELF:_dwVars := 0 RETURN SELF ACCESS PatternId( ) CLASS IAnchorPattern // The string id of an anchor pattern LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PatternId") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PatternId(; uParam001; // AS STRING ) CLASS IAnchorPattern // The string id of an anchor pattern LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PatternId") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddAnchorPoint(; x,; // AS SHORT y,; // AS SHORT incoming,; // AS LOGIC outgoing,; // AS LOGIC mark,; // AS USERTYPE (LONG) Color; // AS USERTYPE (LONG) ) CLASS IAnchorPattern // Adds a new anchor definition LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddAnchorPoint") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_BOOL + VTS_BOOL + VTS_VARIANT + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetArrowStyleForPoint(; Index,; // AS LONG ArrowStyle,; // AS USERTYPE (LONG) SegmentCount; // AS SHORT ) CLASS IAnchorPattern // Specifies what style to apply to the arrows going out of an anchor point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetArrowStyleForPoint") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_VARIANT + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AnchorPointCount( ) CLASS IAnchorPattern // The number of points in the anchor pattern LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPointCount") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetAnchorPoint(; Index,; // AS LONG x,; // REF SHORT y,; // REF SHORT incoming,; // REF LOGIC outgoing,; // REF LOGIC mark,; // REF OBJECT Color,; // REF OBJECT changeArrowStyle,; // REF LOGIC ArrowStyle,; // REF OBJECT SegmentCount; // REF SHORT ) CLASS IAnchorPattern // Retrieves the information for an anchor point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetAnchorPoint") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 10 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_PI2 + VTS_PI2 + VTS_PBOOL + VTS_PBOOL + VTS_PDISPATCH + VTS_PDISPATCH + VTS_PBOOL + VTS_PDISPATCH + VTS_PI2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetAnchorPointColumn(; Index,; // AS LONG column; // AS LONG ) CLASS IAnchorPattern LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetAnchorPointColumn") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetAnchorPointColumn(; Index,; // AS LONG column; // REF LONG ) CLASS IAnchorPattern LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetAnchorPointColumn") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_PI4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddAnchorPointF(; x,; // AS FLOAT (REAL4) y,; // AS FLOAT (REAL4) incoming,; // AS LOGIC outgoing,; // AS LOGIC mark,; // AS USERTYPE (LONG) Color; // AS USERTYPE (LONG) ) CLASS IAnchorPattern // Adds a new anchor definition LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddAnchorPointF") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_R4 + VTS_R4 + VTS_BOOL + VTS_BOOL + VTS_VARIANT + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetAnchorPointF(; Index,; // AS LONG x,; // REF FLOAT (REAL4) y,; // REF FLOAT (REAL4) incoming,; // REF LOGIC outgoing,; // REF LOGIC mark,; // REF OBJECT Color,; // REF OBJECT changeArrowStyle,; // REF LOGIC ArrowStyle,; // REF OBJECT SegmentCount; // REF SHORT ) CLASS IAnchorPattern // Retrieves the information for an anchor point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetAnchorPointF") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 10 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_PR4 + VTS_PR4 + VTS_PBOOL + VTS_PBOOL + VTS_PDISPATCH + VTS_PDISPATCH + VTS_PBOOL + VTS_PDISPATCH + VTS_PI2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RowAnchorPattern(; row,; // AS LONG uParam002; // REF OBJECT ) CLASS ITableItem // Gets or sets the row's anchor points. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RowAnchorPattern") oMethod:iMemberid := 94 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AnchorPattern( ) CLASS ITableItem // Pattern of anchor points assigned to this table. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPattern") oMethod:iMemberid := 95 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IAnchorPattern{uRetValue} RETURN (uRetValue) ASSIGN AnchorPattern(; uParam001; // REF OBJECT ) CLASS ITableItem // Pattern of anchor points assigned to this table. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPattern") oMethod:iMemberid := 95 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellRowSpan(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Specifies how many rows a specific cell spans. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellRowSpan") oMethod:iMemberid := 96 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CellRowSpan(; col,; // AS LONG row,; // AS LONG uParam003; // AS SHORT ) CLASS ITableItem // Specifies how many rows a specific cell spans. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellRowSpan") oMethod:iMemberid := 96 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellColumnSpan(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Specifies how many columns a specific cell spans. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellColumnSpan") oMethod:iMemberid := 97 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CellColumnSpan(; col,; // AS LONG row,; // AS LONG uParam003; // AS SHORT ) CLASS ITableItem // Specifies how many columns a specific cell spans. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellColumnSpan") oMethod:iMemberid := 97 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HeaderRow(; row; // AS LONG ) CLASS ITableItem // Specifies whether a row is a section header. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderRow") oMethod:iMemberid := 98 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HeaderRow(; row,; // AS LONG uParam002; // AS LOGIC ) CLASS ITableItem // Specifies whether a row is a section header. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderRow") oMethod:iMemberid := 98 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RowExpanded(; row; // AS LONG ) CLASS ITableItem // Specifies whether the table section starting from a Header row is collapsed or expanded. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RowExpanded") oMethod:iMemberid := 99 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RowExpanded(; row,; // AS LONG uParam002; // AS LOGIC ) CLASS ITableItem // Specifies whether the table section starting from a Header row is collapsed or expanded. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RowExpanded") oMethod:iMemberid := 99 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS OffsetHeaderRows( ) CLASS ITableItem // Specifies whether cells are offset to the right to accommodate for the +/- buttons of Header rows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OffsetHeaderRows") oMethod:iMemberid := 100 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN OffsetHeaderRows(; uParam001; // AS LOGIC ) CLASS ITableItem // Specifies whether cells are offset to the right to accommodate for the +/- buttons of Header rows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OffsetHeaderRows") oMethod:iMemberid := 100 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowIncomingArrows( ) CLASS ITableItem // Specifies whether users are allowed to draw incoming arrows to this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowIncomingArrows") oMethod:iMemberid := 101 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowIncomingArrows(; uParam001; // AS LOGIC ) CLASS ITableItem // Specifies whether users are allowed to draw incoming arrows to this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowIncomingArrows") oMethod:iMemberid := 101 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowOutgoingArrows( ) CLASS ITableItem // Specifies whether users are allowed to draw outgoing arrows from this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowOutgoingArrows") oMethod:iMemberid := 102 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowOutgoingArrows(; uParam001; // AS LOGIC ) CLASS ITableItem // Specifies whether users are allowed to draw outgoing arrows from this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowOutgoingArrows") oMethod:iMemberid := 102 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BeginInplaceEdit(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Opens inplace-editing text control for a box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BeginInplaceEdit") oMethod:iMemberid := 103 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndInplaceEdit(; Accept; // AS LOGIC ) CLASS ITableItem // Closes the inplace-editing text control for a box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndInplaceEdit") oMethod:iMemberid := 104 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellFont(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // The font used to render the cell's text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellFont") oMethod:iMemberid := 105 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellFont(; col,; // AS LONG row,; // AS LONG uParam003; // REF OBJECT ) CLASS ITableItem // The font used to render the cell's text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellFont") oMethod:iMemberid := 105 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ResizeToFitText(; IgnoreCaption; // AS LOGIC ) CLASS ITableItem // Makes all table cells big enough to fit their text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ResizeToFitText") oMethod:iMemberid := 106 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RowFromPoint(; x,; // AS LONG y; // AS LONG ) CLASS ITableItem // Gets the index of the row that contains the specified point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RowFromPoint") oMethod:iMemberid := 107 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ColumnFromPoint(; x,; // AS LONG y; // AS LONG ) CLASS ITableItem // Gets the index of the column that contains the specified point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ColumnFromPoint") oMethod:iMemberid := 108 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EnableStyledText( ) CLASS ITableItem // Enables or disables rich text formatting. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableStyledText") oMethod:iMemberid := 109 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EnableStyledText(; uParam001; // AS LOGIC ) CLASS ITableItem // Enables or disables rich text formatting. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableStyledText") oMethod:iMemberid := 109 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellToolTip(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Gets or sets the tooltip text associated with a cell. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellToolTip") oMethod:iMemberid := 110 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CellToolTip(; col,; // AS LONG row,; // AS LONG uParam003; // AS STRING ) CLASS ITableItem // Gets or sets the tooltip text associated with a cell. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellToolTip") oMethod:iMemberid := 110 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ChangeRelation(; arrow,; // REF OBJECT row,; // AS LONG rel; // AS USERTYPE (LONG) ) CLASS ITableItem // Change the arrow's row. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ChangeRelation") oMethod:iMemberid := 111 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH + VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Clone( ) CLASS ITableItem // Creates a copy of this table. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Clone") oMethod:iMemberid := 112 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) ACCESS CustomDraw( ) CLASS ITableItem // Gets or sets the type of custom drawing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CustomDraw") oMethod:iMemberid := 113 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CustomDraw(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // Gets or sets the type of custom drawing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CustomDraw") oMethod:iMemberid := 113 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellType(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // Specifies what type of user interface widget is displayed by this cell. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellType") oMethod:iMemberid := 114 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CellType(; col,; // AS LONG row,; // AS LONG uParam003; // AS USERTYPE (LONG) ) CLASS ITableItem // Specifies what type of user interface widget is displayed by this cell. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellType") oMethod:iMemberid := 114 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CellValue(; col,; // AS LONG row; // AS LONG ) CLASS ITableItem // A value associated with user interface widget displayed by this cell. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellValue") oMethod:iMemberid := 115 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CellValue(; col,; // AS LONG row,; // AS LONG uParam003; // AS LONG ) CLASS ITableItem // A value associated with user interface widget displayed by this cell. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CellValue") oMethod:iMemberid := 115 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 3 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CaptionFillColor2( ) CLASS ITableItem // The table Caption area is filled with this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionFillColor2") oMethod:iMemberid := 116 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CaptionFillColor2(; uParam001; // AS USERTYPE (LONG) ) CLASS ITableItem // The table Caption area is filled with this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionFillColor2") oMethod:iMemberid := 116 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CaptionGradientAngle( ) CLASS ITableItem // The angle of the gradient used to fill the table's caption area. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionGradientAngle") oMethod:iMemberid := 117 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_R4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CaptionGradientAngle(; uParam001; // AS FLOAT (REAL4) ) CLASS ITableItem // The angle of the gradient used to fill the table's caption area. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CaptionGradientAngle") oMethod:iMemberid := 117 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_R4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS count( ) CLASS ITables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("count") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Tag( ) CLASS IGroupItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Tag(; uParam001; // AS LONG ) CLASS IGroupItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DeleteSubordinates( ) CLASS IGroupItem // Deletes the subordinate objects and groups in the hierarchy LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DeleteSubordinates") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Visible( ) CLASS IGroupItem // Shows or hides all items in a group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Visible(; uParam001; // AS LOGIC ) CLASS IGroupItem // Shows or hides all items in a group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AttachmentCount( ) CLASS IGroupItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachmentCount") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetAttachmentInfo(; Index,; // AS LONG type,; // REF OBJECT data,; // REF LONG prcLeft,; // REF LONG prcTop,; // REF LONG prcRight,; // REF LONG prcBottom,; // REF LONG obj; // REF OBJECT ) CLASS IGroupItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetAttachmentInfo") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 8 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_PDISPATCH + VTS_PI4 + VTS_PI4 + VTS_PI4 + VTS_PI4 + VTS_PI4 + VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FollowMasterRotation( ) CLASS IGroupItem // Specifies whether the positions of subordinates change when the master item is rotated. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FollowMasterRotation") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FollowMasterRotation(; uParam001; // AS LOGIC ) CLASS IGroupItem // Specifies whether the positions of subordinates change when the master item is rotated. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FollowMasterRotation") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AttachToLongestHSegment(; obj; // AS OBJECT ) CLASS IGroupItem // Adds an item to the group, maintaining its relative position to the longest horizontal segment of the master arrow. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AttachToLongestHSegment") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS LayoutStyle( ) CLASS IBoxItem // Layout direction and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutStyle") oMethod:iMemberid := 60 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN LayoutStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Layout direction and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutStyle") oMethod:iMemberid := 60 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS UserString( ) CLASS IBoxItem // User string associated with the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserString") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN UserString(; uParam001; // AS STRING ) CLASS IBoxItem // User string associated with the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserString") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD MoveTo(; x,; // AS LONG y; // AS LONG ) CLASS IBoxItem // Sets the box position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MoveTo") oMethod:iMemberid := 62 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetSize(; width,; // AS LONG height; // AS LONG ) CLASS IBoxItem // Sets the box size LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetSize") oMethod:iMemberid := 63 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SubordinateGroup( ) CLASS IBoxItem // Gets the group of subordinate objects in a hierarchy LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SubordinateGroup") oMethod:iMemberid := 64 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS MasterGroup( ) CLASS IBoxItem // Gets the master group in a hierarchy LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MasterGroup") oMethod:iMemberid := 65 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS AllowContainment( ) CLASS IBoxItem // Specifies if the box can be put in a container LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowContainment") oMethod:iMemberid := 66 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowContainment(; uParam001; // AS LOGIC ) CLASS IBoxItem // Specifies if the box can be put in a container LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowContainment") oMethod:iMemberid := 66 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AxControlId( ) CLASS IBoxItem // Class identifier of an ActiveX control hosted in the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxControlId") oMethod:iMemberid := 67 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AxControlId(; uParam001; // AS STRING ) CLASS IBoxItem // Class identifier of an ActiveX control hosted in the box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxControlId") oMethod:iMemberid := 67 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ControlActivation( ) CLASS IBoxItem // Specifies when the control hosted in a box gets activated LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ControlActivation") oMethod:iMemberid := 68 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ControlActivation(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Specifies when the control hosted in a box gets activated LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ControlActivation") oMethod:iMemberid := 68 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ActivateControl( ) CLASS IBoxItem // Makes the hosted ActiveX control interactive LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ActivateControl") oMethod:iMemberid := 69 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DeactivateControl( ) CLASS IBoxItem // Makes the hosted ActiveX control uninteractive LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DeactivateControl") oMethod:iMemberid := 70 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AxRawPtr( ) CLASS IBoxItem // Gets raw interface pointer to the hosted OCX LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxRawPtr") oMethod:iMemberid := 71 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_UNKNOWN uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AxControl( ) CLASS IBoxItem // Gets a dispatch pointer to the hosted OCX LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxControl") oMethod:iMemberid := 72 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := iif( uRetValue:pInterface != NULL_PTR , OLEAutoObject{uRetValue}, NULL_OBJECT) RETURN (uRetValue) ACCESS SelStyle( ) CLASS IBoxItem // Selection/manipulation handles style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelStyle") oMethod:iMemberid := 73 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN SelStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Selection/manipulation handles style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelStyle") oMethod:iMemberid := 73 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowInplaceEdit( ) CLASS IBoxItem // Specifies whether the box can be edited in-place LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowInplaceEdit") oMethod:iMemberid := 74 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowInplaceEdit(; uParam001; // AS LOGIC ) CLASS IBoxItem // Specifies whether the box can be edited in-place LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowInplaceEdit") oMethod:iMemberid := 74 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BindToControl(; ctrl,; // AS USUAL hwnd; // AS USERTYPE (LONG) ) CLASS IBoxItem // Binds a box to HWND LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BindToControl") oMethod:iMemberid := 75 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT + VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Unbind( ) CLASS IBoxItem // Unbinds a box from previously bound HWND LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Unbind") oMethod:iMemberid := 76 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS shape( ) CLASS IBoxItem // The shape assigned to this box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("shape") oMethod:iMemberid := 77 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IShapeTemplate{uRetValue} RETURN (uRetValue) CLASS IShapeTemplate INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IShapeTemplate IF (ObjID=NIL) ObjId := "FlowChartPro.ShapeTemplate.4.5" ENDIF SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 31 SELF:_dwVars := 0 RETURN SELF METHOD AddOutlineStraight(; x,; // AS SHORT y; // AS SHORT ) CLASS IShapeTemplate // Adds a straight segment to the template LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddOutlineStraight") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddOutlineBezier(; x,; // AS SHORT y,; // AS SHORT x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2; // AS SHORT ) CLASS IShapeTemplate // Adds a Bezier segment to the template LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddOutlineBezier") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddDecorationLine(; x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2; // AS SHORT ) CLASS IShapeTemplate // Add a decoration line LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddDecorationLine") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddDecorationBezier(; x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2,; // AS SHORT x3,; // AS SHORT y3,; // AS SHORT x4,; // AS SHORT y4; // AS SHORT ) CLASS IShapeTemplate // Add a decoration bezier curve LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddDecorationBezier") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 8 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddDecorationEllipse(; x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2; // AS SHORT ) CLASS IShapeTemplate // Add a decoration ellipse LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddDecorationEllipse") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddTextStraight(; x,; // AS SHORT y; // AS SHORT ) CLASS IShapeTemplate // Adds a straight segment to the text area definition LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddTextStraight") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddTextBezier(; x,; // AS SHORT y,; // AS SHORT x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2; // AS SHORT ) CLASS IShapeTemplate // Adds a Bezier segment to the text are definition LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddTextBezier") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShapeId( ) CLASS IShapeTemplate // Gets the string id of a shape template LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShapeId") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AnchorPattern( ) CLASS IShapeTemplate // Default anchor pattern for shapes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPattern") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AnchorPattern(; uParam001; // AS STRING ) CLASS IShapeTemplate // Default anchor pattern for shapes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPattern") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CompleteDefinition(; ShapeId; // AS STRING ) CLASS IShapeTemplate // Complete the shape definition LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CompleteDefinition") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddOutlineArc(; x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2,; // AS SHORT angle,; // AS SHORT sweep; // AS SHORT ) CLASS IShapeTemplate // Adds an arc segment to the shape outline LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddOutlineArc") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddDecorationArc(; x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2,; // AS SHORT angle,; // AS SHORT sweep; // AS SHORT ) CLASS IShapeTemplate // Adds an arc segment as a decoration LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddDecorationArc") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD AddTextArc(; x1,; // AS SHORT y1,; // AS SHORT x2,; // AS SHORT y2,; // AS SHORT angle,; // AS SHORT sweep; // AS SHORT ) CLASS IShapeTemplate // Adds an arc segment to the text area outline LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddTextArc") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HorizontalScale( ) CLASS IShapeTemplate // Horizontal scale of the definition coordinates. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HorizontalScale") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HorizontalScale(; uParam001; // AS SHORT ) CLASS IShapeTemplate // Horizontal scale of the definition coordinates. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HorizontalScale") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS VerticalScale( ) CLASS IShapeTemplate // Vertical scale of the definition coordinates. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VerticalScale") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN VerticalScale(; uParam001; // AS SHORT ) CLASS IShapeTemplate // Vertical scale of the definition coordinates. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VerticalScale") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetDefinition(; defDescr,; // AS SHORT definitionPtr; // REF LONG ) CLASS IShapeTemplate // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetDefinition") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_PI4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Picture( ) CLASS IShapeTemplate // Specifies the position of the images displayed in instances of this shape. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Picture(; uParam001; // REF OBJECT ) CLASS IShapeTemplate // Specifies the position of the images displayed in instances of this shape. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Picture") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetPictureRect(; x,; // AS FLOAT (REAL4) y,; // AS FLOAT (REAL4) width,; // AS FLOAT (REAL4) height; // AS FLOAT (REAL4) ) CLASS IShapeTemplate // Sets the position of the images displayed in instances of this shape. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetPictureRect") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_R4 + VTS_R4 + VTS_R4 + VTS_R4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD StartFilledDecoration(; FillColor; // AS USERTYPE (LONG) ) CLASS IShapeTemplate // Begins a decoration filled with color. Subsequent AddOutline* calls of define the new decoration until EndFilledDecoration is called LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("StartFilledDecoration") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndFilledDecoration( ) CLASS IShapeTemplate // Finishes definition of current filled decoration. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndFilledDecoration") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN shape(; uParam001; // REF OBJECT ) CLASS IBoxItem // The shape assigned to this box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("shape") oMethod:iMemberid := 77 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShapeOrientation( ) CLASS IBoxItem // Rotation applied to the box shape LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShapeOrientation") oMethod:iMemberid := 78 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShapeOrientation(; uParam001; // AS SHORT ) CLASS IBoxItem // Rotation applied to the box shape LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShapeOrientation") oMethod:iMemberid := 78 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AnchorPattern( ) CLASS IBoxItem // Pattern of anchor points assigned to this box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPattern") oMethod:iMemberid := 79 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IAnchorPattern{uRetValue} RETURN (uRetValue) ASSIGN AnchorPattern(; uParam001; // REF OBJECT ) CLASS IBoxItem // Pattern of anchor points assigned to this box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPattern") oMethod:iMemberid := 79 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Printable( ) CLASS IBoxItem // Enables or disables printing a box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 80 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Printable(; uParam001; // AS LOGIC ) CLASS IBoxItem // Enables or disables printing a box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 80 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS VariantTag( ) CLASS IBoxItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 81 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name IF IsInstanceOfUsual(uRetValue, #IDispatch) uRetValue := OleAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN VariantTag(; uParam001; // AS USUAL ) CLASS IBoxItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 81 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EnableStyledText( ) CLASS IBoxItem // Enables or disables rich text formatting LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableStyledText") oMethod:iMemberid := 82 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EnableStyledText(; uParam001; // AS LOGIC ) CLASS IBoxItem // Enables or disables rich text formatting LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableStyledText") oMethod:iMemberid := 82 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BeginInplaceEdit( ) CLASS IBoxItem // Opens inplace-editing text control for a box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BeginInplaceEdit") oMethod:iMemberid := 83 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndInplaceEdit(; Accept; // AS LOGIC ) CLASS IBoxItem // Closes the inplace-editing text control for a box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndInplaceEdit") oMethod:iMemberid := 84 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FillColorAlpha( ) CLASS IBoxItem // Specifies the box' semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColorAlpha") oMethod:iMemberid := 85 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FillColorAlpha(; uParam001; // AS SHORT ) CLASS IBoxItem // Specifies the box' semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColorAlpha") oMethod:iMemberid := 85 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IgnoreLayout( ) CLASS IBoxItem // Gets or sets whether layout algorithms ignore this item. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreLayout") oMethod:iMemberid := 86 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IgnoreLayout(; uParam001; // AS LOGIC ) CLASS IBoxItem // Gets or sets whether layout algorithms ignore this item. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreLayout") oMethod:iMemberid := 86 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PlainText( ) CLASS IBoxItem // Returns the plain box text with no embedded formatting tags. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PlainText") oMethod:iMemberid := 87 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Obstacle( ) CLASS IBoxItem // Specifies whether routed arrows should consider this box an obstacle. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Obstacle") oMethod:iMemberid := 88 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Obstacle(; uParam001; // AS LOGIC ) CLASS IBoxItem // Specifies whether routed arrows should consider this box an obstacle. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Obstacle") oMethod:iMemberid := 88 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HyperLink( ) CLASS IBoxItem // A hyperlink associated with the box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HyperLink") oMethod:iMemberid := 89 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HyperLink(; uParam001; // AS STRING ) CLASS IBoxItem // A hyperlink associated with the box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HyperLink") oMethod:iMemberid := 89 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Constraints(; constraint; // AS USERTYPE (LONG) ) CLASS IBoxItem // Constraints applied to interactive modification of a box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Constraints") oMethod:iMemberid := 90 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Constraints(; constraint,; // AS USERTYPE (LONG) uParam002; // AS SHORT ) CLASS IBoxItem // Constraints applied to interactive modification of a box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Constraints") oMethod:iMemberid := 90 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT + VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD PutInContainer(; container; // REF OBJECT ) CLASS IBoxItem // Puts the box into a container box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PutInContainer") oMethod:iMemberid := 91 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RemoveFromContainer( ) CLASS IBoxItem // Removes the box from its container LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RemoveFromContainer") oMethod:iMemberid := 92 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS WindowFrame( ) CLASS IBoxItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("WindowFrame") oMethod:iMemberid := 93 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN WindowFrame(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("WindowFrame") oMethod:iMemberid := 93 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RotationAngle( ) CLASS IBoxItem // Gets or sets the rotation angle of this box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RotationAngle") oMethod:iMemberid := 94 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_R4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RotationAngle(; uParam001; // AS FLOAT (REAL4) ) CLASS IBoxItem // Gets or sets the rotation angle of this box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RotationAngle") oMethod:iMemberid := 94 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_R4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RotateContents( ) CLASS IBoxItem // Gets or sets whether box picture and text rotate along with it. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RotateContents") oMethod:iMemberid := 95 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RotateContents(; uParam001; // AS LOGIC ) CLASS IBoxItem // Gets or sets whether box picture and text rotate along with it. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RotateContents") oMethod:iMemberid := 95 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DecorationColor( ) CLASS IBoxItem // Color of the shape decoration lines. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DecorationColor") oMethod:iMemberid := 96 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN DecorationColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Color of the shape decoration lines. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DecorationColor") oMethod:iMemberid := 96 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowIncomingArrows( ) CLASS IBoxItem // Specifies whether users are allowed to draw incoming arrows to this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowIncomingArrows") oMethod:iMemberid := 97 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowIncomingArrows(; uParam001; // AS LOGIC ) CLASS IBoxItem // Specifies whether users are allowed to draw incoming arrows to this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowIncomingArrows") oMethod:iMemberid := 97 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowOutgoingArrows( ) CLASS IBoxItem // Specifies whether users are allowed to draw outgoing arrows from this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowOutgoingArrows") oMethod:iMemberid := 98 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowOutgoingArrows(; uParam001; // AS LOGIC ) CLASS IBoxItem // Specifies whether users are allowed to draw outgoing arrows from this node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowOutgoingArrows") oMethod:iMemberid := 98 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RotateText( ) CLASS IBoxItem // Gets or sets whether the box label rotate along with the box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RotateText") oMethod:iMemberid := 99 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RotateText(; uParam001; // AS LOGIC ) CLASS IBoxItem // Gets or sets whether the box label rotate along with the box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RotateText") oMethod:iMemberid := 99 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Repaint( ) CLASS IBoxItem // Repaints the box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Repaint") oMethod:iMemberid := 100 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Clone( ) CLASS IBoxItem // Creates a copy of this box. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Clone") oMethod:iMemberid := 101 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) METHOD ResizeToFitChildren( ) CLASS IBoxItem // Resizes a container box to fit its child nodes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ResizeToFitChildren") oMethod:iMemberid := 102 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AutoResizeContainer( ) CLASS IBoxItem // Gets or sets whether container boxes should resize automatically to fit their children. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoResizeContainer") oMethod:iMemberid := 103 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AutoResizeContainer(; uParam001; // AS LOGIC ) CLASS IBoxItem // Gets or sets whether container boxes should resize automatically to fit their children. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoResizeContainer") oMethod:iMemberid := 103 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TextAntiAliasing( ) CLASS IBoxItem // Specifies the type of text anti aliasing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextAntiAliasing") oMethod:iMemberid := 104 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TextAntiAliasing(; uParam001; // AS USERTYPE (LONG) ) CLASS IBoxItem // Specifies the type of text anti aliasing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextAntiAliasing") oMethod:iMemberid := 104 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FrameColorAlpha( ) CLASS IBoxItem // Specifies the box' frame semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FrameColorAlpha") oMethod:iMemberid := 105 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FrameColorAlpha(; uParam001; // AS SHORT ) CLASS IBoxItem // Specifies the box' frame semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FrameColorAlpha") oMethod:iMemberid := 105 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DestinationBox( ) CLASS IArrowItem // The box the arrow is pointing to LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DestinationBox") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) ACCESS Segments( ) CLASS IArrowItem // The number of the arrow segments LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Segments") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Segments(; uParam001; // AS SHORT ) CLASS IArrowItem // The number of the arrow segments LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Segments") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Text( ) CLASS IArrowItem // This text is displayed near the middle of the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Text") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Text(; uParam001; // AS STRING ) CLASS IArrowItem // This text is displayed near the middle of the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Text") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TextColor( ) CLASS IArrowItem // The arrow text is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextColor") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TextColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // The arrow text is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextColor") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Tag( ) CLASS IArrowItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Tag(; uParam001; // AS LONG ) CLASS IArrowItem // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenStyle( ) CLASS IArrowItem // The arrow is painted with pen of this style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // The arrow is painted with pen of this style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenWidth( ) CLASS IArrowItem // The arrow is painted with pen of this width LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PenWidth(; uParam001; // AS LONG ) CLASS IArrowItem // The arrow is painted with pen of this width LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowHead( ) CLASS IArrowItem // Defines the shape of the arrow head LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHead") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowHead(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Defines the shape of the arrow head LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHead") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FillColor( ) CLASS IArrowItem // The color of the arrow-head interior LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FillColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // The color of the arrow-head interior LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColor") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Locked( ) CLASS IArrowItem // Prevents the user from modifying the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Locked(; uParam001; // AS LOGIC ) CLASS IArrowItem // Prevents the user from modifying the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BoundingRect(; left,; // REF LONG top,; // REF LONG right,; // REF LONG bottom; // REF LONG ) CLASS IArrowItem // Returns the bounding rectangle position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoundingRect") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PI4 + VTS_PI4 + VTS_PI4 + VTS_PI4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetCArrow( ) CLASS IArrowItem // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetCArrow") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Selected( ) CLASS IArrowItem // Returns TRUE if the arrow is selected LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Selected") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Dynamic( ) CLASS IArrowItem // Defines how the end-points move when modifying a connected box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Dynamic") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Dynamic(; uParam001; // AS LOGIC ) CLASS IArrowItem // Defines how the end-points move when modifying a connected box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Dynamic") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS OriginTable( ) CLASS IArrowItem // The table from which the arrow is coming out LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OriginTable") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) ACCESS DestinationTable( ) CLASS IArrowItem // The table the arrow is pointing to LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DestinationTable") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) ACCESS OriginType( ) CLASS IArrowItem // The type of the object from which the arrow is coming out LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OriginType") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS DestinationType( ) CLASS IArrowItem // The type of the object the arrow is pointing to LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DestinationType") oMethod:iMemberid := 21 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD ZLevelUp( ) CLASS IArrowItem // Moves the arrow up in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelUp") oMethod:iMemberid := 22 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZLevelDown( ) CLASS IArrowItem // Moves the arrow down in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelDown") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZBottom( ) CLASS IArrowItem // Moves the arrow at the bottom of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZBottom") oMethod:iMemberid := 24 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZTop( ) CLASS IArrowItem // Moves the arrow at the top of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZTop") oMethod:iMemberid := 25 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ZIndex( ) CLASS IArrowItem // The index of the arrow in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ZIndex(; uParam001; // AS LONG ) CLASS IArrowItem // The index of the arrow in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PrpStartOrientation( ) CLASS IArrowItem // Defines the orientation of the first segment of perpendicular arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrpStartOrientation") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PrpStartOrientation(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Defines the orientation of the first segment of perpendicular arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrpStartOrientation") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BeginUndoRecord(; inclConnected; // AS LOGIC ) CLASS IArrowItem // Start recording programmatic operations on this arrow for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BeginUndoRecord") oMethod:iMemberid := 28 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndUndoRecord( ) CLASS IArrowItem // Stop recording programmatic operations on this arrow for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndUndoRecord") oMethod:iMemberid := 29 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetX( ) CLASS IArrowItem // Horizontal offset of the arrow shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 30 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetX(; uParam001; // AS LONG ) CLASS IArrowItem // Horizontal offset of the arrow shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 30 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetY( ) CLASS IArrowItem // Vertical offset of the arrow shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 31 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetY(; uParam001; // AS LONG ) CLASS IArrowItem // Vertical offset of the arrow shadow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 31 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CtrlPtX(; Index; // AS LONG ) CLASS IArrowItem // X coordinate of arrow control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtX") oMethod:iMemberid := 32 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CtrlPtX(; Index,; // AS LONG uParam002; // AS LONG ) CLASS IArrowItem // X coordinate of arrow control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtX") oMethod:iMemberid := 32 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CtrlPtY(; Index; // AS LONG ) CLASS IArrowItem // Y coordinate of arrow control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtY") oMethod:iMemberid := 33 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CtrlPtY(; Index,; // AS LONG uParam002; // AS LONG ) CLASS IArrowItem // Y coordinate of arrow control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtY") oMethod:iMemberid := 33 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CtrlPtCount( ) CLASS IArrowItem // Number of arrow control points LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtCount") oMethod:iMemberid := 34 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Update( ) CLASS IArrowItem // Updates arrow-head points and redraws the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Update") oMethod:iMemberid := 35 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ExpectedDestination( ) CLASS IArrowItem // Expected destination, for use in RequestCreate event LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ExpectedDestination") oMethod:iMemberid := 36 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := iif( uRetValue:pInterface != NULL_PTR , OLEAutoObject{uRetValue}, NULL_OBJECT) RETURN (uRetValue) ACCESS ArrowHeadSize( ) CLASS IArrowItem // Size of arrowhead LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHeadSize") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowHeadSize(; uParam001; // AS SHORT ) CLASS IArrowItem // Size of arrowhead LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHeadSize") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowBase( ) CLASS IArrowItem // Defines the shape of the arrow base LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBase") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowBase(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Defines the shape of the arrow base LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBase") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowBaseSize( ) CLASS IArrowItem // Size of arrow-base shape LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBaseSize") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowBaseSize(; uParam001; // AS SHORT ) CLASS IArrowItem // Size of arrow-base shape LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBaseSize") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IntermArrowHead( ) CLASS IArrowItem // Defines the shape of intermediate arrowheads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermArrowHead") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN IntermArrowHead(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Defines the shape of intermediate arrowheads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermArrowHead") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IntermHeadSize( ) CLASS IArrowItem // Size of intermediate arrow heads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermHeadSize") oMethod:iMemberid := 41 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IntermHeadSize(; uParam001; // AS SHORT ) CLASS IArrowItem // Size of intermediate arrow heads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermHeadSize") oMethod:iMemberid := 41 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Visible( ) CLASS IArrowItem // Visibility status of the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Visible(; uParam001; // AS LOGIC ) CLASS IArrowItem // Visibility status of the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS UserData( ) CLASS IArrowItem // User data associated with the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserData") oMethod:iMemberid := 43 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN UserData(; uParam001; // AS LONG ) CLASS IArrowItem // User data associated with the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserData") oMethod:iMemberid := 43 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS UserString( ) CLASS IArrowItem // User string associated with the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserString") oMethod:iMemberid := 44 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN UserString(; uParam001; // AS STRING ) CLASS IArrowItem // User string associated with the arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UserString") oMethod:iMemberid := 44 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowMoveStart( ) CLASS IArrowItem // Specifies whether user is allowed to move the first arrow point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowMoveStart") oMethod:iMemberid := 45 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowMoveStart(; uParam001; // AS LOGIC ) CLASS IArrowItem // Specifies whether user is allowed to move the first arrow point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowMoveStart") oMethod:iMemberid := 45 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowMoveEnd( ) CLASS IArrowItem // Specifies whether user is allowed to move the last arrow point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowMoveEnd") oMethod:iMemberid := 46 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowMoveEnd(; uParam001; // AS LOGIC ) CLASS IArrowItem // Specifies whether user is allowed to move the last arrow point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowMoveEnd") oMethod:iMemberid := 46 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SubordinateGroup( ) CLASS IArrowItem // Gets the group of subordinate objects in a hierarchy LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SubordinateGroup") oMethod:iMemberid := 47 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS OrgnIndex( ) CLASS IArrowItem // Index of origin row or anchor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OrgnIndex") oMethod:iMemberid := 48 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DestIndex( ) CLASS IArrowItem // Index of destination row or anchor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DestIndex") oMethod:iMemberid := 49 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AutoRoute( ) CLASS IArrowItem // Specifies whether the arrow is routed automatically LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoRoute") oMethod:iMemberid := 50 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AutoRoute(; uParam001; // AS LOGIC ) CLASS IArrowItem // Specifies whether the arrow is routed automatically LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoRoute") oMethod:iMemberid := 50 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Printable( ) CLASS IArrowItem // Enables or disables printing an arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 51 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Printable(; uParam001; // AS LOGIC ) CLASS IArrowItem // Enables or disables printing an arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 51 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS VariantTag( ) CLASS IArrowItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 52 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name IF IsInstanceOfUsual(uRetValue, #IDispatch) uRetValue := OleAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN VariantTag(; uParam001; // AS USUAL ) CLASS IArrowItem // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 52 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FillColorAlpha( ) CLASS IArrowItem // Specifies the arrow heads' semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColorAlpha") oMethod:iMemberid := 53 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FillColorAlpha(; uParam001; // AS SHORT ) CLASS IArrowItem // Specifies the arrow heads' semitransparency. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FillColorAlpha") oMethod:iMemberid := 53 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IgnoreLayout( ) CLASS IArrowItem // Gets or sets whether layout algorithms ignore this item. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreLayout") oMethod:iMemberid := 54 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IgnoreLayout(; uParam001; // AS LOGIC ) CLASS IArrowItem // Gets or sets whether layout algorithms ignore this item. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreLayout") oMethod:iMemberid := 54 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD IntersectsNode(; node; // AS OBJECT ) CLASS IArrowItem // Determines if the arrow intersects a node LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntersectsNode") oMethod:iMemberid := 55 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Rigid( ) CLASS IArrowItem // If enabled, nodes connected with this arrow move together simultaneously. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Rigid") oMethod:iMemberid := 56 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Rigid(; uParam001; // AS LOGIC ) CLASS IArrowItem // If enabled, nodes connected with this arrow move together simultaneously. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Rigid") oMethod:iMemberid := 56 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SnapToNodeBorder( ) CLASS IArrowItem // If enabled, arrow end points are aligned to node outline when modifying them. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapToNodeBorder") oMethod:iMemberid := 57 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN SnapToNodeBorder(; uParam001; // AS LOGIC ) CLASS IArrowItem // If enabled, arrow end points are aligned to node outline when modifying them. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapToNodeBorder") oMethod:iMemberid := 57 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TextStyle( ) CLASS IArrowItem // Specifies the orientation and placement of arrow's text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextStyle") oMethod:iMemberid := 58 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TextStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Specifies the orientation and placement of arrow's text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextStyle") oMethod:iMemberid := 58 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelStyle( ) CLASS IArrowItem // Specifies the appearance of selection handles. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelStyle") oMethod:iMemberid := 59 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN SelStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Specifies the appearance of selection handles. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelStyle") oMethod:iMemberid := 59 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Length( ) CLASS IArrowItem // Returns the total length of the arrow's segments. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Length") oMethod:iMemberid := 60 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PrpHorzFirst( ) CLASS IArrowItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrpHorzFirst") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PrpHorzFirst(; uParam001; // AS LOGIC ) CLASS IArrowItem LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrpHorzFirst") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ToolTip( ) CLASS IArrowItem // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 62 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ToolTip(; uParam001; // AS STRING ) CLASS IArrowItem // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 62 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetDefinition(; defDescr; // AS SHORT ) CLASS IArrowItem // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetDefinition") oMethod:iMemberid := 63 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS OrgnAnchor( ) CLASS IArrowItem // Index of the origin anchor point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OrgnAnchor") oMethod:iMemberid := 64 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN OrgnAnchor(; uParam001; // AS LONG ) CLASS IArrowItem // Index of the origin anchor point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OrgnAnchor") oMethod:iMemberid := 64 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DestAnchor( ) CLASS IArrowItem // Index of the destination anchor point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DestAnchor") oMethod:iMemberid := 65 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN DestAnchor(; uParam001; // AS LONG ) CLASS IArrowItem // Index of the destination anchor point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DestAnchor") oMethod:iMemberid := 65 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Origin( ) CLASS IArrowItem // Gets or sets the origin node of this arrow. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Origin") oMethod:iMemberid := 66 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := iif( uRetValue:pInterface != NULL_PTR , OLEAutoObject{uRetValue}, NULL_OBJECT) RETURN (uRetValue) ASSIGN Origin(; uParam001; // AS OBJECT ) CLASS IArrowItem // Gets or sets the origin node of this arrow. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Origin") oMethod:iMemberid := 66 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Destination( ) CLASS IArrowItem // Gets or sets the destination node of this arrow. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Destination") oMethod:iMemberid := 67 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := iif( uRetValue:pInterface != NULL_PTR , OLEAutoObject{uRetValue}, NULL_OBJECT) RETURN (uRetValue) ASSIGN Destination(; uParam001; // AS OBJECT ) CLASS IArrowItem // Gets or sets the destination node of this arrow. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Destination") oMethod:iMemberid := 67 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Route( ) CLASS IArrowItem // Routes this link, regardless of whether the AutoRoute flag is enabled. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Route") oMethod:iMemberid := 68 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetTextPosition(; segment,; // AS LONG offset; // AS LONG ) CLASS IArrowItem // Sets the position of the arrow label. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetTextPosition") oMethod:iMemberid := 69 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Clone( ) CLASS IArrowItem // Creates a copy of this arrow. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Clone") oMethod:iMemberid := 70 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) ACCESS CustomDraw( ) CLASS IArrowItem // Gets or sets the type of custom drawing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CustomDraw") oMethod:iMemberid := 71 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN CustomDraw(; uParam001; // AS USERTYPE (LONG) ) CLASS IArrowItem // Gets or sets the type of custom drawing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CustomDraw") oMethod:iMemberid := 71 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS count( ) CLASS IArrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("count") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ChangeIndex(; arrow,; // REF OBJECT newIndex; // AS LONG ) CLASS IArrows // Changes the index of an arrow in the collection. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ChangeIndex") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS boxes( ) CLASS Flowchart // Collection of the boxes in the current document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("boxes") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxes{uRetValue} RETURN (uRetValue) ACCESS TextColor( ) CLASS Flowchart // Default value of the TextColor property of nex objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextColor") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TextColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value of the TextColor property of nex objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TextColor") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowStyle( ) CLASS Flowchart // Default arrow style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowStyle") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default arrow style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowStyle") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowSegments( ) CLASS Flowchart // Default segment count for new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowSegments") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowSegments(; uParam001; // AS SHORT ) CLASS Flowchart // Default segment count for new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowSegments") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ActiveItemType( ) CLASS Flowchart // The type of the active item LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ActiveItemType") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS ActiveBox( ) CLASS Flowchart // Reference to the active box if any LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ActiveBox") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) ACCESS ActiveArrow( ) CLASS Flowchart // Reference to the active arrow if any LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ActiveArrow") oMethod:iMemberid := 21 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) METHOD CreateBox(; x,; // AS LONG y,; // AS LONG width,; // AS LONG height; // AS LONG ) CLASS Flowchart // Creates a new box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateBox") oMethod:iMemberid := 22 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) METHOD CreateArrow(; pBoxSrc,; // REF OBJECT pBoxDst; // REF OBJECT ) CLASS Flowchart // Creates a new arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateArrow") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH + VTS_PDISPATCH oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) METHOD FindBox(; nTag; // AS LONG ) CLASS Flowchart // Finds the box with the given tag LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindBox") oMethod:iMemberid := 24 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) METHOD FindArrow(; nTag; // AS LONG ) CLASS Flowchart // Finds the arrow with the given tag LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindArrow") oMethod:iMemberid := 25 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) ACCESS StaticMode( ) CLASS Flowchart // Enable/disable manipulation of the chart objects by the user LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("StaticMode") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN StaticMode(; uParam001; // AS LOGIC ) CLASS Flowchart // Enable/disable manipulation of the chart objects by the user LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("StaticMode") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ScrollX( ) CLASS Flowchart // The document horizontal scroll position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollX") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ScrollX(; uParam001; // AS LONG ) CLASS Flowchart // The document horizontal scroll position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollX") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ScrollY( ) CLASS Flowchart // The document vertical scroll position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollY") oMethod:iMemberid := 28 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ScrollY(; uParam001; // AS LONG ) CLASS Flowchart // The document vertical scroll position LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollY") oMethod:iMemberid := 28 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ScrollTo(; x,; // AS LONG y; // AS LONG ) CLASS Flowchart // Scrolls the document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollTo") oMethod:iMemberid := 29 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ZoomFactor( ) CLASS Flowchart // The zoom factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomFactor") oMethod:iMemberid := 30 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ZoomFactor(; uParam001; // AS SHORT ) CLASS Flowchart // The zoom factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomFactor") oMethod:iMemberid := 30 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZoomIn( ) CLASS Flowchart // Increases the zoom factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomIn") oMethod:iMemberid := 31 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZoomOut( ) CLASS Flowchart // Decreases the zoom factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomOut") oMethod:iMemberid := 32 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicture(; FileName; // AS STRING ) CLASS Flowchart // Loads a background image from a file LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicture") oMethod:iMemberid := 33 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShowToolTips( ) CLASS Flowchart // Enables tool-tips LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowToolTips") oMethod:iMemberid := 34 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShowToolTips(; uParam001; // AS LOGIC ) CLASS Flowchart // Enables tool-tips LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowToolTips") oMethod:iMemberid := 34 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ToolTipStyle( ) CLASS Flowchart // The window style of the tool-tips LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTipStyle") oMethod:iMemberid := 35 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ToolTipStyle(; uParam001; // AS LONG ) CLASS Flowchart // The window style of the tool-tips LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTipStyle") oMethod:iMemberid := 35 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowRefLinks( ) CLASS Flowchart // Enable/disable reflexive links creation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowRefLinks") oMethod:iMemberid := 36 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowRefLinks(; uParam001; // AS LOGIC ) CLASS Flowchart // Enable/disable reflexive links creation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowRefLinks") oMethod:iMemberid := 36 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenStyle( ) CLASS Flowchart // The default pen style of new objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // The default pen style of new objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenWidth( ) CLASS Flowchart // The default pen width of new objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PenWidth(; uParam001; // AS LONG ) CLASS Flowchart // The default pen width of new objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetPolyShape(; count,; // AS SHORT ptc; // REF BYTE ) CLASS Flowchart // Sets the default polygon shape for new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetPolyShape") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_PUI1 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Behavior( ) CLASS Flowchart // Sets the control behavior on user`s actions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Behavior") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Behavior(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Sets the control behavior on user`s actions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Behavior") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetMouseCursor(; type,; // AS USERTYPE (LONG) Handle,; // AS USERTYPE (LONG) DestroyOld; // AS LOGIC ) CLASS Flowchart // Changes some of the used mouse cursors LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetMouseCursor") oMethod:iMemberid := 41 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT + VTS_VARIANT + VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowHead( ) CLASS Flowchart // Default value for the ArrowHead property of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHead") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowHead(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the ArrowHead property of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHead") oMethod:iMemberid := 42 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelectAfterCreate( ) CLASS Flowchart // Automatic selection after creation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectAfterCreate") oMethod:iMemberid := 43 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN SelectAfterCreate(; uParam001; // AS LOGIC ) CLASS Flowchart // Automatic selection after creation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectAfterCreate") oMethod:iMemberid := 43 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetShadowOffset(; x,; // AS LONG y; // AS LONG ) CLASS Flowchart // Sets the offset at which the shadows are drawn LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetShadowOffset") oMethod:iMemberid := 44 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ShowScrollers( ) CLASS Flowchart // Shows the scrollbars LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowScrollers") oMethod:iMemberid := 45 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD HideScrollers( ) CLASS Flowchart // Hides the scrollbars LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HideScrollers") oMethod:iMemberid := 46 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetDocSize(; left,; // AS LONG top,; // AS LONG right,; // AS LONG bottom; // AS LONG ) CLASS Flowchart // Sets the document extents LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetDocSize") oMethod:iMemberid := 47 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ClearAll( ) CLASS Flowchart // Deletes all objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClearAll") oMethod:iMemberid := 48 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SaveToFile(; FileName,; // AS STRING ClearDirty; // AS LOGIC ) CLASS Flowchart // Saves the flowchart document in a file LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SaveToFile") oMethod:iMemberid := 49 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadFromFile(; FileName; // AS STRING ) CLASS Flowchart // Loads the flowchart document from a file LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadFromFile") oMethod:iMemberid := 50 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxCustomDraw( ) CLASS Flowchart // Default for the CustomDraw property of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxCustomDraw") oMethod:iMemberid := 51 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxCustomDraw(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default for the CustomDraw property of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxCustomDraw") oMethod:iMemberid := 51 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelectedArrows( ) CLASS Flowchart // Collection of the selected arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectedArrows") oMethod:iMemberid := 52 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS SelectedBoxes( ) CLASS Flowchart // Collection of the selected boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectedBoxes") oMethod:iMemberid := 53 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxes{uRetValue} RETURN (uRetValue) METHOD AddToSelection(; pItem; // AS OBJECT ) CLASS Flowchart // Adds an object to the selection LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AddToSelection") oMethod:iMemberid := 54 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RemoveFromSelection(; pItem; // AS OBJECT ) CLASS Flowchart // Removes an object from the selection LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RemoveFromSelection") oMethod:iMemberid := 55 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ClearSelection( ) CLASS Flowchart // Clears the selection LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClearSelection") oMethod:iMemberid := 56 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DocPtToClientPt(; x,; // AS LONG y,; // AS LONG px,; // REF LONG py; // REF LONG ) CLASS Flowchart // Gets the client coordinates of a document point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DocPtToClientPt") oMethod:iMemberid := 57 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_PI4 + VTS_PI4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DeleteItem(; pItem; // AS OBJECT ) CLASS Flowchart // Deletes an object LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DeleteItem") oMethod:iMemberid := 58 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPredefShape(; nId; // AS LONG ) CLASS Flowchart // Loads one of the predefined shapes as default for new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPredefShape") oMethod:iMemberid := 59 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetX( ) CLASS Flowchart // Horizontal offset of the shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 60 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetX(; uParam001; // AS LONG ) CLASS Flowchart // Horizontal offset of the shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetX") oMethod:iMemberid := 60 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowOffsetY( ) CLASS Flowchart // Vertical offset of the shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowOffsetY(; uParam001; // AS LONG ) CLASS Flowchart // Vertical offset of the shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowOffsetY") oMethod:iMemberid := 61 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RestrObjsToDoc( ) CLASS Flowchart // Restriction of the object positions in the document extents LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RestrObjsToDoc") oMethod:iMemberid := 62 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN RestrObjsToDoc(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Restriction of the object positions in the document extents LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RestrObjsToDoc") oMethod:iMemberid := 62 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DynamicArrows( ) CLASS Flowchart // Default for the Dynamic property of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DynamicArrows") oMethod:iMemberid := 63 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN DynamicArrows(; uParam001; // AS LOGIC ) CLASS Flowchart // Default for the Dynamic property of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DynamicArrows") oMethod:iMemberid := 63 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RegExtrScrollers(; hwHorz,; // AS USERTYPE (LONG) hwVert; // AS USERTYPE (LONG) ) CLASS Flowchart // Registers external scrollbars with windowless version of the control LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RegExtrScrollers") oMethod:iMemberid := 64 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT + VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadPicFromRes(; hRsrcInst,; // AS USERTYPE (LONG) RsrcName,; // AS STRING RsrcType; // AS STRING ) CLASS Flowchart // Loads a background image from resources LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadPicFromRes") oMethod:iMemberid := 65 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT + VTS_BSTRW + VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetPolyShapeArray(; psaPoints; // AS ARRAY OF BYTE ) CLASS Flowchart // Sets the default polygon shape for new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetPolyShapeArray") oMethod:iMemberid := 66 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_AUI1 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AutoScroll( ) CLASS Flowchart // Automatically scroll when dragging the mouse outside the visible area LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoScroll") oMethod:iMemberid := 67 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AutoScroll(; uParam001; // AS LOGIC ) CLASS Flowchart // Automatically scroll when dragging the mouse outside the visible area LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoScroll") oMethod:iMemberid := 67 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableFillColor( ) CLASS Flowchart // Default value for the FillColor of new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableFillColor") oMethod:iMemberid := 68 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TableFillColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the FillColor of new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableFillColor") oMethod:iMemberid := 68 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableFrameColor( ) CLASS Flowchart // Default value for the FrameColor of new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableFrameColor") oMethod:iMemberid := 69 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TableFrameColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the FrameColor of new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableFrameColor") oMethod:iMemberid := 69 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS tables( ) CLASS Flowchart // Collection of the tables in the current document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("tables") oMethod:iMemberid := 70 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITables{uRetValue} RETURN (uRetValue) ACCESS ActiveTable( ) CLASS Flowchart // Reference to the active table if any LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ActiveTable") oMethod:iMemberid := 71 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) METHOD CreateTable(; x,; // AS LONG y,; // AS LONG width,; // AS LONG height; // AS LONG ) CLASS Flowchart // Creates a new table LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateTable") oMethod:iMemberid := 72 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) METHOD FindTable(; nTag; // AS LONG ) CLASS Flowchart // Finds the table with the given tag LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindTable") oMethod:iMemberid := 73 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) ACCESS SelectedTables( ) CLASS Flowchart // Collection of the selected tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectedTables") oMethod:iMemberid := 74 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITables{uRetValue} RETURN (uRetValue) METHOD CreateRelation(; pTableSrc,; // REF OBJECT nRowSrc,; // AS LONG pTableDst,; // REF OBJECT nRowDst; // AS LONG ) CLASS Flowchart // Creates a relation between two tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateRelation") oMethod:iMemberid := 75 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH + VTS_I4 + VTS_PDISPATCH + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) ACCESS TableRowsCount( ) CLASS Flowchart // Default row number for new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableRowsCount") oMethod:iMemberid := 76 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TableRowsCount(; uParam001; // AS LONG ) CLASS Flowchart // Default row number for new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableRowsCount") oMethod:iMemberid := 76 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableColumnsCount( ) CLASS Flowchart // Default column number for new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableColumnsCount") oMethod:iMemberid := 77 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TableColumnsCount(; uParam001; // AS LONG ) CLASS Flowchart // Default column number for new tables LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableColumnsCount") oMethod:iMemberid := 77 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CreateGroup(; mainObj; // AS OBJECT ) CLASS Flowchart // Creates a group of attached items LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateGroup") oMethod:iMemberid := 78 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS Groups( ) CLASS Flowchart // Collection of the groups in the current document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Groups") oMethod:iMemberid := 79 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroups{uRetValue} RETURN (uRetValue) CLASS IGroups INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IGroups SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 10 SELF:_dwVars := 0 RETURN SELF ACCESS _NewEnum( ) CLASS IGroups LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("_NewEnum") oMethod:iMemberid := -4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Item(; Index; // AS LONG ) CLASS IGroups LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Item") oMethod:iMemberid := 0 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS count( ) CLASS IGroups LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("count") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS MultiSelStyle( ) CLASS Flowchart // Visual style of multiple selection LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MultiSelStyle") oMethod:iMemberid := 80 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN MultiSelStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Visual style of multiple selection LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MultiSelStyle") oMethod:iMemberid := 80 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ModificationStart( ) CLASS Flowchart // Defines how the user can start object modification LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ModificationStart") oMethod:iMemberid := 81 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ModificationStart(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Defines how the user can start object modification LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ModificationStart") oMethod:iMemberid := 81 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableColWidth( ) CLASS Flowchart // Default width of table columns LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableColWidth") oMethod:iMemberid := 82 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TableColWidth(; uParam001; // AS LONG ) CLASS Flowchart // Default width of table columns LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableColWidth") oMethod:iMemberid := 82 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableRowHeight( ) CLASS Flowchart // Default height of table rows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableRowHeight") oMethod:iMemberid := 83 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TableRowHeight(; uParam001; // AS LONG ) CLASS Flowchart // Default height of table rows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableRowHeight") oMethod:iMemberid := 83 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableCaptionHeight( ) CLASS Flowchart // Default height of table captions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableCaptionHeight") oMethod:iMemberid := 84 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TableCaptionHeight(; uParam001; // AS LONG ) CLASS Flowchart // Default height of table captions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableCaptionHeight") oMethod:iMemberid := 84 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DestroyGroup(; group; // REF OBJECT ) CLASS Flowchart // Destroys a group LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DestroyGroup") oMethod:iMemberid := 85 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableCaption( ) CLASS Flowchart // Default table caption LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableCaption") oMethod:iMemberid := 86 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TableCaption(; uParam001; // AS STRING ) CLASS Flowchart // Default table caption LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableCaption") oMethod:iMemberid := 86 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DemoVersion( ) CLASS Flowchart // Check if this is a demo version of the control LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DemoVersion") oMethod:iMemberid := 87 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PrpArrowStartOrnt( ) CLASS Flowchart // Defines the orientation of the first segment of perpendicular arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrpArrowStartOrnt") oMethod:iMemberid := 88 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PrpArrowStartOrnt(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Defines the orientation of the first segment of perpendicular arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrpArrowStartOrnt") oMethod:iMemberid := 88 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableCellBorders( ) CLASS Flowchart // Visual style of table cell borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableCellBorders") oMethod:iMemberid := 89 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TableCellBorders(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Visual style of table cell borders LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableCellBorders") oMethod:iMemberid := 89 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Undo( ) CLASS Flowchart // Undo recent modification of the flowchart document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Undo") oMethod:iMemberid := 90 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Redo( ) CLASS Flowchart // Redo recently-undone action LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Redo") oMethod:iMemberid := 91 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD UndoPossible( ) CLASS Flowchart // Check if undo is possible at this moment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UndoPossible") oMethod:iMemberid := 92 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RedoPossible( ) CLASS Flowchart // Check if redo is possible at this moment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RedoPossible") oMethod:iMemberid := 93 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ClearUndoBuffer( ) CLASS Flowchart // Clears the undo/redo buffer, freeing allocated memory LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClearUndoBuffer") oMethod:iMemberid := 94 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS UndoDepth( ) CLASS Flowchart // Depth of the undo-buffer LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UndoDepth") oMethod:iMemberid := 95 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN UndoDepth(; uParam001; // AS LONG ) CLASS Flowchart // Depth of the undo-buffer LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UndoDepth") oMethod:iMemberid := 95 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CopyToClipboard( ) CLASS Flowchart // Copy the current selection to clipboard LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CopyToClipboard") oMethod:iMemberid := 96 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CutToClipboard( ) CLASS Flowchart // Cut the current selection and move it to the clipboard LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CutToClipboard") oMethod:iMemberid := 97 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD PasteFromClipboard( ) CLASS Flowchart // Paste objects stored in the clipboard to the flowchart document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PasteFromClipboard") oMethod:iMemberid := 98 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CanPasteFromClipboard( ) CLASS Flowchart // Check if there is appropriate data present in the clipboard LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CanPasteFromClipboard") oMethod:iMemberid := 99 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelectAfterPaste( ) CLASS Flowchart // Automatic selection of objects after paste LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectAfterPaste") oMethod:iMemberid := 100 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN SelectAfterPaste(; uParam001; // AS LOGIC ) CLASS Flowchart // Automatic selection of objects after paste LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectAfterPaste") oMethod:iMemberid := 100 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RegisterDragDrop( ) CLASS Flowchart // Registers the control as a target of OLE drag-and-drop operations LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RegisterDragDrop") oMethod:iMemberid := 101 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RevokeDragDrop( ) CLASS Flowchart // Revokes the registration of the control as a target for OLE drag-and-drop operations LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RevokeDragDrop") oMethod:iMemberid := 102 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DragDropMode( ) CLASS Flowchart // Defines how drag and drop operations are handled by FlowChartX LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DragDropMode") oMethod:iMemberid := 103 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN DragDropMode(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Defines how drag and drop operations are handled by FlowChartX LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DragDropMode") oMethod:iMemberid := 103 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FindShortestPath(; src,; // AS OBJECT dest; // AS OBJECT ) CLASS Flowchart // Find the shortest path between two chart objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindShortestPath") oMethod:iMemberid := 104 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_DISPATCH oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) METHOD FindAllPaths(; src,; // AS OBJECT dest; // AS OBJECT ) CLASS Flowchart // Find all paths between two chart objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindAllPaths") oMethod:iMemberid := 105 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_DISPATCH oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) METHOD ObjectFromPoint(; x,; // AS LONG y,; // AS LONG excludeLocked,; // AS LOGIC excludeSelected; // AS LOGIC ) CLASS Flowchart // Get the object containing a point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ObjectFromPoint") oMethod:iMemberid := 106 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_BOOL + VTS_BOOL oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := iif( uRetValue:pInterface != NULL_PTR , OLEAutoObject{uRetValue}, NULL_OBJECT) RETURN (uRetValue) ACCESS KbdActive( ) CLASS Flowchart // Respond to users keyboard actions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("KbdActive") oMethod:iMemberid := 107 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN KbdActive(; uParam001; // AS LOGIC ) CLASS Flowchart // Respond to users keyboard actions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("KbdActive") oMethod:iMemberid := 107 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ActiveMnpColor( ) CLASS Flowchart // Color of active object manipulation handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ActiveMnpColor") oMethod:iMemberid := 108 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ActiveMnpColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Color of active object manipulation handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ActiveMnpColor") oMethod:iMemberid := 108 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelMnpColor( ) CLASS Flowchart // Color of manipulation handles of objects in selection LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelMnpColor") oMethod:iMemberid := 109 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN SelMnpColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Color of manipulation handles of objects in selection LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelMnpColor") oMethod:iMemberid := 109 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DisabledMnpColor( ) CLASS Flowchart // Color of disabled manipulation handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DisabledMnpColor") oMethod:iMemberid := 110 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN DisabledMnpColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Color of disabled manipulation handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DisabledMnpColor") oMethod:iMemberid := 110 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ClientPtToDocPt(; x,; // AS LONG y,; // AS LONG px,; // REF LONG py; // REF LONG ) CLASS Flowchart // Gets the document coordinates of a client-area point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClientPtToDocPt") oMethod:iMemberid := 111 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_PI4 + VTS_PI4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ScreenPtToDocPt(; x,; // AS LONG y,; // AS LONG px,; // REF LONG py; // REF LONG ) CLASS Flowchart // Gets the document coordinates of a screen point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScreenPtToDocPt") oMethod:iMemberid := 112 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_PI4 + VTS_PI4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PathCount( ) CLASS Flowchart // Get the count of paths found with the last search operation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PathCount") oMethod:iMemberid := 113 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetPath(; Index; // AS LONG ) CLASS Flowchart // Get a path from those found with the last search operation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetPath") oMethod:iMemberid := 114 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) METHOD PrintChart(; bPrintInterior,; // AS LOGIC bPrintImages,; // AS LOGIC bPrintFrame,; // AS LOGIC bPrintHeader,; // AS LOGIC bPrintShadows,; // AS LOGIC sDocName; // AS STRING ) CLASS Flowchart // Display the standard Windows print dialog box and print the current diagram using the specified settings LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrintChart") oMethod:iMemberid := 115 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 6 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL + VTS_BOOL + VTS_BOOL + VTS_BOOL + VTS_BOOL + VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD PrintOnDev(; sDriver,; // AS STRING sDevice,; // AS STRING bPrintInterior,; // AS LOGIC bPrintImages,; // AS LOGIC bPrintFrame,; // AS LOGIC bPrintHeader,; // AS LOGIC bPrintShadows,; // AS LOGIC sDocName; // AS STRING ) CLASS Flowchart // Print the current diagram using the specified settings LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrintOnDev") oMethod:iMemberid := 116 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 8 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_BSTRW + VTS_BOOL + VTS_BOOL + VTS_BOOL + VTS_BOOL + VTS_BOOL + VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DetectCycle(; obj; // AS OBJECT ) CLASS Flowchart // Detects if there is a cycle including the specified object LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DetectCycle") oMethod:iMemberid := 117 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) METHOD FindCycle( ) CLASS Flowchart // Finds a cycle within the chart LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindCycle") oMethod:iMemberid := 118 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS CycleCount( ) CLASS Flowchart // Get the count of cycles found with the last cycle search operation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CycleCount") oMethod:iMemberid := 119 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetCycle(; Index; // AS LONG ) CLASS Flowchart // Get a cycle from those found with the last cycle search operation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetCycle") oMethod:iMemberid := 120 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS BoxSelStyle( ) CLASS Flowchart // Box selection style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxSelStyle") oMethod:iMemberid := 121 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxSelStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Box selection style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxSelStyle") oMethod:iMemberid := 121 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableSelStyle( ) CLASS Flowchart // Table selection style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableSelStyle") oMethod:iMemberid := 122 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TableSelStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Table selection style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableSelStyle") oMethod:iMemberid := 122 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowHeadSize( ) CLASS Flowchart // Size of arrowhead LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHeadSize") oMethod:iMemberid := 123 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowHeadSize(; uParam001; // AS SHORT ) CLASS Flowchart // Size of arrowhead LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowHeadSize") oMethod:iMemberid := 123 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShowDisabledHandles( ) CLASS Flowchart // Draw disabled mnp. handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowDisabledHandles") oMethod:iMemberid := 124 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShowDisabledHandles(; uParam001; // AS LOGIC ) CLASS Flowchart // Draw disabled mnp. handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowDisabledHandles") oMethod:iMemberid := 124 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ExpandOnIncoming( ) CLASS Flowchart // Expand/collapse direction LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ExpandOnIncoming") oMethod:iMemberid := 125 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ExpandOnIncoming(; uParam001; // AS LOGIC ) CLASS Flowchart // Expand/collapse direction LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ExpandOnIncoming") oMethod:iMemberid := 125 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxesExpandable( ) CLASS Flowchart // Default for boxes Expandable property LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxesExpandable") oMethod:iMemberid := 126 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN BoxesExpandable(; uParam001; // AS LOGIC ) CLASS Flowchart // Default for boxes Expandable property LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxesExpandable") oMethod:iMemberid := 126 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TablesScrollable( ) CLASS Flowchart // Default for tables Scrollable property LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TablesScrollable") oMethod:iMemberid := 127 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TablesScrollable(; uParam001; // AS LOGIC ) CLASS Flowchart // Default for tables Scrollable property LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TablesScrollable") oMethod:iMemberid := 127 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RecursiveExpand( ) CLASS Flowchart // When box is expanded its children are expanded too LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RecursiveExpand") oMethod:iMemberid := 128 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RecursiveExpand(; uParam001; // AS LOGIC ) CLASS Flowchart // When box is expanded its children are expanded too LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RecursiveExpand") oMethod:iMemberid := 128 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowsStyle( ) CLASS Flowchart // Shadows drawing style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowsStyle") oMethod:iMemberid := 129 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ShadowsStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Shadows drawing style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowsStyle") oMethod:iMemberid := 129 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowEndsMovable( ) CLASS Flowchart // Arrows end points are movable LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowEndsMovable") oMethod:iMemberid := 130 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowEndsMovable(; uParam001; // AS LOGIC ) CLASS Flowchart // Arrows end points are movable LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowEndsMovable") oMethod:iMemberid := 130 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxIncmAnchor( ) CLASS Flowchart // Default anchor point for box incoming arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxIncmAnchor") oMethod:iMemberid := 131 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxIncmAnchor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default anchor point for box incoming arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxIncmAnchor") oMethod:iMemberid := 131 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxOutgAnchor( ) CLASS Flowchart // Default anchor point for box outgoing arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxOutgAnchor") oMethod:iMemberid := 132 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxOutgAnchor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default anchor point for box outgoing arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxOutgAnchor") oMethod:iMemberid := 132 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowBase( ) CLASS Flowchart // Default value for the ArrowBase property of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBase") oMethod:iMemberid := 133 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowBase(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the ArrowBase property of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBase") oMethod:iMemberid := 133 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowBaseSize( ) CLASS Flowchart // Size of arrow-base shapes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBaseSize") oMethod:iMemberid := 134 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowBaseSize(; uParam001; // AS SHORT ) CLASS Flowchart // Size of arrow-base shapes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowBaseSize") oMethod:iMemberid := 134 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FindGroup(; Tag; // AS LONG ) CLASS Flowchart // Finds the group with the given tag LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindGroup") oMethod:iMemberid := 135 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGroupItem{uRetValue} RETURN (uRetValue) ACCESS IntermArrowHead( ) CLASS Flowchart // Default shape of intermediate arrowheads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermArrowHead") oMethod:iMemberid := 136 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN IntermArrowHead(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default shape of intermediate arrowheads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermArrowHead") oMethod:iMemberid := 136 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IntermHeadSize( ) CLASS Flowchart // Default size of intermediate arrow heads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermHeadSize") oMethod:iMemberid := 137 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IntermHeadSize(; uParam001; // AS SHORT ) CLASS Flowchart // Default size of intermediate arrow heads LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IntermHeadSize") oMethod:iMemberid := 137 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CreateLink(; table,; // REF OBJECT rowNum,; // AS LONG box,; // REF OBJECT fromTableToBox; // AS LOGIC ) CLASS Flowchart // Creates a link arrow between a table and a box LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateLink") oMethod:iMemberid := 138 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH + VTS_I4 + VTS_PDISPATCH + VTS_BOOL oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) METHOD SaveToBitmap(; FileName,; // AS STRING left,; // AS LONG top,; // AS LONG right,; // AS LONG bottom; // AS LONG ) CLASS Flowchart // Saves a portion of the flowchart document in a bitmap image file LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SaveToBitmap") oMethod:iMemberid := 139 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 5 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetDocSize(; left,; // REF LONG top,; // REF LONG right,; // REF LONG bottom; // REF LONG ) CLASS Flowchart // Get the document extents LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetDocSize") oMethod:iMemberid := 140 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PI4 + VTS_PI4 + VTS_PI4 + VTS_PI4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ExtrnDragDrop( ) CLASS Flowchart // Initiate OLE drag-and-drop operation, when an object is dragged outside the visible area of the control LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ExtrnDragDrop") oMethod:iMemberid := 141 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ExtrnDragDrop(; uParam001; // AS LOGIC ) CLASS Flowchart // Initiate OLE drag-and-drop operation, when an object is dragged outside the visible area of the control LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ExtrnDragDrop") oMethod:iMemberid := 141 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CreateObjsFromDragData(; x,; // AS LONG y; // AS LONG ) CLASS Flowchart // Create chart objects from drag-and-drop data object LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateObjsFromDragData") oMethod:iMemberid := 142 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD UnloadAllShapeLibs( ) CLASS Flowchart // Unload all shape libraries LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UnloadAllShapeLibs") oMethod:iMemberid := 143 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetDefLibShape(; libGUID,; // AS STRING shape; // AS LONG ) CLASS Flowchart // Set the default library shape for new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetDefLibShape") oMethod:iMemberid := 144 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetDefLibShape(; libGUID,; // REF STRING shape; // REF LONG ) CLASS Flowchart // Get the default library shape for new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetDefLibShape") oMethod:iMemberid := 145 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PBSTR + VTS_PI4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetShapeLibGUID(; FileName; // AS STRING ) CLASS Flowchart // Get the GUID of a previously loaded shape library LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetShapeLibGUID") oMethod:iMemberid := 146 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShapeLibCount( ) CLASS Flowchart // Get the count of loaded shape libraries LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShapeLibCount") oMethod:iMemberid := 147 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetShapeCount(; libGUID; // AS STRING ) CLASS Flowchart // Get the number of shapes in a loaded shape library LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetShapeCount") oMethod:iMemberid := 148 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetShapeLibName(; libGUID; // AS STRING ) CLASS Flowchart // Get the name of a loaded shape library LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetShapeLibName") oMethod:iMemberid := 149 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SnapStyle( ) CLASS Flowchart // Specifies item alignment style. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapStyle") oMethod:iMemberid := 150 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN SnapStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies item alignment style. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapStyle") oMethod:iMemberid := 150 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SnapDistance( ) CLASS Flowchart // The maximum distance at which items are aligned. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapDistance") oMethod:iMemberid := 151 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN SnapDistance(; uParam001; // AS LONG ) CLASS Flowchart // The maximum distance at which items are aligned. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapDistance") oMethod:iMemberid := 151 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxFillStyle( ) CLASS Flowchart // Default value for the FillStyle property of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillStyle") oMethod:iMemberid := 152 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxFillStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the FillStyle property of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillStyle") oMethod:iMemberid := 152 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxFillColor2( ) CLASS Flowchart // Default value for the FillColor2 property of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillColor2") oMethod:iMemberid := 153 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxFillColor2(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the FillColor2 property of new boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillColor2") oMethod:iMemberid := 153 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadShapeLib(; FileName; // AS STRING ) CLASS Flowchart // Load an external shape library LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadShapeLib") oMethod:iMemberid := 154 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD UnloadShapeLib(; libGUID; // AS STRING ) CLASS Flowchart // Unload previously registered shape library LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("UnloadShapeLib") oMethod:iMemberid := 155 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SaveToStream(; lpStream; // AS OBJECT ) CLASS Flowchart // Save the current selection into a stream LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SaveToStream") oMethod:iMemberid := 156 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadFromStream(; lpStream; // AS OBJECT ) CLASS Flowchart // Load a previously saved selection from a stream LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadFromStream") oMethod:iMemberid := 157 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD IsTree( ) CLASS Flowchart // Check if the graph currenly presented by the FlowChartX is a tree LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IsTree") oMethod:iMemberid := 158 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowFillColor( ) CLASS Flowchart // Default value for the fill color of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowFillColor") oMethod:iMemberid := 159 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowFillColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default value for the fill color of new arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowFillColor") oMethod:iMemberid := 159 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AutoSizeDoc( ) CLASS Flowchart // Specifies if document size is changes dynamically while objects are created or modified LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoSizeDoc") oMethod:iMemberid := 160 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AutoSizeDoc(; uParam001; // AS LOGIC ) CLASS Flowchart // Specifies if document size is changes dynamically while objects are created or modified LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AutoSizeDoc") oMethod:iMemberid := 160 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackColor( ) CLASS Flowchart // Default color for giving visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackColor") oMethod:iMemberid := 161 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FeedbackColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default color for giving visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackColor") oMethod:iMemberid := 161 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackPenStyle( ) CLASS Flowchart // Default style of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenStyle") oMethod:iMemberid := 162 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN FeedbackPenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default style of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenStyle") oMethod:iMemberid := 162 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackPenWidth( ) CLASS Flowchart // Default width of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenWidth") oMethod:iMemberid := 163 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FeedbackPenWidth(; uParam001; // AS LONG ) CLASS Flowchart // Default width of the pen for visual feedback LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackPenWidth") oMethod:iMemberid := 163 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS LayoutGap( ) CLASS Flowchart // Gap between items in container-style boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutGap") oMethod:iMemberid := 164 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN LayoutGap(; uParam001; // AS LONG ) CLASS Flowchart // Gap between items in container-style boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutGap") oMethod:iMemberid := 164 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS LayoutStyle( ) CLASS Flowchart // Layout direction and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutStyle") oMethod:iMemberid := 165 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN LayoutStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Layout direction and alignment LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LayoutStyle") oMethod:iMemberid := 165 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FeedbackOnDragOver( ) CLASS Flowchart // Specifies if feedback is given when object can be dropped in a container LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackOnDragOver") oMethod:iMemberid := 166 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FeedbackOnDragOver(; uParam001; // AS LOGIC ) CLASS Flowchart // Specifies if feedback is given when object can be dropped in a container LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FeedbackOnDragOver") oMethod:iMemberid := 166 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD TreeLayout(; rootObj,; // AS OBJECT tlt,; // AS USERTYPE (LONG) tld,; // AS USERTYPE (LONG) tla,; // AS USERTYPE (LONG) minItemSpacing,; // AS LONG minLevelSpacing,; // AS LONG keepRootPosition,; // AS LOGIC reversedArrows,; // AS LOGIC xBorderGap,; // AS LONG yBorderGap; // AS LONG ) CLASS Flowchart // Perform a tree layout over the control LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TreeLayout") oMethod:iMemberid := 167 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 10 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_VARIANT + VTS_VARIANT + VTS_VARIANT + VTS_I4 + VTS_I4 + VTS_BOOL + VTS_BOOL + VTS_I4 + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS InplaceEditAllowed( ) CLASS Flowchart // Enables / disables inplace editing of the text of objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InplaceEditAllowed") oMethod:iMemberid := 168 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN InplaceEditAllowed(; uParam001; // AS LOGIC ) CLASS Flowchart // Enables / disables inplace editing of the text of objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InplaceEditAllowed") oMethod:iMemberid := 168 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShowFocusFrame( ) CLASS Flowchart // Gets or sets whether frame is drawn when the control has keyboard focus LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowFocusFrame") oMethod:iMemberid := 169 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShowFocusFrame(; uParam001; // AS LOGIC ) CLASS Flowchart // Gets or sets whether frame is drawn when the control has keyboard focus LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowFocusFrame") oMethod:iMemberid := 169 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZoomToFit( ) CLASS Flowchart // Zooms the document contents to fit the control's window LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomToFit") oMethod:iMemberid := 170 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BringIntoView(; obj; // AS OBJECT ) CLASS Flowchart // Scrolls the document area to make the specified object visible LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BringIntoView") oMethod:iMemberid := 171 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ExpandBtnPos( ) CLASS Flowchart // Specifies where expand buttons are placed relatively to their boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ExpandBtnPos") oMethod:iMemberid := 172 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ExpandBtnPos(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies where expand buttons are placed relatively to their boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ExpandBtnPos") oMethod:iMemberid := 172 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowsSplittable( ) CLASS Flowchart // Specifies if arrow segments can be split interactively LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowsSplittable") oMethod:iMemberid := 173 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowsSplittable(; uParam001; // AS LOGIC ) CLASS Flowchart // Specifies if arrow segments can be split interactively LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowsSplittable") oMethod:iMemberid := 173 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Dirty( ) CLASS Flowchart // Indicates if the diagram was modified LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Dirty") oMethod:iMemberid := 174 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Dirty(; uParam001; // AS LOGIC ) CLASS Flowchart // Indicates if the diagram was modified LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Dirty") oMethod:iMemberid := 174 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS KbdBehavior( ) CLASS Flowchart // Determines the function of arrow keys LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("KbdBehavior") oMethod:iMemberid := 175 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN KbdBehavior(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Determines the function of arrow keys LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("KbdBehavior") oMethod:iMemberid := 175 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FitDocToObjects(; borderGap; // AS LONG ) CLASS Flowchart // Resizes the document area to fit all diagram objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FitDocToObjects") oMethod:iMemberid := 176 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS FireMouseMove( ) CLASS Flowchart // Indicates if MouseMove event gets fired LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FireMouseMove") oMethod:iMemberid := 177 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN FireMouseMove(; uParam001; // AS LOGIC ) CLASS Flowchart // Indicates if MouseMove event gets fired LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FireMouseMove") oMethod:iMemberid := 177 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AxControlId( ) CLASS Flowchart // Default class identifier of ActiveX controls hosted in boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxControlId") oMethod:iMemberid := 178 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AxControlId(; uParam001; // AS STRING ) CLASS Flowchart // Default class identifier of ActiveX controls hosted in boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxControlId") oMethod:iMemberid := 178 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowMultiSel( ) CLASS Flowchart // Gets or sets if multiple-selection if allowed LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowMultiSel") oMethod:iMemberid := 179 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowMultiSel(; uParam001; // AS LOGIC ) CLASS Flowchart // Gets or sets if multiple-selection if allowed LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowMultiSel") oMethod:iMemberid := 179 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowLinksRepeat( ) CLASS Flowchart // Gets or sets if repeated links are allowed LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowLinksRepeat") oMethod:iMemberid := 180 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowLinksRepeat(; uParam001; // AS LOGIC ) CLASS Flowchart // Gets or sets if repeated links are allowed LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowLinksRepeat") oMethod:iMemberid := 180 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS GridStyle( ) CLASS Flowchart // Indicates how to draw the grid LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridStyle") oMethod:iMemberid := 181 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN GridStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Indicates how to draw the grid LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridStyle") oMethod:iMemberid := 181 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PrintOptions( ) CLASS Flowchart // Settings for printing and print-preview LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrintOptions") oMethod:iMemberid := 182 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IPrintOptions{uRetValue} RETURN (uRetValue) CLASS IPrintOptions INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IPrintOptions SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 84 SELF:_dwVars := 0 RETURN SELF ACCESS Interior( ) CLASS IPrintOptions // Specifies whether to print the interior of objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Interior") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Interior(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print the interior of objects LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Interior") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Background( ) CLASS IPrintOptions // Specifies whether to print the background of the document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Background") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Background(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print the background of the document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Background") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Images( ) CLASS IPrintOptions // Specifies whether to print images LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Images") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Images(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print images LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Images") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Frame( ) CLASS IPrintOptions // Specifies whether to print a frame around each page LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Frame") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Frame(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print a frame around each page LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Frame") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Header( ) CLASS IPrintOptions // Specifies whether to print page headers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Header") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Header(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print page headers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Header") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Shadows( ) CLASS IPrintOptions // Specifies whether to print object shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Shadows") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Shadows(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print object shadows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Shadows") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Title( ) CLASS IPrintOptions // Specifies the title of the printed document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Title") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Title(; uParam001; // AS STRING ) CLASS IPrintOptions // Specifies the title of the printed document LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Title") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrPrint( ) CLASS IPrintOptions // Title of the 'Print' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrPrint") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrPrint(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Print' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrPrint") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrZoomIn( ) CLASS IPrintOptions // Title of the 'Zoom in' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrZoomIn") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrZoomIn(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Zoom in' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrZoomIn") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrZoomOut( ) CLASS IPrintOptions // Title of the 'Zoom out' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrZoomOut") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrZoomOut(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Zoom out' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrZoomOut") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrPrevPage( ) CLASS IPrintOptions // Title of the 'Prev page' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrPrevPage") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrPrevPage(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Prev page' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrPrevPage") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrNextPage( ) CLASS IPrintOptions // Title of the 'Next page' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrNextPage") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrNextPage(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Next page' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrNextPage") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrClose( ) CLASS IPrintOptions // Title of the 'Close' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrClose") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrClose(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Close' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrClose") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewWndTitle( ) CLASS IPrintOptions // Title of the print-preview window LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewWndTitle") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewWndTitle(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the print-preview window LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewWndTitle") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HeaderStrPage( ) CLASS IPrintOptions // String to display in the header for 'page' LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderStrPage") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HeaderStrPage(; uParam001; // AS STRING ) CLASS IPrintOptions // String to display in the header for 'page' LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderStrPage") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreferredDevice( ) CLASS IPrintOptions // Name of the device to print to LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreferredDevice") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreferredDevice(; uParam001; // AS STRING ) CLASS IPrintOptions // Name of the device to print to LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreferredDevice") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PageOrientation( ) CLASS IPrintOptions // Specifies the preferred page orientation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageOrientation") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PageOrientation(; uParam001; // AS USERTYPE (LONG) ) CLASS IPrintOptions // Specifies the preferred page orientation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageOrientation") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrLandscape( ) CLASS IPrintOptions // Title of the 'Landscape' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrLandscape") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrLandscape(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Landscape' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrLandscape") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrPortrait( ) CLASS IPrintOptions // Title of the 'Portrait' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrPortrait") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrPortrait(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Portrait' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrPortrait") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewTbarPicture(; Index,; // AS LONG uParam002; // REF OBJECT ) CLASS IPrintOptions // Preview toolbar button images LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewTbarPicture") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HandleTransparentImages( ) CLASS IPrintOptions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HandleTransparentImages") oMethod:iMemberid := 21 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HandleTransparentImages(; uParam001; // AS LOGIC ) CLASS IPrintOptions LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HandleTransparentImages") oMethod:iMemberid := 21 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShowPageMarkers( ) CLASS IPrintOptions // Toggles visibility of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowPageMarkers") oMethod:iMemberid := 22 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShowPageMarkers(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Toggles visibility of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowPageMarkers") oMethod:iMemberid := 22 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PageMarkersColor( ) CLASS IPrintOptions // Specifies the color of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersColor") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PageMarkersColor(; uParam001; // AS USERTYPE (LONG) ) CLASS IPrintOptions // Specifies the color of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersColor") oMethod:iMemberid := 23 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PageMarkersWidth( ) CLASS IPrintOptions // Specifies the width of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersWidth") oMethod:iMemberid := 24 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PageMarkersWidth(; uParam001; // AS LONG ) CLASS IPrintOptions // Specifies the width of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersWidth") oMethod:iMemberid := 24 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PageMarkersStyle( ) CLASS IPrintOptions // Specifies the style of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersStyle") oMethod:iMemberid := 25 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PageMarkersStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IPrintOptions // Specifies the style of print page markers LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersStyle") oMethod:iMemberid := 25 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelHandles( ) CLASS IPrintOptions // Specifies whether to print selection handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelHandles") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN SelHandles(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print selection handles LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelHandles") oMethod:iMemberid := 26 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PageMarkersFixedWidth( ) CLASS IPrintOptions // Specifies the width of the print page LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersFixedWidth") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PageMarkersFixedWidth(; uParam001; // AS LONG ) CLASS IPrintOptions // Specifies the width of the print page LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersFixedWidth") oMethod:iMemberid := 27 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PageMarkersFixedHeight( ) CLASS IPrintOptions // Specifies the height of the print page LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersFixedHeight") oMethod:iMemberid := 28 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PageMarkersFixedHeight(; uParam001; // AS LONG ) CLASS IPrintOptions // Specifies the height of the print page LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PageMarkersFixedHeight") oMethod:iMemberid := 28 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ScaleFactor( ) CLASS IPrintOptions // Print output scale factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScaleFactor") oMethod:iMemberid := 29 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ScaleFactor(; uParam001; // AS SHORT ) CLASS IPrintOptions // Print output scale factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScaleFactor") oMethod:iMemberid := 29 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ScaleToPage( ) CLASS IPrintOptions // Scale print output to fit the whole diagram in a single page LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScaleToPage") oMethod:iMemberid := 30 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewStrFitPage( ) CLASS IPrintOptions // Title of the 'Fit Page' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrFitPage") oMethod:iMemberid := 31 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewStrFitPage(; uParam001; // AS STRING ) CLASS IPrintOptions // Title of the 'Fit Page' button in print-preview toolbar LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewStrFitPage") oMethod:iMemberid := 31 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BkgrImage( ) CLASS IPrintOptions // Specifies whether to print the background image LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BkgrImage") oMethod:iMemberid := 32 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN BkgrImage(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to print the background image LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BkgrImage") oMethod:iMemberid := 32 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ScaleTo(; width,; // AS SHORT height,; // AS SHORT contentOnly; // AS LOGIC ) CLASS IPrintOptions // Scale print output to fit the whole diagram in the specified size LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScaleTo") oMethod:iMemberid := 33 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 3 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I2 + VTS_I2 + VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PreviewBtnEnabled(; Index; // AS LONG ) CLASS IPrintOptions // Enabled preview toolbar buttons LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewBtnEnabled") oMethod:iMemberid := 34 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PreviewBtnEnabled(; Index,; // AS LONG uParam002; // AS LOGIC ) CLASS IPrintOptions // Enabled preview toolbar buttons LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewBtnEnabled") oMethod:iMemberid := 34 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HeaderFormat( ) CLASS IPrintOptions // Gets or sets the format of page header text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderFormat") oMethod:iMemberid := 35 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HeaderFormat(; uParam001; // AS STRING ) CLASS IPrintOptions // Gets or sets the format of page header text LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderFormat") oMethod:iMemberid := 35 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PaperSize( ) CLASS IPrintOptions // Gets or sets the current printer paper size. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PaperSize") oMethod:iMemberid := 36 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PaperSize(; uParam001; // AS USERTYPE (LONG) ) CLASS IPrintOptions // Gets or sets the current printer paper size. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PaperSize") oMethod:iMemberid := 36 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PaperLength( ) CLASS IPrintOptions // Specifies custom paper length in tenths of a millimeter. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PaperLength") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PaperLength(; uParam001; // AS LONG ) CLASS IPrintOptions // Specifies custom paper length in tenths of a millimeter. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PaperLength") oMethod:iMemberid := 37 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PaperWidth( ) CLASS IPrintOptions // Specifies custom paper width in tenths of a millimeter. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PaperWidth") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PaperWidth(; uParam001; // AS LONG ) CLASS IPrintOptions // Specifies custom paper width in tenths of a millimeter. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PaperWidth") oMethod:iMemberid := 38 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS QueryDriverForPaperSize( ) CLASS IPrintOptions // Specifies whether to query the printer driver for the paper size when using a custom paper form. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("QueryDriverForPaperSize") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN QueryDriverForPaperSize(; uParam001; // AS LOGIC ) CLASS IPrintOptions // Specifies whether to query the printer driver for the paper size when using a custom paper form. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("QueryDriverForPaperSize") oMethod:iMemberid := 39 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HeaderTextStyle( ) CLASS IPrintOptions // Specifies the alignment of the header text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderTextStyle") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN HeaderTextStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IPrintOptions // Specifies the alignment of the header text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HeaderTextStyle") oMethod:iMemberid := 40 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD PreviewDiagram( ) CLASS Flowchart // Displays print-preview window LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PreviewDiagram") oMethod:iMemberid := 183 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD PrintDiagram( ) CLASS Flowchart // Prints the current diagram contents LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PrintDiagram") oMethod:iMemberid := 184 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SaveToString(; ClearDirty; // AS LOGIC ) CLASS Flowchart // Saves the flowchart document into a string LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SaveToString") oMethod:iMemberid := 185 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadFromString(; str; // AS STRING ) CLASS Flowchart // Loads the flowchart document from a string LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadFromString") oMethod:iMemberid := 186 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ArrangeDiagram(; layout; // AS OBJECT ) CLASS Flowchart // Arranges the diagram with the specified layout LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrangeDiagram") oMethod:iMemberid := 187 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DefaultShape( ) CLASS Flowchart // Default shape for boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DefaultShape") oMethod:iMemberid := 188 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IShapeTemplate{uRetValue} RETURN (uRetValue) ASSIGN DefaultShape(; uParam001; // REF OBJECT ) CLASS Flowchart // Default shape for boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DefaultShape") oMethod:iMemberid := 188 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Shapes(; Index; // AS USUAL ) CLASS Flowchart // Shape templates LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Shapes") oMethod:iMemberid := 189 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IShapeTemplate{uRetValue} RETURN (uRetValue) ACCESS ShapeOrientation( ) CLASS Flowchart // Default shape rotation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShapeOrientation") oMethod:iMemberid := 190 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShapeOrientation(; uParam001; // AS SHORT ) CLASS Flowchart // Default shape rotation LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShapeOrientation") oMethod:iMemberid := 190 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShowAnchors( ) CLASS Flowchart // Specifies when anchor points are drawn LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowAnchors") oMethod:iMemberid := 191 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ShowAnchors(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies when anchor points are drawn LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShowAnchors") oMethod:iMemberid := 191 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SnapToAnchor( ) CLASS Flowchart // Specifies when arrow ends snap to nearest anchor point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapToAnchor") oMethod:iMemberid := 192 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN SnapToAnchor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies when arrow ends snap to nearest anchor point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SnapToAnchor") oMethod:iMemberid := 192 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AnchorPatterns(; name; // AS STRING ) CLASS Flowchart // Anchor patterns LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AnchorPatterns") oMethod:iMemberid := 193 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_BSTRW oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IAnchorPattern{uRetValue} RETURN (uRetValue) ACCESS IconTextWidth( ) CLASS Flowchart // Max width of text for tsBelow style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IconTextWidth") oMethod:iMemberid := 194 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IconTextWidth(; uParam001; // AS LONG ) CLASS Flowchart // Max width of text for tsBelow style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IconTextWidth") oMethod:iMemberid := 194 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ImageExportOptions( ) CLASS Flowchart // Settings for image exporting LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ImageExportOptions") oMethod:iMemberid := 195 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IImageExportOptions{uRetValue} RETURN (uRetValue) CLASS IImageExportOptions INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IImageExportOptions SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 27 SELF:_dwVars := 0 RETURN SELF ACCESS ScaleFactor( ) CLASS IImageExportOptions // Scale factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScaleFactor") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ScaleFactor(; uParam001; // AS LONG ) CLASS IImageExportOptions // Scale factor LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScaleFactor") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS left( ) CLASS IImageExportOptions // Left boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("left") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN left(; uParam001; // AS LONG ) CLASS IImageExportOptions // Left boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("left") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS top( ) CLASS IImageExportOptions // Top boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("top") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN top(; uParam001; // AS LONG ) CLASS IImageExportOptions // Top boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("top") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS right( ) CLASS IImageExportOptions // Right boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("right") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN right(; uParam001; // AS LONG ) CLASS IImageExportOptions // Right boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("right") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS bottom( ) CLASS IImageExportOptions // Bottom boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("bottom") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN bottom(; uParam001; // AS LONG ) CLASS IImageExportOptions // Bottom boundary of the document area being exported LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("bottom") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EnableBkgrImage( ) CLASS IImageExportOptions // Gets or sets whether backround image is rendered in exported images LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableBkgrImage") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EnableBkgrImage(; uParam001; // AS LOGIC ) CLASS IImageExportOptions // Gets or sets whether backround image is rendered in exported images LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableBkgrImage") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EnableBkgrColor( ) CLASS IImageExportOptions // Gets or sets whether backround color is rendered in exported images LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableBkgrColor") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EnableBkgrColor(; uParam001; // AS LOGIC ) CLASS IImageExportOptions // Gets or sets whether backround color is rendered in exported images LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableBkgrColor") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS GdiPlusExtensions( ) CLASS IImageExportOptions // Enables use of GDI+ extensions (only with GDI+ graphics). LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GdiPlusExtensions") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN GdiPlusExtensions(; uParam001; // AS LOGIC ) CLASS IImageExportOptions // Enables use of GDI+ extensions (only with GDI+ graphics). LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GdiPlusExtensions") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EnableShadows( ) CLASS IImageExportOptions // Specifies whether to render shadows of flowchart items. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableShadows") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EnableShadows(; uParam001; // AS LOGIC ) CLASS IImageExportOptions // Specifies whether to render shadows of flowchart items. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableShadows") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EnableSelHandles( ) CLASS IImageExportOptions // Specifies whether to render selection handles. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableSelHandles") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EnableSelHandles(; uParam001; // AS LOGIC ) CLASS IImageExportOptions // Specifies whether to render selection handles. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableSelHandles") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CreateBitmap( ) CLASS Flowchart // Creates HBITMAP LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateBitmap") oMethod:iMemberid := 196 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS EventFlags(; flag; // AS USERTYPE (LONG) ) CLASS Flowchart // Options for event firing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EventFlags") oMethod:iMemberid := 197 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EventFlags(; flag,; // AS USERTYPE (LONG) uParam002; // AS LOGIC ) CLASS Flowchart // Options for event firing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EventFlags") oMethod:iMemberid := 197 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT + VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS hwnd( ) CLASS Flowchart // Returns the window handle of the control. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("hwnd") oMethod:iMemberid := -515 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD SaveToMetaFile(; FileName,; // AS STRING Description; // AS STRING ) CLASS Flowchart // Saves the flowchart document in a metafile LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SaveToMetaFile") oMethod:iMemberid := 198 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowCrossings( ) CLASS Flowchart // Defines the style of arrow crossings LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowCrossings") oMethod:iMemberid := 199 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowCrossings(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Defines the style of arrow crossings LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowCrossings") oMethod:iMemberid := 199 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CrossRadius( ) CLASS Flowchart // Defines the radius of arrow crossings arcs LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CrossRadius") oMethod:iMemberid := 200 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CrossRadius(; uParam001; // AS LONG ) CLASS Flowchart // Defines the radius of arrow crossings arcs LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CrossRadius") oMethod:iMemberid := 200 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BeginUndoRecord( ) CLASS Flowchart // Start a composite undo record LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BeginUndoRecord") oMethod:iMemberid := 201 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndUndoRecord( ) CLASS Flowchart // End composite undo record LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndUndoRecord") oMethod:iMemberid := 202 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableLinkStyle( ) CLASS Flowchart // Determines whether arrows link to tables as single nodes, to table rows, or both LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableLinkStyle") oMethod:iMemberid := 203 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TableLinkStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Determines whether arrows link to tables as single nodes, to table rows, or both LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableLinkStyle") oMethod:iMemberid := 203 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZoomToRect(; left,; // AS LONG top,; // AS LONG right,; // AS LONG bottom; // AS LONG ) CLASS Flowchart // Zoom to fit the specified rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomToRect") oMethod:iMemberid := 204 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DocLeft( ) CLASS Flowchart // The left side of document bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DocLeft") oMethod:iMemberid := 205 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DocTop( ) CLASS Flowchart // The upper side of document bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DocTop") oMethod:iMemberid := 206 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DocRight( ) CLASS Flowchart // The right side of document bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DocRight") oMethod:iMemberid := 207 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DocBottom( ) CLASS Flowchart // The lower side of document bounding rectangle LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DocBottom") oMethod:iMemberid := 208 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RouteArrows( ) CLASS Flowchart // Automatically route arrows to go round boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RouteArrows") oMethod:iMemberid := 209 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RouteArrows(; uParam001; // AS LOGIC ) CLASS Flowchart // Automatically route arrows to go round boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RouteArrows") oMethod:iMemberid := 209 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetBoxAt(; docX,; // AS LONG docY; // AS LONG ) CLASS Flowchart // Gets the box at specified location LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetBoxAt") oMethod:iMemberid := 210 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) ACCESS IconTextHeight( ) CLASS Flowchart // Max height of text for tsBelow style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IconTextHeight") oMethod:iMemberid := 211 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IconTextHeight(; uParam001; // AS LONG ) CLASS Flowchart // Max height of text for tsBelow style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IconTextHeight") oMethod:iMemberid := 211 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AxLicenseKeys(; AxControlId; // AS STRING ) CLASS Flowchart // Collection of runtime keys of licensed ActiveX controls LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxLicenseKeys") oMethod:iMemberid := 212 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_BSTRW oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AxLicenseKeys(; AxControlId,; // AS STRING uParam002; // AS STRING ) CLASS Flowchart // Collection of runtime keys of licensed ActiveX controls LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AxLicenseKeys") oMethod:iMemberid := 212 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_BSTRW + VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD NodesIntersect(; node1,; // AS OBJECT node2; // AS OBJECT ) CLASS Flowchart // Determines if two nodes intersect LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("NodesIntersect") oMethod:iMemberid := 213 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_DISPATCH oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ClipboardFlags(; flag; // AS USERTYPE (LONG) ) CLASS Flowchart // Options for clipboard LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClipboardFlags") oMethod:iMemberid := 214 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ClipboardFlags(; flag,; // AS USERTYPE (LONG) uParam002; // AS LOGIC ) CLASS Flowchart // Options for clipboard LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClipboardFlags") oMethod:iMemberid := 214 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT + VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RouteAllArrows( ) CLASS Flowchart // Routes all arrows LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RouteAllArrows") oMethod:iMemberid := 215 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CreateAnchoredArrow(; srcBox,; // REF OBJECT srcAnchor,; // AS LONG dstBox,; // REF OBJECT dstAnchor; // AS LONG ) CLASS Flowchart // Creates a new arrow LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateAnchoredArrow") oMethod:iMemberid := 216 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_PDISPATCH + VTS_I4 + VTS_PDISPATCH + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) ACCESS HighSpeedRouting( ) CLASS Flowchart // Enables or disables quick routing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HighSpeedRouting") oMethod:iMemberid := 217 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN HighSpeedRouting(; uParam001; // AS LOGIC ) CLASS Flowchart // Enables or disables quick routing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HighSpeedRouting") oMethod:iMemberid := 217 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HostedAxActivation( ) CLASS Flowchart // Specifies how ActiveX controls hosted in boxes get activated LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HostedAxActivation") oMethod:iMemberid := 218 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN HostedAxActivation(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies how ActiveX controls hosted in boxes get activated LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HostedAxActivation") oMethod:iMemberid := 218 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EnableStyledText( ) CLASS Flowchart // Enables or disables styled text formatting inside boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableStyledText") oMethod:iMemberid := 219 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN EnableStyledText(; uParam001; // AS LOGIC ) CLASS Flowchart // Enables or disables styled text formatting inside boxes LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EnableStyledText") oMethod:iMemberid := 219 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Graphics( ) CLASS Flowchart // Graphics engine used to render diagram LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Graphics") oMethod:iMemberid := 220 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IGraphics{uRetValue} RETURN (uRetValue) CLASS IGraphics INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IGraphics SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 12 SELF:_dwVars := 0 RETURN SELF ACCESS EngineType( ) CLASS IGraphics // Graphics engine type; either GDI or GDI+ LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EngineType") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD StartUp(; GraphicsEngine; // AS USERTYPE (LONG) ) CLASS IGraphics // Starts up the chosen graphics engine LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("StartUp") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ShutDown( ) CLASS IGraphics // Shuts down the current graphics engine LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShutDown") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AntiAliasing( ) CLASS IGraphics // Enables or disables anti aliasing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AntiAliasing") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AntiAliasing(; uParam001; // AS LOGIC ) CLASS IGraphics // Enables or disables anti aliasing LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AntiAliasing") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS NowLoading( ) CLASS Flowchart LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("NowLoading") oMethod:iMemberid := 221 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN NowLoading(; uParam001; // AS LOGIC ) CLASS Flowchart LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("NowLoading") oMethod:iMemberid := 221 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowUnconnectedArrows( ) CLASS Flowchart // Allows drawing arrows without connecting them to nodes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowUnconnectedArrows") oMethod:iMemberid := 222 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowUnconnectedArrows(; uParam001; // AS LOGIC ) CLASS Flowchart // Allows drawing arrows without connecting them to nodes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowUnconnectedArrows") oMethod:iMemberid := 222 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ScrollRate( ) CLASS Flowchart // Scrollbars step size LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollRate") oMethod:iMemberid := 223 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ScrollRate(; uParam001; // AS SHORT ) CLASS Flowchart // Scrollbars step size LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollRate") oMethod:iMemberid := 223 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS KeyboardFlags(; flag; // AS USERTYPE (LONG) ) CLASS Flowchart // Options for keyboard handling LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("KeyboardFlags") oMethod:iMemberid := 224 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN KeyboardFlags(; flag,; // AS USERTYPE (LONG) uParam002; // AS LOGIC ) CLASS Flowchart // Options for keyboard handling LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("KeyboardFlags") oMethod:iMemberid := 224 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT + VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxFillColorAlpha( ) CLASS Flowchart // Specifies the default semitransparency of boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillColorAlpha") oMethod:iMemberid := 225 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN BoxFillColorAlpha(; uParam001; // AS SHORT ) CLASS Flowchart // Specifies the default semitransparency of boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxFillColorAlpha") oMethod:iMemberid := 225 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowFillColorAlpha( ) CLASS Flowchart // Specifies the default semitransparency of arrows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowFillColorAlpha") oMethod:iMemberid := 226 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowFillColorAlpha(; uParam001; // AS SHORT ) CLASS Flowchart // Specifies the default semitransparency of arrows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowFillColorAlpha") oMethod:iMemberid := 226 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TableFillColorAlpha( ) CLASS Flowchart // Specifies the default semitransparency of tables. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableFillColorAlpha") oMethod:iMemberid := 227 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TableFillColorAlpha(; uParam001; // AS SHORT ) CLASS Flowchart // Specifies the default semitransparency of tables. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableFillColorAlpha") oMethod:iMemberid := 227 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ShadowColorAlpha( ) CLASS Flowchart // Specifies the semitransparency of shadows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowColorAlpha") oMethod:iMemberid := 228 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ShadowColorAlpha(; uParam001; // AS SHORT ) CLASS Flowchart // Specifies the semitransparency of shadows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ShadowColorAlpha") oMethod:iMemberid := 228 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetCFlowChart( ) CLASS Flowchart // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetCFlowChart") oMethod:iMemberid := 229 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS PathFindingOptions( ) CLASS Flowchart // Settings for path finding LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PathFindingOptions") oMethod:iMemberid := 230 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IPathFindingOptions{uRetValue} RETURN (uRetValue) CLASS IPathFindingOptions INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IPathFindingOptions SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 13 SELF:_dwVars := 0 RETURN SELF ACCESS Directed( ) CLASS IPathFindingOptions // Specifies whether graphs are considered directed. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Directed") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Directed(; uParam001; // AS LOGIC ) CLASS IPathFindingOptions // Specifies whether graphs are considered directed. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Directed") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowRepeatingVertices( ) CLASS IPathFindingOptions // Specifies whether repeating vertices are admissible. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowRepeatingVertices") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowRepeatingVertices(; uParam001; // AS LOGIC ) CLASS IPathFindingOptions // Specifies whether repeating vertices are admissible. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowRepeatingVertices") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS IgnoreReflexiveEdges( ) CLASS IPathFindingOptions // Specifies whether reflexive edges should be ignored. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreReflexiveEdges") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN IgnoreReflexiveEdges(; uParam001; // AS LOGIC ) CLASS IPathFindingOptions // Specifies whether reflexive edges should be ignored. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("IgnoreReflexiveEdges") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FindLongestPath( ) CLASS Flowchart // Finds the longest path in the current diagram. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindLongestPath") oMethod:iMemberid := 231 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS TableStyle( ) CLASS Flowchart // Default table style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableStyle") oMethod:iMemberid := 232 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TableStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Default table style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TableStyle") oMethod:iMemberid := 232 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD RecordCustomAction(; ID; // AS LONG ) CLASS Flowchart // Adds a custom undo/redo record to undo history LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RecordCustomAction") oMethod:iMemberid := 233 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Measures(; measure; // AS USERTYPE (LONG) ) CLASS Flowchart // Allows changing values related to hit-testing and distance measures LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Measures") oMethod:iMemberid := 234 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Measures(; measure,; // AS USERTYPE (LONG) uParam002; // AS LONG ) CLASS Flowchart // Allows changing values related to hit-testing and distance measures LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Measures") oMethod:iMemberid := 234 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT + VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RerouteArrows( ) CLASS Flowchart // Specifies when arrows are rerouted. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RerouteArrows") oMethod:iMemberid := 235 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN RerouteArrows(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies when arrows are rerouted. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RerouteArrows") oMethod:iMemberid := 235 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RoutingGridSize( ) CLASS Flowchart // Specifies the size of the grid used in arrows routing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RoutingGridSize") oMethod:iMemberid := 236 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RoutingGridSize(; uParam001; // AS LONG ) CLASS Flowchart // Specifies the size of the grid used in arrows routing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RoutingGridSize") oMethod:iMemberid := 236 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS MinimizeRouteSegments( ) CLASS Flowchart // Specifies that arrow routing algorithm must minimize the number of arrows' segments. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MinimizeRouteSegments") oMethod:iMemberid := 237 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN MinimizeRouteSegments(; uParam001; // AS LOGIC ) CLASS Flowchart // Specifies that arrow routing algorithm must minimize the number of arrows' segments. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MinimizeRouteSegments") oMethod:iMemberid := 237 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowText( ) CLASS Flowchart // Default value of the Text property of arrows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowText") oMethod:iMemberid := 238 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowText(; uParam001; // AS STRING ) CLASS Flowchart // Default value of the Text property of arrows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowText") oMethod:iMemberid := 238 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxText( ) CLASS Flowchart // Default value of the Text property of boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxText") oMethod:iMemberid := 239 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN BoxText(; uParam001; // AS STRING ) CLASS Flowchart // Default value of the Text property of boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxText") oMethod:iMemberid := 239 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowsSnapToNodeBorders( ) CLASS Flowchart // A default value for arrows SnapToNodeBorder property. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowsSnapToNodeBorders") oMethod:iMemberid := 240 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ArrowsSnapToNodeBorders(; uParam001; // AS LOGIC ) CLASS Flowchart // A default value for arrows SnapToNodeBorder property. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowsSnapToNodeBorders") oMethod:iMemberid := 240 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowTextStyle( ) CLASS Flowchart // Specifies the orientation and placement of arrows text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowTextStyle") oMethod:iMemberid := 241 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowTextStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies the orientation and placement of arrows text. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowTextStyle") oMethod:iMemberid := 241 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RoutingOptions( ) CLASS Flowchart // Settings for arrow routing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RoutingOptions") oMethod:iMemberid := 242 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IRoutingOptions{uRetValue} RETURN (uRetValue) CLASS IRoutingOptions INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IRoutingOptions SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 32 SELF:_dwVars := 0 RETURN SELF METHOD SetDefaultMode( ) CLASS IRoutingOptions // Sets routing costs and measures to their default values. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetDefaultMode") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetQuickMode( ) CLASS IRoutingOptions // Sets routing costs to values that quickly find routes however with lower route quality. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetQuickMode") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SetMinSegmentsMode( ) CLASS IRoutingOptions // Sets routing costs to values that find routes having low number of segments. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetMinSegmentsMode") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS GridSize( ) CLASS IRoutingOptions // The link routing algorithm finds routes accross grid whose pieces are marked as used if they intersect any node. This property defines the size of the grid pieces. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridSize") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN GridSize(; uParam001; // AS SHORT ) CLASS IRoutingOptions // The link routing algorithm finds routes accross grid whose pieces are marked as used if they intersect any node. This property defines the size of the grid pieces. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GridSize") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS NodeVicinitySize( ) CLASS IRoutingOptions // Size of node surrounding areas in which a penalty cost is assigned to routes passing there. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("NodeVicinitySize") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN NodeVicinitySize(; uParam001; // AS SHORT ) CLASS IRoutingOptions // Size of node surrounding areas in which a penalty cost is assigned to routes passing there. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("NodeVicinitySize") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CrossingCost( ) CLASS IRoutingOptions // A value added to the total cost of a route which crosses another route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CrossingCost") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CrossingCost(; uParam001; // AS BYTE ) CLASS IRoutingOptions // A value added to the total cost of a route which crosses another route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CrossingCost") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS LengthCost( ) CLASS IRoutingOptions // A value added to a route total cost for each grid piece occipied by the route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LengthCost") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN LengthCost(; uParam001; // AS BYTE ) CLASS IRoutingOptions // A value added to a route total cost for each grid piece occipied by the route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LengthCost") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS NodeVicinityCost( ) CLASS IRoutingOptions // A value added to the total cost of routes passing too close to a node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("NodeVicinityCost") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN NodeVicinityCost(; uParam001; // AS BYTE ) CLASS IRoutingOptions // A value added to the total cost of routes passing too close to a node. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("NodeVicinityCost") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TurnCost( ) CLASS IRoutingOptions // A value added to the total cost of a route for each turn it makes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TurnCost") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN TurnCost(; uParam001; // AS BYTE ) CLASS IRoutingOptions // A value added to the total cost of a route for each turn it makes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TurnCost") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_UI1 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DontOptimizeLongRoutes( ) CLASS IRoutingOptions // Find low quality routes for very long links in order to improve overall routing speed. Turn minimization is disabled for such links. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DontOptimizeLongRoutes") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN DontOptimizeLongRoutes(; uParam001; // AS LOGIC ) CLASS IRoutingOptions // Find low quality routes for very long links in order to improve overall routing speed. Turn minimization is disabled for such links. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DontOptimizeLongRoutes") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS TriggerRerouting( ) CLASS IRoutingOptions // Indicates in what circumstances links must be rerouted automatically. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TriggerRerouting") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN TriggerRerouting(; uParam001; // AS USERTYPE (LONG) ) CLASS IRoutingOptions // Indicates in what circumstances links must be rerouted automatically. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("TriggerRerouting") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS StartOrientation( ) CLASS IRoutingOptions // Specifies the orientation of the first segment in a route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("StartOrientation") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN StartOrientation(; uParam001; // AS USERTYPE (LONG) ) CLASS IRoutingOptions // Specifies the orientation of the first segment in a route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("StartOrientation") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS EndOrientation( ) CLASS IRoutingOptions // Specifies the orientation of the last segment in a route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndOrientation") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN EndOrientation(; uParam001; // AS USERTYPE (LONG) ) CLASS IRoutingOptions // Specifies the orientation of the last segment in a route. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndOrientation") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Anchoring( ) CLASS IRoutingOptions // Specifies how to align arrows to the anchor points of nodes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Anchoring") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Anchoring(; uParam001; // AS USERTYPE (LONG) ) CLASS IRoutingOptions // Specifies how to align arrows to the anchor points of nodes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Anchoring") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ScrollZoneSize( ) CLASS Flowchart // The size of the auto-scroll area inside the control bounds. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollZoneSize") oMethod:iMemberid := 243 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ScrollZoneSize(; uParam001; // AS SHORT ) CLASS Flowchart // The size of the auto-scroll area inside the control bounds. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScrollZoneSize") oMethod:iMemberid := 243 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I2 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS HitTestPriority( ) CLASS Flowchart // Specifies whether nodes should have higher priority than links when hit testing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HitTestPriority") oMethod:iMemberid := 244 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN HitTestPriority(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies whether nodes should have higher priority than links when hit testing. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("HitTestPriority") oMethod:iMemberid := 244 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ArrowSelStyle( ) CLASS Flowchart // Specifies the default arrow selection style. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowSelStyle") oMethod:iMemberid := 245 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN ArrowSelStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies the default arrow selection style. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ArrowSelStyle") oMethod:iMemberid := 245 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD MergeUndoRecords(; numRecords; // AS LONG ) CLASS Flowchart // Merges the last several undo records into a single composite record. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MergeUndoRecords") oMethod:iMemberid := 246 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ButtonImages( ) CLASS Flowchart // Allows setting the images used to display intrinsic button controls. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ButtonImages") oMethod:iMemberid := 247 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IButtonImages{uRetValue} RETURN (uRetValue) CLASS IButtonImages INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IButtonImages SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 13 SELF:_dwVars := 0 RETURN SELF ACCESS Expand( ) CLASS IButtonImages // The expand button icon. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Expand") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Expand(; uParam001; // REF OBJECT ) CLASS IButtonImages // The expand button icon. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Expand") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Collapse( ) CLASS IButtonImages // The collapse button icon. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Collapse") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Collapse(; uParam001; // REF OBJECT ) CLASS IButtonImages // The collapse button icon. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Collapse") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Scroll( ) CLASS IButtonImages // The tables' scroll button icon. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Scroll") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Scroll(; uParam001; // REF OBJECT ) CLASS IButtonImages // The tables' scroll button icon. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Scroll") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Repaint( ) CLASS Flowchart // Repaints the flowchart. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Repaint") oMethod:iMemberid := 248 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxWindowFrame( ) CLASS Flowchart LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxWindowFrame") oMethod:iMemberid := 249 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxWindowFrame(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxWindowFrame") oMethod:iMemberid := 249 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AllowUnanchoredArrows( ) CLASS Flowchart // Allow attaching arrows to nodes that have not anchor points. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowUnanchoredArrows") oMethod:iMemberid := 250 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN AllowUnanchoredArrows(; uParam001; // AS LOGIC ) CLASS Flowchart // Allow attaching arrows to nodes that have not anchor points. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AllowUnanchoredArrows") oMethod:iMemberid := 250 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS MeasureUnit( ) CLASS Flowchart // Specifies the unit used to measure the size of diagram elements. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MeasureUnit") oMethod:iMemberid := 251 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN MeasureUnit(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies the unit used to measure the size of diagram elements. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MeasureUnit") oMethod:iMemberid := 251 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelHandleSize( ) CLASS Flowchart // Size of selection handles. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelHandleSize") oMethod:iMemberid := 252 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_R4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN SelHandleSize(; uParam001; // AS FLOAT (REAL4) ) CLASS Flowchart // Size of selection handles. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelHandleSize") oMethod:iMemberid := 252 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_R4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD FindLongestPathBetween(; src,; // AS OBJECT dest; // AS OBJECT ) CLASS Flowchart // Finds the longest path that connects the specified nodes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("FindLongestPathBetween") oMethod:iMemberid := 253 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_DISPATCH + VTS_DISPATCH oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrows{uRetValue} RETURN (uRetValue) ACCESS ScriptHelper( ) CLASS Flowchart // Gets an object providing some helper methods usuful when FlowChartX is used in a browser. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ScriptHelper") oMethod:iMemberid := 254 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IScriptHelper{uRetValue} RETURN (uRetValue) CLASS IScriptHelper INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IScriptHelper SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 13 SELF:_dwVars := 0 RETURN SELF METHOD CreateFont(; name,; // AS STRING Size,; // AS FLOAT (CURRENCY) Bold,; // AS LOGIC Italic,; // AS LOGIC Underline; // AS LOGIC ) CLASS IScriptHelper // Creates a standard OLE Font object. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateFont") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 5 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_CY + VTS_BOOL + VTS_BOOL + VTS_BOOL oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD LoadImageFromUrl(; URL; // AS STRING ) CLASS IScriptHelper // Loads an image from an URL. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadImageFromUrl") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD DocToClientX(; docX,; // AS LONG docY; // AS LONG ) CLASS IScriptHelper // Gets the client coordinates of a document point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DocToClientX") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD DocToClientY(; docX,; // AS LONG docY; // AS LONG ) CLASS IScriptHelper // Gets the client coordinates of a document point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DocToClientY") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ClientToDocX(; clientX,; // AS LONG clientY; // AS LONG ) CLASS IScriptHelper // Gets the document coordinates of a device point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClientToDocX") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ClientToDocY(; clientX,; // AS LONG clientY; // AS LONG ) CLASS IScriptHelper // Gets the document coordinates of a device point. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ClientToDocY") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetArrowAt(; docX,; // AS LONG docY; // AS LONG ) CLASS Flowchart // Gets the arrow at the specified location. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetArrowAt") oMethod:iMemberid := 255 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IArrowItem{uRetValue} RETURN (uRetValue) ACCESS SelectionOnTop( ) CLASS Flowchart // Specifies if selected items should be painted on top of other items or the Z order should be always preserved. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectionOnTop") oMethod:iMemberid := 256 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN SelectionOnTop(; uParam001; // AS LOGIC ) CLASS Flowchart // Specifies if selected items should be painted on top of other items or the Z order should be always preserved. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectionOnTop") oMethod:iMemberid := 256 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ToolTipDelay( ) CLASS Flowchart // Gets or sets the delay for tooltips in milliseconds. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTipDelay") oMethod:iMemberid := 257 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ToolTipDelay(; uParam001; // AS LONG ) CLASS Flowchart // Gets or sets the delay for tooltips in milliseconds. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTipDelay") oMethod:iMemberid := 257 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxPicture( ) CLASS Flowchart // An image assigned to the Picture property of new boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxPicture") oMethod:iMemberid := 258 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxPictureRef(; uParam001; // REF OBJECT ) CLASS Flowchart // An image assigned to the Picture property of new boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxPicture") oMethod:iMemberid := 258 oMethod:wInvokeKind := INVOKE_PROPERTYPUTREF oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN BoxPicture(; uParam001; // REF OBJECT ) CLASS Flowchart // An image assigned to the Picture property of new boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxPicture") oMethod:iMemberid := 258 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_PDISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS BoxPicturePos( ) CLASS Flowchart // Gets or sets the initial value of the PicturePos property of new boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxPicturePos") oMethod:iMemberid := 259 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN BoxPicturePos(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Gets or sets the initial value of the PicturePos property of new boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BoxPicturePos") oMethod:iMemberid := 259 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RenderFlags(; flag; // AS USERTYPE (LONG) ) CLASS Flowchart // Rendering tweaks. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RenderFlags") oMethod:iMemberid := 260 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RenderFlags(; flag,; // AS USERTYPE (LONG) uParam002; // AS LOGIC ) CLASS Flowchart // Rendering tweaks. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RenderFlags") oMethod:iMemberid := 260 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_VARIANT + VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetBoxWithInteractorAt(; docX,; // AS LONG docY; // AS LONG ) CLASS Flowchart // Gets the box with an interactor at specified location LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetBoxWithInteractorAt") oMethod:iMemberid := 261 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IBoxItem{uRetValue} RETURN (uRetValue) ACCESS MergeThreshold( ) CLASS Flowchart // The maximum distance between adjacent control points of an arrow at which the respective segments can be merged. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MergeThreshold") oMethod:iMemberid := 262 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_R4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN MergeThreshold(; uParam001; // AS FLOAT (REAL4) ) CLASS Flowchart // The maximum distance between adjacent control points of an arrow at which the respective segments can be merged. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MergeThreshold") oMethod:iMemberid := 262 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_R4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ControlPadding( ) CLASS Flowchart // Gets or sets how much space should be left between box borders and hosted controls. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ControlPadding") oMethod:iMemberid := 263 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_UI1 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ControlPadding(; uParam001; // AS BYTE ) CLASS Flowchart // Gets or sets how much space should be left between box borders and hosted controls. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ControlPadding") oMethod:iMemberid := 263 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_UI1 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS MiddleButtonAction( ) CLASS Flowchart // Specifies the function of the middle mouse button. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MiddleButtonAction") oMethod:iMemberid := 264 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN MiddleButtonAction(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // Specifies the function of the middle mouse button. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MiddleButtonAction") oMethod:iMemberid := 264 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RoundedArrows( ) CLASS Flowchart // Specifies whether arrow segment joins should be rounded. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RoundedArrows") oMethod:iMemberid := 265 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RoundedArrows(; uParam001; // AS LOGIC ) CLASS Flowchart // Specifies whether arrow segment joins should be rounded. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RoundedArrows") oMethod:iMemberid := 265 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS RoundedArrowsRadius( ) CLASS Flowchart // The radius of the arc segment-joins of rounded arrows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RoundedArrowsRadius") oMethod:iMemberid := 266 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_R4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN RoundedArrowsRadius(; uParam001; // AS FLOAT (REAL4) ) CLASS Flowchart // The radius of the arc segment-joins of rounded arrows. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("RoundedArrowsRadius") oMethod:iMemberid := 266 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_R4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetTableAt(; docX,; // AS LONG docY; // AS LONG ) CLASS Flowchart // Gets the table lying at the specified location. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetTableAt") oMethod:iMemberid := 267 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 2 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := ITableItem{uRetValue} RETURN (uRetValue) METHOD OpenPreviewWindow(; left,; // AS LONG top,; // AS LONG width,; // AS LONG height; // AS LONG ) CLASS Flowchart // Displays the print-preview window. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("OpenPreviewWindow") oMethod:iMemberid := 268 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IPrintPreview{uRetValue} RETURN (uRetValue) CLASS IPrintPreview INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IPrintPreview SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 13 SELF:_dwVars := 0 RETURN SELF ACCESS WindowHandle( ) CLASS IPrintPreview // Returns the HWND handle of the print preview window. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("WindowHandle") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) METHOD SetWindowRect(; left,; // AS LONG top,; // AS LONG width,; // AS LONG height; // AS LONG ) CLASS IPrintPreview // Sets the preview window position. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SetWindowRect") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CurrentPage( ) CLASS IPrintPreview // Gets or sets the current page. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CurrentPage") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CurrentPage(; uParam001; // AS LONG ) CLASS IPrintPreview // Gets or sets the current page. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CurrentPage") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ZoomFactor( ) CLASS IPrintPreview // Gets or sets the peview window zoom level. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomFactor") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ZoomFactor(; uParam001; // AS LONG ) CLASS IPrintPreview // Gets or sets the peview window zoom level. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZoomFactor") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD MeasureString(; STRING_,; // AS STRING Font,; // REF OBJECT width,; // REF LONG height; // REF LONG ) CLASS Flowchart // Measures the specified text, taking into consideration the current affine transform of the diagram. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("MeasureString") oMethod:iMemberid := 269 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW + VTS_PDISPATCH + VTS_PI4 + VTS_PI4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS VariantTag( ) CLASS Flowchart // Gets or sets custom data related to this chart. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 270 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name IF IsInstanceOfUsual(uRetValue, #IDispatch) uRetValue := OleAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN VariantTag(; uParam001; // AS USUAL ) CLASS Flowchart // Gets or sets custom data related to this chart. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 270 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DisableNoScroll( ) CLASS Flowchart // If scroll bars are unnecessary, disable them instead of removing them. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DisableNoScroll") oMethod:iMemberid := 271 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN DisableNoScroll(; uParam001; // AS LOGIC ) CLASS Flowchart // If scroll bars are unnecessary, disable them instead of removing them. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DisableNoScroll") oMethod:iMemberid := 271 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD SaveToXml(; FileName; // AS STRING ) CLASS Flowchart // Saves the diagram into an XML file. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SaveToXml") oMethod:iMemberid := 272 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD LoadFromXml(; FileName; // AS STRING ) CLASS Flowchart // Loads the diagram from an XML file. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("LoadFromXml") oMethod:iMemberid := 273 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD CreateDecorationLine(; x1,; // AS LONG y1,; // AS LONG x2,; // AS LONG y2; // AS LONG ) CLASS Flowchart // Creates a new decoration line. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CreateDecorationLine") oMethod:iMemberid := 274 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 4 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_I4 + VTS_I4 + VTS_I4 + VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IDecorationLine{uRetValue} RETURN (uRetValue) CLASS IDecorationLine INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IDecorationLine SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 40 SELF:_dwVars := 0 RETURN SELF ACCESS Color( ) CLASS IDecorationLine // The line is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Color") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN Color(; uParam001; // AS USERTYPE (LONG) ) CLASS IDecorationLine // The line is painted in this color LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Color") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Tag( ) CLASS IDecorationLine // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Tag(; uParam001; // AS LONG ) CLASS IDecorationLine // User-defined data LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Tag") oMethod:iMemberid := 2 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenStyle( ) CLASS IDecorationLine // The line is painted with pen of this style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN PenStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS IDecorationLine // The line is painted with pen of this style LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenStyle") oMethod:iMemberid := 3 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS PenWidth( ) CLASS IDecorationLine // The line is painted with pen of this width LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN PenWidth(; uParam001; // AS LONG ) CLASS IDecorationLine // The line is painted with pen of this width LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("PenWidth") oMethod:iMemberid := 4 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Locked( ) CLASS IDecorationLine // Prevents the user from modifying the line LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Locked(; uParam001; // AS LOGIC ) CLASS IDecorationLine // Prevents the user from modifying the line LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Locked") oMethod:iMemberid := 5 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD GetDecorationLine( ) CLASS IDecorationLine // for internal use LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("GetDecorationLine") oMethod:iMemberid := 6 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := 29 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Selected( ) CLASS IDecorationLine // Returns TRUE if the line is selected LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Selected") oMethod:iMemberid := 7 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZLevelUp( ) CLASS IDecorationLine // Moves the line up in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelUp") oMethod:iMemberid := 8 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZLevelDown( ) CLASS IDecorationLine // Moves the line down in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZLevelDown") oMethod:iMemberid := 9 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZBottom( ) CLASS IDecorationLine // Moves the line at the bottom of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZBottom") oMethod:iMemberid := 10 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD ZTop( ) CLASS IDecorationLine // Moves the line at the top of the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZTop") oMethod:iMemberid := 11 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ZIndex( ) CLASS IDecorationLine // The index of the line in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ZIndex(; uParam001; // AS LONG ) CLASS IDecorationLine // The index of the line in the Z order LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ZIndex") oMethod:iMemberid := 12 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD BeginUndoRecord(; inclConnected; // AS LOGIC ) CLASS IDecorationLine // Start recording programmatic operations on this line for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("BeginUndoRecord") oMethod:iMemberid := 13 oMethod:wInvokeKind := INVOKE_METHOD oMethod:nParams := 1 oMethod:lNamedArgs := TRUE oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD EndUndoRecord( ) CLASS IDecorationLine // Stop recording programmatic operations on this line for later undo LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("EndUndoRecord") oMethod:iMemberid := 14 oMethod:wInvokeKind := INVOKE_METHOD uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CtrlPtX(; Index; // AS LONG ) CLASS IDecorationLine // X coordinate of line control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtX") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CtrlPtX(; Index,; // AS LONG uParam002; // AS LONG ) CLASS IDecorationLine // X coordinate of line control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtX") oMethod:iMemberid := 15 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS CtrlPtY(; Index; // AS LONG ) CLASS IDecorationLine // Y coordinate of line control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtY") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN CtrlPtY(; Index,; // AS LONG uParam002; // AS LONG ) CLASS IDecorationLine // Y coordinate of line control point LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("CtrlPtY") oMethod:iMemberid := 16 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 2 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 + VTS_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Visible( ) CLASS IDecorationLine // Visibility status of the line LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Visible(; uParam001; // AS LOGIC ) CLASS IDecorationLine // Visibility status of the line LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Visible") oMethod:iMemberid := 17 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS Printable( ) CLASS IDecorationLine // Enables or disables printing an line LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN Printable(; uParam001; // AS LOGIC ) CLASS IDecorationLine // Enables or disables printing an line LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Printable") oMethod:iMemberid := 18 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS VariantTag( ) CLASS IDecorationLine // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) // To use a pre-defined class here, // change OLEAutoObject to desired class name IF IsInstanceOfUsual(uRetValue, #IDispatch) uRetValue := OleAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN VariantTag(; uParam001; // AS USUAL ) CLASS IDecorationLine // User data of VARIANT type LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("VariantTag") oMethod:iMemberid := 19 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS ToolTip( ) CLASS IDecorationLine // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BSTR uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ToolTip(; uParam001; // AS STRING ) CLASS IDecorationLine // Text displayed as a tooltip LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTip") oMethod:iMemberid := 20 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BSTRW uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) METHOD Clone( ) CLASS IDecorationLine // Creates a copy of this line. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Clone") oMethod:iMemberid := 21 oMethod:wInvokeKind := INVOKE_METHOD oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IDecorationLine{uRetValue} RETURN (uRetValue) ACCESS Decorations( ) CLASS Flowchart // Collection of all decoration lines in the diagram. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Decorations") oMethod:iMemberid := 275 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IDecorations{uRetValue} RETURN (uRetValue) CLASS IDecorations INHERIT OLEAutoObject METHOD Init(ObjID, fROTCHECK) CLASS IDecorations SUPER:Init(ObjID, 0, .T., fRotCheck) SELF:_dwFuncs := 10 SELF:_dwVars := 0 RETURN SELF ACCESS _NewEnum( ) CLASS IDecorations LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("_NewEnum") oMethod:iMemberid := -4 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ACCESS Item(; Index; // AS LONG ) CLASS IDecorations LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("Item") oMethod:iMemberid := 0 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:nParams := 1 oMethod:lNamedArgs := FALSE oMethod:cParamTypes := VTS_I4 oMethod:bRetType := VT_DISPATCH uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IDecorationLine{uRetValue} RETURN (uRetValue) ACCESS count( ) CLASS IDecorations LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("count") oMethod:iMemberid := 1 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS SelectedDecorations( ) CLASS Flowchart // Collection of the selected decorations. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("SelectedDecorations") oMethod:iMemberid := 276 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_DISPATCH uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) uRetValue := IDecorations{uRetValue} RETURN (uRetValue) ACCESS ToolTipAutoPop( ) CLASS Flowchart // Gets or sets the length of time in milliseconds the ToolTip window remains visible if the pointer is not moved. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTipAutoPop") oMethod:iMemberid := 277 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN ToolTipAutoPop(; uParam001; // AS LONG ) CLASS Flowchart // Gets or sets the length of time in milliseconds the ToolTip window remains visible if the pointer is not moved. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("ToolTipAutoPop") oMethod:iMemberid := 277 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_I4 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS DrawAxBoxShapes( ) CLASS Flowchart // Specifies whether to render shapes behind ActiveX boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DrawAxBoxShapes") oMethod:iMemberid := 278 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN DrawAxBoxShapes(; uParam001; // AS LOGIC ) CLASS Flowchart // Specifies whether to render shapes behind ActiveX boxes. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("DrawAxBoxShapes") oMethod:iMemberid := 278 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS InplaceEditAcceptOnEnter( ) CLASS Flowchart // End inplace editing and accept changes when ENTER is pressed. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InplaceEditAcceptOnEnter") oMethod:iMemberid := 279 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN InplaceEditAcceptOnEnter(; uParam001; // AS LOGIC ) CLASS Flowchart // End inplace editing and accept changes when ENTER is pressed. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InplaceEditAcceptOnEnter") oMethod:iMemberid := 279 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS InplaceEditCancelOnEsc( ) CLASS Flowchart // End inplace editing and cancel changes when ESC is pressed. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InplaceEditCancelOnEsc") oMethod:iMemberid := 280 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := VT_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ASSIGN InplaceEditCancelOnEsc(; uParam001; // AS LOGIC ) CLASS Flowchart // End inplace editing and cancel changes when ESC is pressed. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("InplaceEditCancelOnEsc") oMethod:iMemberid := 280 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_BOOL uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AlignmentGuideColor( ) CLASS Flowchart // The color of node alignment guides. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AlignmentGuideColor") oMethod:iMemberid := 281 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN AlignmentGuideColor(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // The color of node alignment guides. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AlignmentGuideColor") oMethod:iMemberid := 281 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) ACCESS AlignmentGuideStyle( ) CLASS Flowchart // The dash style of alignment guides. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AlignmentGuideStyle") oMethod:iMemberid := 282 oMethod:wInvokeKind := INVOKE_PROPERTYGET oMethod:bRetType := 29 uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) IF (IsInstanceOfUsual(uRetValue, #IDispatch)) // To use a pre-defined class here, // change OLEAutoObject to desired class name uRetValue := OLEAutoObject{uRetValue} ENDIF RETURN (uRetValue) ASSIGN AlignmentGuideStyle(; uParam001; // AS USERTYPE (LONG) ) CLASS Flowchart // The dash style of alignment guides. LOCAL oMethod AS cOleMethod LOCAL uRetValue AS USUAL oMethod := cOleMethod{} oMethod:symName := String2Symbol("AlignmentGuideStyle") oMethod:iMemberid := 282 oMethod:wInvokeKind := INVOKE_PROPERTYPUT oMethod:nParams := 1 oMethod:cParamTypes := VTS_VARIANT uRetValue := SELF:oAuto:__Invoke(oMethod, DWORD(_BP+16),PCount()) RETURN (uRetValue) RESOURCE NewWindow1 DIALOGEX 5, 18, 263, 130 STYLE DS_3DLOOK|DS_MODALFRAME|WS_POPUP|WS_CAPTION|WS_SYSMENU CAPTION "Dialog Caption" FONT 8, "MS Shell Dlg" BEGIN END CLASS NewWindow1 INHERIT DIALOGWINDOW //{{%UC%}} USER CODE STARTS HERE (do NOT remove this line) METHOD Init(oParent,uExtra) CLASS NewWindow1 self:PreInit(oParent,uExtra) SUPER:Init(oParent,ResourceID{"NewWindow1",_GetInst()},TRUE) SELF:Caption := "Dialog Caption" SELF:HyperLabel := HyperLabel{#NewWindow1,"Dialog Caption",NULL_STRING,NULL_STRING} self:PostInit(oParent,uExtra) return self