25 lines
481 B
Plaintext
25 lines
481 B
Plaintext
Type TSDocxBordersTable = Class(TSDocxBorders)
|
|
|
|
public
|
|
Function Init(table);
|
|
Function Operator[](index);override;
|
|
|
|
private
|
|
table_;
|
|
|
|
End;
|
|
|
|
|
|
// ============== 实现 ================= //
|
|
Function TSDocxBordersTable.Init(table);
|
|
Begin
|
|
table_ := table;
|
|
End;
|
|
|
|
Function Operator TSDocxBordersTable.[](index);override;
|
|
Begin
|
|
border_table_obj := new TSDocxBorderTable(self.Application, self.Creator, self.Parent);
|
|
border_table_obj.Init(table_, index);
|
|
return border_table_obj;
|
|
End;
|