v1.0.5

Demo/ExcelHelp.tsl

@@ -125,7 +125,7 @@ Begin
 	row++;
 
 	hyperlink := TOfficeObj('THyperLink');
-	hyperlink.LinkType := "Location";
+	hyperlink.LinkType := "location";
 	hyperlink.LinkUrl := "Functions!" $ c1;
 
 	file.SetCellHyperLink("ExcelFile", cell1, hyperlink);
@@ -693,10 +693,9 @@ style.Protection.Lock := 1;
 		('ObjName': 'THyperLink',
 		 'Desc': ('THyperLink有以下属性: '),
 		 'AttrInfo': (
-			('attrName': 'LinkType', 'type': 'string', 'desc': '超链接类型', 'value': array('"External": 外部超链接', '"Location"': 内部超链接)),
+			('attrName': 'LinkType', 'type': 'string', 'desc': '超链接类型', 'value': array('"external": 外部超链接', '"location"': 内部超链接)),
 			('attrName': 'LinkUrl', 'type': 'string', 'desc': '超链接地址', 'value': array()),
 			('attrName': 'Tooltip', 'type': 'string', 'desc': '超链接悬浮提示内容', 'value': array()),
-			('attrName': 'Display', 'type': 'string', 'desc': '单元格显示的内容', 'value': array()),
 					 ),
 		 'Demo': '',
 		),

Demo/wordHelp.tsl

@@ -1,3 +1,4 @@
+///Version:V1.03
 ///Create by Tinysoft.
 ///自动生成 TSDocxFile 帮助文件
 mtic;
@@ -68,7 +69,7 @@ v := docx.SaveAs('', UTF8ToAnsi('DocxFile使用帮助.docx'));
 println('Test Over!\n  Save {}: {},time={}秒', file, v, mtoc);
 
 //info := GetProfilerInfo(true);
-//exportfile(ftstream(),'','f:\\temp\\ProfilerInfo.stm',info);
+//exportfile(ftstream(),'','\\temp\\ProfilerInfo.stm',info);
 
 ///////////////////////////////////////////////////////////////////////////////////////////////
 ///子函数
@@ -956,8 +957,8 @@ Begin
 		r := select thisrowindex+1 as 'row' from data where [1] = key end;
 		begRow := r[0]['row'];
 		endRow := r[length(r)-1]['row'];
-		[err, begCell] := xlsx_call("CoordinatesToCellName", 2, begRow);
-		[err, endCell] := xlsx_call("CoordinatesToCellName", 2, endRow);
+		[err, begCell] := CoordinatesToCellName(2, begRow);
+		[err, endCell] := CoordinatesToCellName(2, endRow);
 		tbl.Merge(begCell, endCell, true);
 		
 		//设置合并单元格据中对齐