增加range方法支持

This commit is contained in:
csh
2024-01-19 17:37:26 +08:00
parent b4649653d9
commit 1ac447c94e
10 changed files with 152 additions and 64 deletions
+2 -2
View File
@@ -3,7 +3,7 @@ Uses TSDocxEnumerations;
public
Function Init(rangeObj);
Function Apply();overload;
Function Apply();override;
Function ReWrite(pr);override;
private
@@ -115,7 +115,7 @@ Begin
class(TSDocxFont).Init(nil);
End;
Function TSDocxFontRange.Apply();overload;
Function TSDocxFontRange.Apply();override;
Begin
CallFunction(ThisFunction(class(TSDocxFont).Apply));
End;