All Frameworks Object Hierarchy This Framework Previous Next Indexes
IUnknown | +---IDispatch | +---CATBaseUnknown | +---CATBaseDispatch | +---AnyObject | +---DrawingTable
o Property AnchorPoint( | ) As CatTablePosition |
MyTable.AnchorPoint = CatTableBottomLeft
o Property Angle( | ) As double |
PI = 3.1415926535 X = MyTable.Angle = PI/2
o Property ComputeMode( | ) As CatTableComputeMode |
MyTable.ComputeMode = CatTableOFF
o Property Leaders( | ) As CATIADrawingLeaders (Read Only) |
Dim LeaderCollection As DrawingLeaders Set LeaderCollection = MyTable.Leaders
o Property NumberOfColumns( | ) As long (Read Only) |
oNbCol = MyTable.NumberOfColumns
o Property NumberOfRows( | ) As long (Read Only) |
oNbRow = MyTable.NumberOfRows
o Property x( | ) As double |
X = MyTable.x
o Property y( | ) As double |
NewYCoordinate = 100 MyTable.y = NewYCoordinate
o Sub AddColumn( | long | iCol) |
iCol = 0 MyTable.AddColumn iCol
o Sub AddRow( | long | iRow) |
iRow = 2 MyTable.AddRow iRow
o Func GetCellAlignment( | long | iRow, |
long | iCol) As CatTablePosition |
iRow = 1 iCol = 3 oAlign = MyTable.GetCellAlignment(iRow, iCol)
o Func GetCellBorderType( | long | iRow, |
long | iCol) As CatTableBorderType |
iRow = 1 iCol = 3 oType = MyTable.GetCellBorderType(iRow, iCol)
o Func GetCellName( | long | iRow, |
long | iCol) As CATBSTR |
iRow = 1 iCol = 2 oName = MyTable.GetCellName(iRow, iCol)
o Func GetCellObject( | long | iRow, |
long | iCol) As CATIADrawingText |
iRow = 1 iCol = 3 Set MyText = MyTable.GetCellObject(iRow, iCol)
o Func GetCellString( | long | iRow, |
long | iCol) As CATBSTR |
iRow = 1 iCol = 4 oString = MyTable.GetCellString(iRow, iCol)
o Sub GetCellsMerge( | CATSafeArrayVariant | oListOfMergeCells) |
nbrow = MyTable.NumberOfRows nbcol = MyTable.NumberOfColumns sizetab = nbrow*nbcol ReDim infoMerge (sizetab-1) MyTable.GetCellsMerge(oListOfmergeCells)
o Func GetColumnSize( | long | iCol) As double |
iCol = 1 oColSize = MyTable.GetColumnSize(iCol)
o Sub GetMergeInfos( | long | iRow, |
long | iCol, | |
long | oFirstRow, | |
long | oFirstCol, | |
long | oNbRow, | |
long | oNbCol) |
MyTable.GetMergeInfos 2, 3, oFirstRow, oFirstCol, oNbRow, oNbCol
o Func GetRowSize( | long | iRow) As double |
iRow = 1 oRowSize = MyTable.GetRowSize(iRow)
o Sub InvertMode( | CatTableInvertMode | iMode) |
MyTable.InvertMode CatInvertColumn
o Sub MergeCells( | long | iFirstRow, |
long | iFirstCol, | |
long | iNbRowMerge, | |
long | iNbColMerge) |
MyTable.MergeCells 2, 3, 3, 3
o Sub Move( | double | iDeltaX, |
double | iDeltaY) |
DeltaX = 20.0 DeltaY = 0.0 MyTable.Move DeltaX, DeltaY
o Sub RemoveColumn( | long | iCol) |
iCol = 1 MyTable.RemoveColumn iCol
o Sub RemoveRow( | long | iRow) |
iRow = 3 MyTable.RemoveRow iRow
o Sub Rotate( | double | iDeltaAngle) |
PI = 3.1415926535 MyTable.Rotate PI/4
o Sub SetCellAlignment( | long | iRow, |
long | iCol, | |
CatTablePosition | iAlign) |
iRow = 3 iCol = 2 MyTable.SetCellAlignment iRow, iCol, CatTableBottomLeft
o Sub SetCellBorderType( | long | iRow, |
long | iCol, | |
long | iType) |
iRow = 3 iCol = 2 MyTable.SetCellBorderType iRow, iCol, CatTableRight
o Sub SetCellName( | long | iRow, |
long | iCol, | |
CATBSTR | iName) |
iRow = 1 iCol = 2 iName = "Cell 2" MyTable.SetCellName iRow, iCol, iName
o Sub SetCellObject( | long | iRow, |
long | iCol, | |
CATIADrawingText | iText) |
iRow = 1 iCol = 3 MyTable.SetCellObject iRow, iCol, iText
o Sub SetCellString( | long | iRow, |
long | iCol, | |
CATBSTR | iString) |
iRow = 3 iCol = 2 iString = "Title" MyTable.SetCellString iRow, iCol, iString
o Sub SetColumnSize( | long | iCol, |
double | iColSize) |
iCol = 1 iColSize = 20 MyTable.SetColumnSize iCol, iColSize
o Sub SetRowSize( | long | iRow, |
double | iRowSize) |
iRow = 1 iRowSize = 20 MyTable.SetRowSize iRow, iRowSize
o Sub UnMergeCells( | long | iRow, |
long | iCol) |
MyTable.UnMergeCells 3, 5
Copyright © 2003, Dassault Systèmes. All rights reserved.