Declare Sub SelectObject App(ByVal x As Double, ByVal y As Double, ByVal bExtend As Integer)
Declare Sub UnSelectObject App(ByVal x As Double, ByVal y As Double)
Declare Sub UnSelectAll App()
Declare Sub SelectBlock App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double, ByVal bExtend As Integer)
Declare Sub SelectAll App()
Declare Sub FindParts App(ByVal value As String, ByVal bMatchCase As Integer)
Declare Sub FindNets App(ByVal value As String, ByVal bMatchCase As Integer)
Declare Sub FindOffPageConnectors App(ByVal value As String, ByVal bMatchCase As Integer)
Declare Sub FindHierarchicalPorts App(ByVal value As String, ByVal bMatchCase As Integer)
Declare Sub FindBookMarks App(ByVal value As String, ByVal bMatchCase As Integer)
Declare Sub FindDRCMarks App(ByVal value As String, ByVal bMatchCase As Integer)
Declare Sub FindText App(ByVal value As String, ByVal bMatchCase As Integer)
Declare Sub Cut App()
Declare Sub Copy App()
Declare Sub Paste App(ByVal x As Double, ByVal y As Double)
Declare Sub Delete App()
Declare Sub Move App(ByVal x As Double, ByVal y As Double, ByVal bOrthogonalCase As Integer)
Declare Sub Duplicate App(ByVal x As Double, ByVal y As Double)
Declare Sub Drag App(ByVal x As Double, ByVal y As Double, ByVal bOrthogonalCase As Integer)
Declare Sub Rotate App()
Declare Sub MirrorVertical App()
Declare Sub MirrorHorizontal App()
Declare Sub SetColor App(ByVal nColorId As Integer)
Declare Sub SetLineStyle App(ByVal nLineStyleId As Integer)
Declare Sub SetLineWidth App(ByVal nLineWidthId As Integer)
Declare Sub SetFillStyle App(ByVal nFillStyleId As Integer)
Declare Sub SetHatchStyle App(ByVal nFillStyleId As Integer)
Declare Sub SetFont App(ByVal Facename As String, ByVal nHeight As Long, ByVal bBold As Integer, ByVal bItalic As Integer)
Declare Sub SetFontEx App( ByVal Facename As String, ByVal nHeight As Long, ByVal nWidth As Long, ByVal nEscapement As Long, ByVal nOrientation As Long, ByVal bBold As Integer, ByVal bItalic As Integer, ByVal bUnderline As Integer, ByVal bStrikeOut As Integer, ByVal nCharSet As Integer, ByVal nOutPrecision As Integer, ByVal nClipPrecision As Integer, ByVal nQuality As Integer, ByVal nPitchAndFamily As Integer)
Declare Sub Group App()
Declare Sub Ungroup App()
Declare Sub PlacePart App(ByVal x As Double, ByVal y As Double, ByVal libName As String, ByVal pkgName As String, ByVal device As String, ByVal convert As Integer)
Declare Sub PlacePartWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub ReplacePart App(ByVal libName As String, ByVal pkgName As String, ByVal partName As String, ByVal device As String)
Declare Sub PlaceWire App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceBus App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceBusEntry App(ByVal x As Double, ByVal y As Double, ByVal bRotate As Integer)
Declare Sub PlaceJunction App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceNetAlias App(ByVal x As Double, ByVal y As Double, ByVal netAlias As String)
Declare Sub PlaceNetAliasWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlacePower App(ByVal x As Double, ByVal y As Double, ByVal libName As String, ByVal symbolName As String, ByVal PowerName As String)
Declare Sub PlacePowerWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceGround App(ByVal x As Double, ByVal y As Double, ByVal libName As String, ByVal symbolName As String, ByVal GroundName As String)
Declare Sub PlaceGroundWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlacePort App(ByVal x As Double, ByVal y As Double, ByVal libName As String, ByVal symbolName As String, ByVal PortName As String)
Declare Sub PlacePortWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceOffPage App(ByVal x As Double, ByVal y As Double, ByVal libName As String, ByVal symbolName As String, ByVal OffPageName As String)
Declare Sub PlaceOffPageWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceBlock App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double, ByVal libName As String, ByVal viewName As String, ByVal instName As String, ByVal primitiveType As String)
Declare Sub PlaceBlockWithDialog App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlacePin App(ByVal x As Double, ByVal y As Double, ByVal pinName As String, ByVal pinType As String, ByVal bIsBus As Integer)
Declare Sub PlacePinWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceNoConnect App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceTitleBlock App(ByVal x As Double, ByVal y As Double, ByVal libName As String, ByVal symbolName As String, ByVal titleblockName As String)
Declare Sub PlaceTitleBlockWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceBookMark App(ByVal x As Double, ByVal y As Double, ByVal libName As String, ByVal symbolName As String, ByVal markName As String)
Declare Sub PlaceBookMarkWithDialog App(ByVal x As Double, ByVal y As Double)
Declare Sub PlaceText App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double, ByVal commentText As String)
Declare Sub PlaceTextWithDialog App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceLine App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceRectangle App(ByVal x1 As Double,ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceEllipse App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceArc App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double, ByVal x3 As Double, ByVal y3 As Double, ByVal x4 As Double, ByVal y4 As Double)
Declare Sub PlacePolyline App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceNextPolylinePoint App(ByVal x As Double, ByVal y As Double)
Declare Sub PlacePolygon App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub PlaceNextPolygonPoint App(ByVal x As Double, ByVal y As Double)
Declare Sub PlacePicture App(ByVal x As Double, ByVal y As Double, ByVal fileName As String)
Declare Sub EndPlace App()
Declare Sub ViewPalette App(ByVal x As Integer)
Declare Sub ViewToolbar App(ByVal x As Integer)
Declare Sub ViewStatusBar App(ByVal x As Integer)
Declare Sub ViewGrid App(ByVal x As Integer)
Declare Sub ViewGridReference App(ByVal x As Integer)
Declare Sub GoToRelative App(ByVal x As Double, ByVal y As Double)
Declare Sub GoToAbsolute App(ByVal x As Double, ByVal y As Double)
Declare Sub GoToGridReference App(ByVal x As String, ByVal y As String)
Declare Sub GoToBookMark App(ByVal markName As String)
Declare Sub ZoomIn App()
Declare Sub ZoomOut App()
Declare Sub ZoomArea App(ByVal x1 As Double, ByVal y1 As Double, ByVal x2 As Double, ByVal y2 As Double)
Declare Sub ZoomAll App()
Declare Sub ZoomSelection App()
Declare Sub ZoomScale App(ByVal scale as Integer)
Declare Sub SetProperty App(ByVal propName As String, ByVal propValue As String)
Declare Sub SetOccProperty App(ByVal propName As String, ByVal propValue As String)
Declare Sub GetProperty App(ByVal propName As String, ByRef propValue As String)
Declare Sub GetOccProperty App(ByVal propName As String, ByRef propValue As String)
Declare Sub DisplayProperty App(ByVal propName As String, ByVal Facename As String, ByVal nHeight As Integer, ByVal bBold As Integer, ByVal bItalic As Integer, ByVal colorId as Integer, ByVal rotation as Integer)
Declare Sub DisplayPropertyEx App(ByVal propName As String, ByVal Facename As String, ByVal nHeight As Integer, ByVal nWidth As Integer, ByVal nEscapement As Integer, ByVal nOrientation As Integer, ByVal bBold As Integer, ByVal bItalic As Integer, ByVal bUnderline As Integer, ByVal bStrikeOut As Integer, ByVal nCharSet As Integer, ByVal nOutPrecision As Integer, ByVal nClipPrecision As Integer, ByVal nQuality As Integer, ByVal nPitchAndFamily As Integer, ByVal colorId as Integer, ByVal rotation as Integer)
Declare Sub RemoveProperty App(ByVal propName As String)
Declare Sub RemoveOccProperty App(ByVal propName As String)
Declare Sub RemoveDisplayProperty App(ByVal propName As String)
Declare Sub ShowSpreadsheet App()
