升级单元格样式,新增对象说明(TOfficeObj.tsf)文档
This commit is contained in:
+2161
-1849
File diff suppressed because it is too large
Load Diff
@@ -346,7 +346,7 @@ Type TSExcelFile = Class
|
||||
return workbook_.InsertCol(sheet, col);
|
||||
End;
|
||||
|
||||
///插入行,在指定列前插入空白行
|
||||
///插入行,在指定行前插入空白行
|
||||
///sheet: string,工作表名称
|
||||
///row: int
|
||||
///返回: [err, info]
|
||||
|
||||
@@ -8,6 +8,14 @@ public
|
||||
ExtNodes := array();
|
||||
End
|
||||
|
||||
Function HandleAttrs(); virtual;
|
||||
Begin
|
||||
End
|
||||
|
||||
Function HandleChildren(); virtual;
|
||||
Begin
|
||||
End
|
||||
|
||||
Function GetAttrs(); virtual;
|
||||
Begin
|
||||
return ExtAttr;
|
||||
@@ -60,9 +68,10 @@ public
|
||||
arr := array('type': 'element', 'name': children[i]['name'], 'attributes': array());
|
||||
if node_type = 'empty' then // <b/>
|
||||
begin
|
||||
// child_arr[len] := arr;
|
||||
// ++len;
|
||||
// continue;
|
||||
end
|
||||
else if node_type = 'empty_string' then
|
||||
begin
|
||||
if ifstring(obj) then arr['attributes'] := array(key : obj);
|
||||
end
|
||||
else if node_type = 'pcdata' then
|
||||
begin
|
||||
|
||||
@@ -264,7 +264,7 @@ Type xlsxWorkBook = Class
|
||||
while ifObj(node) do
|
||||
Begin
|
||||
name := node.GetAttribute('name');
|
||||
if name = sourceName then
|
||||
if name = LowerCase(sourceName) then
|
||||
Begin
|
||||
node.SetAttribute('name', destName);
|
||||
break;
|
||||
|
||||
Reference in New Issue
Block a user