34 lines
604 B
Plaintext
34 lines
604 B
Plaintext
Type TSDocxBordersRange = Class(TSDocxBorders)
|
|
|
|
public
|
|
Function Init(arr);
|
|
Function Operator[](index);override;
|
|
|
|
private
|
|
range_arr_;
|
|
|
|
public
|
|
Function Item(Index);override;
|
|
|
|
End;
|
|
|
|
|
|
// ============== 实现 ================= //
|
|
Function TSDocxBordersRange.Init(arr);
|
|
Begin
|
|
range_arr_ := arr;
|
|
End;
|
|
|
|
Function Operator TSDocxBordersRange.[](index);override;
|
|
Begin
|
|
border_obj := new TSDocxBorderRange(self.Application, self.Creator, self.Parent);
|
|
border_obj.Init(range_arr_, index);
|
|
return border_obj;
|
|
End;
|
|
|
|
// function
|
|
Function TSDocxBordersRange.Item(Index);override;
|
|
Begin
|
|
return self[Index];
|
|
End;
|