Type TSDocxCells = Class(TSVbaBase) public Function Init(table); private table_; // TOfficeObj("TTable") public Function Add(BeforeCell); Function AutoFit(); Function Delete(ShiftCells); Function DistributeHeight(); Function DistributeWidth(); Function Item(Index); Function Merge(); Function SetHeight(RowHeight, HeightRule); Function SetWidth(ColumnWidth, RulerStyle); Function Split(NumRows, NumColumns, MergeBeforeSplit); property Borders read ReadBorders; property Count read ReadCount; property Height read ReadHeight write WriteHeight; property HeightRule read ReadHeightRule write WriteHeightRule; property NestingLevel read ReadNestingLevel; property PreferredWidth read ReadPreferredWidth write WritePreferredWidth; property PreferredWidthType read ReadPreferredWidthType write WritePreferredWidthType; property Shading read ReadShading; property VerticalAlignment read ReadVerticalAlignment write WriteVerticalAlignment; property Width read ReadWidth write WriteWidth; Function WriteWidth(); Function ReadWidth(); Function WriteVerticalAlignment(); Function ReadVerticalAlignment(); Function ReadShading(); Function WritePreferredWidthType(); Function ReadPreferredWidthType(); Function WritePreferredWidth(); Function ReadPreferredWidth(); Function ReadNestingLevel(); Function WriteHeightRule(); Function ReadHeightRule(); Function WriteHeight(); Function ReadHeight(); Function ReadCount(); Function ReadBorders(); End; // ============== 实现 ================= //