开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > OA系统 > 查看源码
fcRep.js
资源名称：OA.rar　[点击查看]
上传用户：mingda
上传日期：2017-06-20
资源大小：27691k
文件大小：128k
源码类别：

OA系统

开发平台：

Java

fcRep.js：源码内容
  1. //2002.06.19 北京方成公司 梅勇
  3. //写隐藏div用于装表数据的备份
  4. document.write('<div id=tCopy style="DISPLAY: none; "></div>')
  5. //装入报表提示等待
  6. document.write('<div id=ShowWait  style="BACKGROUND-COLOR: antiquewhite;  COLOR: red; DISPLAY: none; FONT-SIZE: x-large; FONT-STYLE: normal; FONT-WEIGHT: bold; HEIGHT: 600px; LEFT:0px; position:absolute; TOP: 0px; WIDTH: 800px; Z-INDEX: 100">&nbsp;&nbsp;正在装入，请稍候...</div>')
  7. //装入用于开发的一排报表
  8. LoadButton()
  10. document.write('<TEXTAREA id=txt1 rows=3 style="DISPLAY: none; HEIGHT: 52px; LEFT: 132px; POSITION: absolute; TOP: 345px; WIDTH: 302px"></TEXTAREA>')
  12. var curKeyCode //用于webgrid中直接按键输入时运行timer时传递当前输入字符及原串
  14. var fc_wherexml="" //当前的XML条件串
  15. var fc_curpage=1 //当前页号
  16. var fc_allpages=1 //总页数
  17. //用于处理查询字段的输入和输出参数
  18. var sActFieldIn=""
  19. var sActFieldOut=""
  21. var blnMouseDown=false //在表格上mousedown时此变量为真
  22. //用于当移到边界外时捕获鼠标,自动滚动.
  23. var blnCapture=false
  24. var iTimeID=0
  25. var iTimeID1=0
  26. var iTimeID2=0
  27. var iTimeID3=0
  28. var tdEndSel //
  29. //---------------------
  30. //选择时,记录起止单元的坐标
  31. var sTop,sLeft,sWidth,sHeight,eTop,eLeft,eWidth,eHeight
  32. //记录选择时的起止单元格的物理位置
  33. var sRow,sCol,eRow,eCol
  34. //排好序后的位置
  35. var sRowSort,sColSort,eRowSort,eColSort
  36. //处于运行模式
  37. var blnRunMode=false
  38. //决定报表是否变化了
  39. var blnChange=false
  40. //不要运行表格的mouseup,thead_onclick时只运行在mousedown
  41. var NoRunMouseUp=false
  42. //当显示全部时要自动加行，将行数存此全局变量中
  43. var AutoAddLines=0
  44. //---------------------
  46. var lngUndo=-1
  47. var lngRedo=-1
  48. var oUndo
  49. oUndo=new ActiveXObject("Microsoft.XMLDOM")
  50. oUndo.async ="false";
  51. oUndo.loadXML("<root></root>")
  52. var oRedo
  53. oRedo=new ActiveXObject("Microsoft.XMLDOM")
  54. oRedo.async ="false";
  55. oRedo.loadXML("<root></root>")
  56. //---------------------
  59. var oFormula
  60. oFormula=new ActiveXObject("Microsoft.XMLDOM")
  61. oFormula.async ="false";
  62. oFormula.loadXML("<root></root>")
  64. var oGraph
  65. oGraph=new ActiveXObject("Microsoft.XMLDOM")
  66. oGraph.async ="false";
  67. oGraph.loadXML("<root></root>")
  70. //用于检查公式嵌套时ExpandFormula函数,传一个成功与失败的参数
  71. var bCheckFormula=false
  72. //保存公式嵌套错误信息的数组
  73. var arrCheckFormula=new Array()
  75. function ErrorFormula(sGetcell,sFormula,RC){
  76. this.sGetcell=sGetcell //"GETCELL(2,3)"
  77. this.sFormula=sFormula //"B2+B3"
  78. this.RC=RC //"C3"
  79. }
  80. /**
  81. *表格MOUSEDOWN事件处理,处理选择区域
  82. **/
  83. function t_onmousedown() {
  84. //show("t_onmousedown")
  85. var obj=event.srcElement 
  86. if (event.button ==2)
  87. return;
  89. if(obj.tagName=="TD"){
  90. //alert(grid.ReadOnly)
  91. //如果只读
  92. var s1=obj.getAttribute("pressenter")
  93. if(grid.ReadOnly && s1==null){
  94.  return
  95. }
  97. //-------
  98. if(t.rows(0).style.cursor=="default" && t.childNodes(0).childNodes(0).style.cursor=="default"){
  99. if(thead_onclick()){
  101. return
  102. }
  103. }
  105. }
  106. if(obj.id!="txtMyGrid"){
  107. if (obj.tagName!="TD" || obj.parentNode.rowIndex==0 || obj.cellIndex==0)
  108. return
  109. }
  110. //固定行上不能选择
  111. //if (blnFixRowDrap && obj.parentNode.rowIndex<lngFixRows) return
  112. //if (bShowMenu)
  113. showFontProperty(obj)
  114. blnMouseDown=true
  115. //if (t.rows(0).style.cursor =="move" || t.childNodes(0).childNodes(0).style.cursor =="move"){
  117. //}
  118. //else {
  119. if (blnCapture==false) {
  120. //show("Capture")
  121. blnCapture=true
  122. t.setCapture()
  123. }
  124. //}
  125. sLeft=obj.offsetLeft //初始位置
  126. sTop=obj.offsetTop 
  127. sWidth=obj.offsetWidth 
  128. sHeight=obj.offsetHeight 
  129. if(t.style.borderLeftStyle=="none")
  130. sLeft++
  131. if(t.style.borderTopStyle=="none")
  132. sTop++
  134. eLeft=sLeft 
  135. eTop=sTop 
  136. eWidth=sWidth 
  137. eHeight=sHeight 
  138. var i
  139. //下面两个循环计算起始行列值
  140. var tmp=1
  141. for (i=0;i<=t.rows(0).cells.length-1;i++)
  142. {
  143. if(t.childNodes(0).childNodes(i).style.pixelWidth>0) 
  144. tmp=tmp+t.childNodes(0).childNodes(i).style.pixelWidth
  145. if (tmp==sLeft)
  146. {
  147. sCol=i+1
  148. while (t.childNodes(0).childNodes(sCol).style.pixelWidth==0) {
  149. sCol=sCol+1
  150. if (sCol==t.rows(0).cells.length-1)
  151. break;
  152. }
  153. break;
  154. }
  156. }
  157. tmp=1
  158. for (i=0;i<t.rows.length;i++)
  159. {
  160. if (t.rows(i).style.display!="none") 
  161. tmp=tmp+t.rows(i).style.pixelHeight
  162. if (tmp==sTop)
  163. {
  164. sRow=i+1
  165. while (t.rows(sRow).style.display=="none") {
  166. sRow=sRow+1
  167. if (sRow==t.rows.length-1)
  168. break;
  169. }
  170. break;
  171. }
  173. }
  174. //当选中一个合并单元时
  175. var arr=PhyToLog(sRow,sCol)
  176. var iRowSpan=t.rows(arr[0]).cells(arr[1]).rowSpan
  177. var iColSpan=t.rows(arr[0]).cells(arr[1]).colSpan
  178. eRow=sRow+iRowSpan-1
  179. eCol=sCol+iColSpan-1
  180. sRowSort=sRow
  181. sColSort=sCol
  182. eRowSort=eRow
  183. eColSort=eCol
  185. showBlueRect()
  186. showBlueScale(sRow,sCol,sRow,sCol)
  187. //先运行控件外的onmousedown
  188. var curObjTmp=event.srcElement
  189. if(curObjTmp.tagName!="TD") return
  190. if (curObjTmp.parentNode.rowIndex>0 && curObjTmp.cellIndex>0) {
  191. //if(typeof curObj=="undefined") curObj=curObjTmp
  192. try {
  193. grid.actcellchange(curObjTmp)
  194. }
  195. catch (e){}
  196. //curObj=curObjTmp
  197. //mcurRow=curObj.parentNode.rowIndex
  198. //mcurCol=curObj.cellIndex
  199. grid.moveedit(curObjTmp)
  200. }
  202. }
  203. /**
  204. *表格MOUSEMOVE事件处理,处理选择区域
  205. **/
  207. function t_onmousemove() {
  209. if (event.button ==2)
  210. return;
  211. if (blnMouseDown && grid.autosize==false) {
  212. if  (event.y>grid.top+grid.height-17) {
  213. if (iTimeID==0) {
  214. iTimeID=window.setInterval("grid.Scroll(2)",200)
  215. }
  216. }
  217. else
  218. {
  219. if (iTimeID!=0) {
  220. window.clearInterval(iTimeID)
  221. }
  222. iTimeID=0
  223. }
  225. if  (event.y<grid.top) {
  226. if (iTimeID1==0) {
  227. iTimeID1=window.setInterval("grid.Scroll(1)",200)
  228. }
  229. }
  230. else
  231. {
  232. if (iTimeID1!=0) {
  233. window.clearInterval(iTimeID1)
  234. }
  235. iTimeID1=0
  236. }
  238. if  (event.x<=grid.left+35) {//35左边列宽
  239. if (iTimeID2==0) {
  240. iTimeID2=window.setInterval("grid.Scroll(3)",200)
  241. }
  242. }
  243. else
  244. {
  245. if (iTimeID2!=0) {
  246. window.clearInterval(iTimeID2)
  247. }
  248. iTimeID2=0
  249. }
  250. if  (event.x>=grid.left+grid.width-17) {//17右边滚动条宽
  251. if (iTimeID3==0) {
  252. iTimeID3=window.setInterval("grid.Scroll(4)",200)
  253. }
  254. }
  255. else
  256. {
  257. if (iTimeID3!=0) {
  258. window.clearInterval(iTimeID3)
  259. }
  260. iTimeID3=0
  261. }
  263. }
  265. t.style.cursor="default"
  267. var obj=event.srcElement 
  269. if (obj.tagName!="TD" || obj.parentNode.rowIndex==0 || obj.cellIndex==0)
  270. return
  271. if ( blnMouseDown==true){
  273. document.selection.clear()
  274. eLeft=obj.offsetLeft 
  275. eTop=obj.offsetTop 
  276. eWidth=obj.offsetWidth 
  277. eHeight=obj.offsetHeight 
  278. //show("sLeft="+sLeft+" sTop="+sTop+" sWidth="+sWidth+" sHeight="+sHeight
  279. //+" eLeft="+eLeft+" eTop="+eTop+" eWidth="+eWidth+" eHeight="+eHeight)
  280. tdEndSel=obj
  281. showBlueRect()
  282. }
  283. }
  284. /**
  285. *表格MOUSEUP事件处理,处理选择区域
  286. **/
  288. function t_onmouseup() {
  289. if(NoRunMouseUp) {
  290. NoRunMouseUp=false
  291. return
  292. }
  293. var bTmp=false
  294. blnMouseDown=false
  295. if (blnCapture) {
  296. if (iTimeID!=0) {
  297. window.clearInterval(iTimeID)
  298. bTmp=true
  299. }
  300. iTimeID=0
  301. if (iTimeID1!=0) {
  302. window.clearInterval(iTimeID1)
  303. bTmp=true
  304. }
  305. iTimeID1=0
  306. if (iTimeID2!=0) {
  307. window.clearInterval(iTimeID2)
  308. bTmp=true
  309. }
  310. iTimeID2=0
  311. if (iTimeID3!=0) {
  312. window.clearInterval(iTimeID3)
  313. bTmp=true
  314. }
  315. iTimeID3=0
  317. blnCapture=false
  318. t.releaseCapture()
  320. }
  322. var obj,iRow,iCol
  323. var bTmp=false
  325. if (event.button ==2)
  326. return;
  327. //当光标移到表外时,取mousemove保留的结尾选择单元格(tdEndSel)
  328. if (event.y>grid.top+t.offsetHeight || event.y<grid.top || event.x<=grid.left+35 || event.x>=grid.left+t.offsetWidth ) 
  329. obj=tdEndSel
  330. else
  331. obj=event.srcElement 
  333. try{
  334. var sTest=obj.tagName
  335. }
  336. catch (e){
  337. obj=t.rows(0).cells(0)
  338. }
  339. if(obj.tagName=="TD"){
  340. //如果只读
  341. var s1=obj.getAttribute("pressenter")
  342. if(grid.ReadOnly && s1==null){
  343.  return
  344. }
  345. }
  346. try {
  347. if (obj.tagName!="TD"  || obj.cellIndex==0 || obj.parentNode.rowIndex==0 )
  348. return
  349. }
  350. catch (e){return}
  353. eLeft=obj.offsetLeft 
  354. eTop=obj.offsetTop 
  355. eWidth=obj.offsetWidth 
  356. eHeight=obj.offsetHeight
  360. //计算列宽行高,用于计算起止点的物理位置.
  361. var i,j
  362. var tmp=1
  363. for (i=0;i<=t.rows(0).cells.length-1;i++)
  364. {
  365. if(t.childNodes(0).childNodes(i).style.pixelWidth>0) { 
  366. tmp=tmp+t.childNodes(0).childNodes(i).style.pixelWidth
  367. }
  368. if (tmp==eLeft+eWidth)
  369. {
  370. eCol=i
  371. break;
  372. }
  373. }
  375. tmp=1
  376. for (i=0;i<t.rows.length;i++)
  377. {
  378. if (t.rows(i).style.display!="none")
  379. tmp=tmp+t.rows(i).style.pixelHeight
  380. if (tmp==eTop+eHeight)
  381. {
  382. eRow=i
  383. break;
  384. }
  385. }
  387. //show(sCol+" "+sRow+"  "+eCol+"  "+eRow)
  388. if(sRow>eRow){
  389. sRowSort=eRow
  390. eRowSort=sRow
  391. }
  392. else {
  393. sRowSort=sRow
  394. eRowSort=eRow
  395. }
  396. if(sCol>eCol){
  397. sColSort=eCol
  398. eColSort=sCol
  399. }
  400. else {
  401. sColSort=sCol
  402. eColSort=eCol
  403. }
  405. showBlueRect()
  406. showBlueScale(sRow,sCol,eRow,eCol)
  407.         if(blnRunMode==false){
  408. if (cmdBrush.getAttribute("fcDown")=="1") {
  409. cmdPasteFormat()
  410. cmdBrush.setAttribute("fcDown","0")
  411. cmdBrush.className="tblclassup"
  412. clearBlueScale()
  413. }
  414.         }
  415. }
  416. /**
  417. //表头点击处理
  419. **/
  420. function thead_onclick() {
  422. if (event.srcElement.tagName!="TD") return false
  423. var curColNo=event.srcElement.cellIndex
  424. var curRowNo=event.srcElement.parentNode.rowIndex
  425. if(curColNo==0 && curRowNo==0) {
  426. //点左上角
  427. selectRange(1,1,t.rows.length-1,t.rows(0).cells.length-1)
  428. NoRunMouseUp=true
  429. }
  430. else if(curRowNo==0) {
  431. //点第一列
  432. selectRange(1,curColNo,t.rows.length-1,curColNo)
  433. NoRunMouseUp=true
  434. }
  435. else if(curColNo==0){
  436. //点第一行
  437. selectRange(curRowNo,1,curRowNo,t.rows(0).cells.length-1)
  438. NoRunMouseUp=true
  439. }
  440. return  NoRunMouseUp
  442. }
  444. /**
  445. *清除兰色的选中框
  446. **/
  447. function clearBlueScale(){
  448. tc.style.display ="none"
  449. for(var i=0;i<t.rows.length;i++)
  450. t.rows(i).cells(0).style.color="black"
  451. for(var j=0;j<t.rows(0).cells.length;j++)
  452. t.rows(0).cells(j).style.color="black"
  453. hideTxt()
  454. }
  455. /**
  456. *隐藏输入文本框
  457. **/
  458. function hideTxt(){
  459. txtMyGrid.style.display="none"
  461. }
  462. /**
  463. *显示兰色的选中框
  464. **/
  465. function showBlueScale(r0,c0,r1,c1){
  466. if(grid.ReadOnly) return
  467. //显示兰色的选中框
  468. var row0,col0,row1,col1 //物理位置
  469. //排序
  470. if (r1>r0){
  471. row0=r0
  472. row1=r1
  473. }
  474. else {
  475. row0=r1
  476. row1=r0
  477. }
  478. if (c1>c0){
  479. col0=c0
  480. col1=c1
  481. }
  482. else {
  483. col0=c1
  484. col1=c0
  485. }
  487. for (var i=0;i<t.rows.length;i++){
  488. if(i>=row0 && i<=row1 )
  489. t.rows(i).cells(0).style.color="blue"
  490. else
  491. t.rows(i).cells(0).style.color="black"
  492. }
  493. for (var i=0;i<t.rows(0).cells.length;i++){
  494. if(i>=col0 && i<=col1)
  495. t.rows(0).cells(i).style.color="blue"
  496. else
  497. t.rows(0).cells(i).style.color="black"
  498. }
  500. //显示框的背景色
  501. if (row0==row1 && col0==col1)//选中单个单元格
  502. tc.style.background ="white"
  503. else
  504. tc.style.background ="#e6e6fa"
  505. // if (lngStatus==3)//选中一个大的合并单元格
  506. // tc.style.background ="white"
  509. tc.style.display ="block"
  510. tc.style.zIndex =-1
  511. }
  512. /**
  513. *根据sLeft sTop sWidth sHeight eLeft eTop eWidth eHeight这八个全局变量的值计算兰框的位置
  514. **/
  515. function showBlueRect(){
  517. var curLeft,curTop,curWidth,curHeight
  518. /*
  519. var ssWidth,ssHeight
  520. if(sWidth>eWidth)
  521. ssWidth=sWidth
  522. else
  523. ssWidth=eWidth
  525. if(sHeight>eHeight)
  526. ssHeight=sHeight
  527. else
  528. ssHeight=eHeight
  529. */
  530. if (sLeft==eLeft && sTop==eTop) {
  531. curLeft=sLeft
  532. curTop=sTop
  533. curWidth=sWidth
  534. curHeight=sHeight
  535. }
  536. if (sLeft<=eLeft && sTop<=eTop)
  537. {
  538. curLeft=sLeft
  539. curTop=sTop
  540. curWidth=eWidth+eLeft-sLeft
  541. curHeight=eHeight+eTop-sTop
  542. }
  543. if (sLeft<=eLeft && sTop>eTop)
  544. {
  545. curLeft=sLeft
  546. curTop=eTop
  547. curWidth=eWidth+eLeft-sLeft
  548. curHeight=sHeight+sTop-eTop
  550. }
  551. if (sLeft>=eLeft && sTop>=eTop)
  552. {
  553. curLeft=eLeft
  554. curTop=eTop
  555. curWidth=sWidth+sLeft-eLeft
  556. curHeight=sHeight+sTop-eTop
  557. }
  558. if (sLeft>eLeft && sTop<=eTop)
  559. {
  560. curLeft=eLeft
  561. curTop=sTop
  562. curWidth=sWidth+sLeft-eLeft
  563. curHeight=eHeight+eTop-sTop
  564. }
  566. // tc.style.display ="block"
  567. // tc.style.zIndex =-1
  568. tc.style.left =curLeft
  569. tc.style.top =curTop
  570. tc.style.width =curWidth
  571. tc.style.height =curHeight
  572. }
  573. /**
  574. *选择某个区域的常用函数
  575. **/
  576. function selectRange(sRow1,sCol1,eRow1,eCol1){
  577. //
  578. sRow=sRow1
  579. sCol=sCol1
  580. eRow=eRow1
  581. eCol=eCol1
  582. if(sRow>eRow){
  583. sRowSort=eRow
  584. eRowSort=sRow
  585. }
  586. else {
  587. sRowSort=sRow
  588. eRowSort=eRow
  589. }
  590. if(sCol>eCol){
  591. sColSort=eCol
  592. eColSort=sCol
  593. }
  594. else {
  595. sColSort=sCol
  596. eColSort=eCol
  597. }
  598. showBlueScale(sRow,sCol,eRow,eCol)
  599. var arr=PhyToLog(sRow,sCol)
  600. var td1=t.rows(arr[0]).cells(arr[1])
  601. sLeft=td1.offsetLeft
  602. sTop=td1.offsetTop
  603. sWidth=td1.offsetWidth
  604. sHeight=td1.offsetHeight
  605. var arr1=PhyToLog(eRow,eCol)
  606. var td2=t.rows(arr1[0]).cells(arr1[1])
  607. eLeft=td2.offsetLeft
  608. eTop=td2.offsetTop
  609. eWidth=td2.offsetWidth
  610. eHeight=td2.offsetHeight
  611. showBlueRect()
  612. grid.moveedit(td1)
  613. }
  614. /**
  615. *单元格拆分
  616. **/
  617. function Split() {
  618. //show(sCol+" "+sRow+"  "+eCol+"  "+eRow)
  620. var lngStatus=SelStatus(sRow,sCol,eRow,eCol)
  621. if(lngStatus!=3) return
  623. //show(tCopy.innerHTML)
  624. var rCount=eRowSort-sRowSort+1 //合并的行数
  625. var cCount=eColSort-sColSort+1 //合并的列数
  626. //增加第一行之后的所有单元格
  627. for (var i=eRowSort;i>=sRowSort+1;i--){
  628. var tdsCol=PhyToLogCol(i,sColSort)
  629. //show("r="+i+" c="+sCol+" tdCol="+tdsCol)
  630. var tdeCol=eColSort-sColSort+tdsCol
  631. //show(tdeCol+" "+tdsCol)
  632. for (var j=tdsCol;j<=tdeCol;j++){
  633. if (tdsCol<t.rows(i).cells.length)
  634. t.rows(i).insertCell(tdsCol)
  635. else
  636. t.rows(i).insertCell()
  637. }
  638. }
  639. //增加第一行的第一个单元格之后的单元格
  640. var tdsCol=PhyToLogCol(sRowSort,sColSort)
  641. var tdeCol=eColSort-sColSort+tdsCol
  642. for (var j=tdsCol+1;j<=tdeCol;j++){
  643. if(tdsCol+1<t.rows(sRowSort).cells.length)
  644. t.rows(sRowSort).insertCell(tdsCol+1)
  645. else
  646. t.rows(sRowSort).insertCell()
  647. }
  648. //给第一单元格的rowSpan colSpan
  649. t.rows(sRowSort).cells(tdsCol).rowSpan=1
  650. t.rows(sRowSort).cells(tdsCol).colSpan=1
  652. CopytHtml()
  653. grid.moveedit()
  654. blnChange=true
  655. }
  656. /**
  657. *sRow sCol eRow eCol 单元格合并
  658. **/
  659. function Merge() {
  660. //
  661. //show(sCol+" "+sRow+"  "+eCol+"  "+eRow)
  662. var lngStatus=SelStatus(sRow,sCol,eRow,eCol)
  663. if(lngStatus!=4 ) return
  665. var rCount=eRowSort-sRowSort+1 //合并的行数
  666. var cCount=eColSort-sColSort+1 //合并的列数
  668. //删除第一行之后的所有单元格
  669. for (var i=eRowSort;i>=sRowSort+1;i--){
  670. var tdeCol=PhyToLogCol(i,eColSort)
  671. var tdsCol=PhyToLogCol(i,sColSort)
  673. for (var j=tdeCol;j>=tdsCol;j--){
  674. try {
  675. t.rows(i).deleteCell(j)
  676. }
  677. catch (e){}
  678. }
  679. }
  680. //删除第一行的第一个单元格之后的单元格
  681. var tdeCol=PhyToLogCol(sRowSort,eColSort)
  682. var tdsCol=PhyToLogCol(sRowSort,sColSort)
  683. for (var j=tdeCol;j>=tdsCol+1;j--){
  684. try {
  685. t.rows(sRowSort).deleteCell(j)
  686. }
  687. catch (e){}
  688. }
  689. //给第一单元格的rowSpan colSpan
  690. t.rows(sRowSort).cells(tdsCol).rowSpan=rCount
  691. t.rows(sRowSort).cells(tdsCol).colSpan=cCount
  694. CopytHtml()
  695. grid.moveedit()
  696. blnChange=true
  697. }
  698. function PhyToLog(row,col) {
  699. return PhyToLogTmp(row,col,1)
  700. }
  701. /**
  702. 求同一行物理列col的前面有多少个TD被合并了.然后返回col减去这个个数.
  703. 用于合并和拆分时找到删除TD和插入TD的位置
  704. **/
  705. function PhyToLogCol(row,col) {
  706. return PhyToLogTmp(row,col,3)
  708. }
  709. /**
  710. 物理位置-->逻辑位置(td位置)
  711.   A:获得TD 
  713. 找物理位置row,col,
  714. if物理位置row,col的单元格无tdCol属性
  715. 查找此行且小于此列共有多少个有tdCol属性的单元格,td位置=col-有tdCol属性的单元格个数
  716. 行为当前行.
  717. if物理位置row,col的单元格有tdCol属性,则td位置=tdCol,tdRow属性值 
  718. **/
  719. function PhyToLogTmp(row,col,iType) {
  721. //中间函数
  722. //iType=1 返回TD, =2 返回TD对应的逻辑列col, =3返回单元格对应当前行所处的列位置,  
  723. var t=tCopy.childNodes(0)
  724. var td_col=parseInt(t.rows(row).cells(col).getAttribute("tdCol"))
  725. var td_row=0
  727. var AddCols=0
  728. for(var j=0;j<col;j++){
  729. var tmp1=parseInt(t.rows(row).cells(j).getAttribute("tdCol"))
  730. if (isNaN(tmp1)==false) 
  731. AddCols++
  732. }
  734. if (isNaN(td_col)) {
  735. td_col=col-AddCols
  736. td_row=row
  737. }
  738. else {
  739. if(iType==3){
  740. td_col=col-AddCols
  741. }
  742. td_row=parseInt(t.rows(row).cells(col).getAttribute("tdRow"))
  743. if(isNaN(td_row)) td_row=0 //属于意外
  744. }
  745. //
  746. if(iType==1) {
  747. //alert("row:"+td_row+"col:"+td_col)
  748. //return t.rows(td_row).cells(td_col)
  749. var arr=new Array()
  750. arr[0]=td_row
  751. arr[1]=td_col
  752. return arr
  753. //返回一个TD行列值组成的数组
  754. }
  755. if(iType==2 || iType==3)
  756. return td_col
  757. }
  758. /**
  759. 逻辑位置(td位置)-->物理位置 {此时行号是不变,只需求列号}
  760.   A:一个单元格 B:一组单元格
  761. 找逻辑位置row,由小到大比较此行的列号和col(逻辑位置(td位置)),如单元格有tdCol属性则变量不加1,否则加1,
  762. 直到此变量等于col为至,此时当前单元格的列号即为物理位置的列号.
  764. 如是一组单元格则返回左上角单元格的列号
  765. **/
  766. function LogToPhy(row,col) {
  767. var colRet
  768. var AddCols=-1
  769. for(var j=0;j<tCopy.childNodes(0).rows(row).cells.length;j++){
  770. var tmp1=parseInt(tCopy.childNodes(0).rows(row).cells(j).getAttribute("tdCol"))
  771. if (isNaN(tmp1)) 
  772. AddCols++
  773. if(AddCols==col) {
  774. colRet=j
  775. break
  776. }
  777. }
  779. return colRet
  780. }
  781. /**
  782. 区域物理位置(sRow,sCol,eRow,eCol)-->判断:
  783. 0 意外,超出表格的行或列范围
  784. 1 一个单纯独立的单元格
  785. 2 一个合并单元格中的一部分
  786. 3 一个单纯的合并单元格
  787. 4 多个单纯独立的单元格组成的区域
  788. 5 整个合并单元格和小单元格组成的区域
  789. 直接输入或超链接:
  790. 一个小单元格/一个合并单元格
  791. 增删行列
  792. 一个小单元格
  793. 能合并
  794. 4多个小单元格组成的区域/5由整个合并单元加一些小单元格组成的区域
  795. 不能合并
  796. 一个小单元格/一个合并单元格/一个合并单元格的一部分
  797. 能拆分
  798. 3一个合并单元格
  799. 不能拆分
  800. NOT 一个合并单元格
  801. 设置字体等单元格属性
  802. 一个小单元格/一个合并单元格/多个小单元格组成的区域/由整个合并单元加一些小单元格组成的区域
  803. 在一个合并单元格的一部分+一些小单元格组成的区域情况下直接取单元格进行设置
  805. **/
  806. function SelStatus(sRow,sCol,eRow,eCol){
  807. //如果兰框未显示或行列超范围则返回0
  808. if(tc.style.display=="none" )
  809. return 0
  810. if(sRow==eRow && sCol==eCol) {
  811. return 1
  812. }
  813. var t=tCopy.childNodes(0)
  815. var colCount
  816. var rowCount=parseInt(t.rows(sRowSort).cells(sColSort).getAttribute("rowCount"))
  817. if(isNaN(rowCount)==false){
  818. colCount=parseInt(t.rows(sRowSort).cells(sColSort).getAttribute("colCount"))
  819. //show(rowCount+"=="+(eRowTmp-sRowTmp))
  820. if(rowCount-1==eRowSort-sRowSort && colCount-1==eColSort-sColSort){
  821. //只有一个合并单元格
  822. return 3
  823. }
  824. }
  826. //-------
  827. //判断区域中:包含整个合并单元/包含部分合并单元
  828. //如果合并单元格的主单元格在区域外,则肯定是包含部分合并单元
  829. //如果有一个合并单元格的主单元格+rowCount/+colCount超出区域的话,则肯定是包含部分合并单元
  830. var bMerge=false //是否有合并单元标志
  831. var bAllMerge=true //是否包含整个合并单元标志
  832. for(var i=sRowSort;i<=eRowSort;i++){
  833. for(var j=sColSort;j<=eColSort;j++){
  834. var rowCount=parseInt(t.rows(i).cells(j).getAttribute("rowCount"))
  835. if(isNaN(rowCount)==false){
  836. bMerge=true
  837. var colCount=parseInt(t.rows(i).cells(j).getAttribute("colCount"))
  838. if(i+rowCount-1>eRowSort || j+colCount-1>eColSort){
  839. bAllMerge=false
  840. }
  841. }
  843. var td_col=parseInt(t.rows(i).cells(j).getAttribute("tdCol"))
  844. if(isNaN(td_col)==false){
  845. var td_row=parseInt(t.rows(i).cells(j).getAttribute("tdRow"))
  846. if(td_row<sRowSort || td_row>eRowSort || td_col<sColSort || td_col>eColSort){
  847. //在区域外
  848. bAllMerge=false
  849. }
  850. bMerge=true
  851. }
  852. }
  853. }
  855. if(bMerge==false){ //一组小单元格
  856. return 4
  857. }
  858. if(bMerge){
  859. if (bAllMerge){
  860. //如果包含整个合并单元
  861. return 5
  862. }
  863. else {
  864. //包含部分合并单元
  865. return 2
  866. }
  867. }
  869. }
  870. //将物理位置-->逻辑位置(td位置)
  871. //td的列号,因行号相同
  872. /**计算方法:
  873. 将合并单元格按顺序展开,新加的单元格加一个tdCol属性用于标识此单元格对应的td位置.
  875. 物理位置-->逻辑位置(td位置)
  876.   A:获得TD 
  878. 找物理位置row,col,
  879. if物理位置row,col的单元格无tdCol属性
  880. 查找此行且小于此列共有多少个有tdCol属性的单元格,td位置=col-有tdCol属性的单元格个数
  881. 行为当前行.
  882. if物理位置row,col的单元格有tdCol属性,则td位置=tdCol,tdRow属性值 
  886. 逻辑位置(td位置)-->物理位置 {此时行号是不变,只需求列号}
  887.   A:一个单元格 B:一组单元格
  888. 找逻辑位置row,由小到大比较此行的列号和col(逻辑位置(td位置)),如单元格有tdCol属性则变量不加1,否则加1,
  889. 直到此变量等于col为至,此时当前单元格的列号即为物理位置的列号.
  891. *复制t.outerHTML
  893. **/
  894. function CopytHtml() {
  896. var s1=t.outerHTML
  897. s1=fc_RepStr(s1," id=t "," ")
  898. tCopy.innerHTML=s1
  899. ExpandTab(tCopy.childNodes(0))
  900. }
  901. /**
  902. *将合并单元格按顺序展开,新加的单元格加一个tdRow,tdCol属性用于标识此单元格对应的td位置.
  903. **/
  904. function ExpandTab(t) {
  907. // var d=new Date()
  908. // var t2=d.getTime()
  910. var curAddCell
  911. for (var i=0;i<t.rows.length ;i++) {
  912. for (var j=0;j<t.rows(i).cells.length ;j++) {
  913. var curTD=t.rows(i).cells(j)
  915. var lngRows=parseInt(curTD.rowSpan)
  916. if (isNaN(lngRows))lngRows=0
  917. var lngCols=parseInt(curTD.colSpan)
  918. if (isNaN(lngCols))lngCols=0
  919. if(lngCols>1 || lngRows>1 ) {
  920.     var td_col=0
  921.     var td_row=0
  922.     td_col=parseInt(curTD.getAttribute("tdCol"))
  923.     if(isNaN(td_col)==false) {
  924.     //表示此单元格为一个生成的合并单元格
  925. td_row=parseInt(curTD.getAttribute("tdRow"))
  926. if (isNaN(td_row)) td_row=0 //属于意外
  928.     }
  929.     else {
  930. //原始合并单元加上如下属性
  931. curTD.setAttribute("rowCount",curTD.rowSpan)
  932. curTD.setAttribute("colCount",curTD.colSpan)
  933. //curTD.innerText="rC="+curTD.rowSpan+" cC="+curTD.colSpan
  934. //--------
  935. //因此行以前的合并格已展开,应减去
  936. var AddCols=0
  937. for(var jjj=0;jjj<=j;jjj++){
  938. var tmp1=parseInt(t.rows(i).cells(jjj).getAttribute("tdCol"))
  939. if (isNaN(tmp1)==false) 
  940. AddCols++
  941. }
  942. td_col=j-AddCols
  943. td_row=i
  945.     }
  946. }
  947. if (lngCols>1) {
  949. curTD.colSpan=1
  950. //补齐当前行的后面的单元
  951. for (var jjj=1;jjj<=lngCols-1;jjj++) {
  952. if (j>=t.rows(i).cells.length)
  953. curAddCell=t.rows(i).insertCell()//加到结尾
  954. else
  955. curAddCell=t.rows(i).insertCell(j+1)
  956. curAddCell.setAttribute("tdRow",td_row)
  957. curAddCell.setAttribute("tdCol",td_col)
  958. //curAddCell.innerText="R="+td_row+" C="+td_col
  959. curAddCell.innerText=curTD.innerText
  960. }
  963. }
  964. //rowSpan>1
  965. if (lngRows>1 ) {
  966.     curTD.rowSpan=1
  967. //修改rowspan值,合并单元格下移
  968. var addCols=0
  969. //计算下一行同一列之前应缩小多少列
  970. for (var jjj=0;jjj<j; jjj++) {
  971. if(jjj>=t.rows(i+1).cells.length) break
  973. var c=parseInt(t.rows(i+1).cells(jjj).colSpan)
  974. if (isNaN(c)) c=1
  975. addCols=addCols+c-1
  976. }
  978. //if (i==2) alert("j="+j+" "+addCols)
  979. curAddCell=t.rows(i+1).insertCell(j-addCols)
  980. //生成的单元格应保存初始合并单元格的td row,col
  981. curAddCell.setAttribute("tdRow",td_row)
  982. curAddCell.setAttribute("tdCol",td_col)
  983. //curAddCell.innerText="R="+td_row+" C="+td_col
  984. curAddCell.innerText=curTD.innerText
  986. curAddCell.colSpan=lngCols
  987. curAddCell.rowSpan=lngRows-1
  988. //curAddCell.innerText="A"
  991. }
  992. } //列循环结束
  993. } //行循环结束
  995. // var d=new Date()
  996. // var t1=d.getTime()
  997. // alert(t1-t2)
  998. }
  1000. function show(val) {
  1001. txt1.style.display ="block"
  1002. txt1.style.zIndex =2
  1003. txt1.value =val
  1004. }
  1005. /**
  1006. *向单元格给值时处理小数位数
  1007. *curTD为要处理的单元格, v为要给的值
  1008. **/
  1009. function CellPoint(curTD,v) {
  1011. var v1=parseFloat(v)
  1012. if(isNaN(v1)==false){
  1013. //小数位数
  1014. var s1=curTD.getAttribute("pointnum")
  1015. if(s1!=null){
  1016. s1=parseInt(s1)
  1017. curTD.innerText=ContDec(v1,s1)
  1018. }
  1019. else {
  1020. curTD.innerText=v
  1021. }
  1022. }
  1023. else {
  1024. curTD.innerText=v
  1025. }
  1026. }
  1027. //*****************************************************************************************
  1028. //处理grid事件
  1029. //*****************************************************************************************
  1030. function grid_onVscroll() {
  1031. if(tc.style.display=="block"){
  1032. //show(sCol+" "+sRow+"  "+eCol+"  "+eRow)
  1033. //此处暂时用物理位置,到时要变成逻辑位置
  1034. var arr=PhyToLog(sRow,sCol)
  1035. var arr1=PhyToLog(eRow,eCol)
  1036. var tdStart=t.rows(arr[0]).cells(arr[1])
  1037. var tdEnd=t.rows(arr1[0]).cells(arr1[1])
  1039. //sLeft=tdStart.offsetLeft
  1040. sTop=tdStart.offsetTop
  1041. //sWidth=tdStart.offsetWidth
  1042. sHeight=tdStart.offsetHeight
  1044. //eLeft=tdEnd.offsetLeft
  1045. eTop=tdEnd.offsetTop
  1046. //eWidth=tdEnd.offsetWidth
  1047. eHeight=tdEnd.offsetHeight
  1049. //alert(sLeft+"=="+eLeft+"  "+sTop+"=="+eTop)
  1051. showBlueRect()
  1052. }
  1053. }
  1054. function grid_onHscroll() {
  1055. if(tc.style.display=="block"){
  1056. //show(sCol+" "+sRow+"  "+eCol+"  "+eRow)
  1057. //此处暂时用物理位置,到时要变成逻辑位置
  1058. var arr=PhyToLog(sRow,sCol)
  1059. var arr1=PhyToLog(eRow,eCol)
  1060. var tdStart=t.rows(arr[0]).cells(arr[1])
  1061. var tdEnd=t.rows(arr1[0]).cells(arr1[1])
  1062. sLeft=tdStart.offsetLeft
  1063. //sTop=tdStart.offsetTop
  1064. sWidth=tdStart.offsetWidth
  1065. //sHeight=tdStart.offsetHeight
  1066. eLeft=tdEnd.offsetLeft
  1067. //eTop=tdEnd.offsetTop
  1068. eWidth=tdEnd.offsetWidth
  1069. //eHeight=tdEnd.offsetHeight
  1070. showBlueRect()
  1071. }
  1072. }
  1073. /**
  1074. *插入行
  1075. **/
  1076. function InsRow(){
  1077. if(grid.ReadOnly) return
  1078. if (tc.style.display =="none" ) return
  1079. SaveoUndoOneRecord()
  1080. var minRow
  1081. if (sRow>eRow)
  1082. minRow=eRow
  1083. else
  1084. minRow=sRow
  1086. var iRows=Math.abs(eRow-sRow)
  1087. MoveFormula(minRow,iRows+1,1)
  1088. for(var i=0;i<=iRows;i++){
  1089. // grid.InsertRow(minRow)
  1090. //---------插入行
  1091. var tdCount=0 //记录此行共要插多少个TD
  1093. for (j=0;j<=t.rows(0).cells.length-1;j++){
  1094. //i,minCol单元的坐标换成逻辑坐标找到TD，判断
  1095. //如rowspan>1则i=i+rowspan-1,此TD的colspan>1则colspan=colspan-1,
  1096. //如果colspan=1则删除此TD
  1097. var arr=PhyToLog(minRow,j)
  1098. var curTD=t.rows(arr[0]).cells(arr[1])
  1100. if(minRow==arr[0] || (curTD.rowSpan==1 && curTD.colSpan==1)){
  1101. // alert(arr[0]+","+arr[1])
  1102. //t.rows(minRow).insertCell()
  1103. tdCount++
  1104. }
  1105. else { //从合并单元的半中间插入
  1106. if(curTD.colSpan>1){
  1107. j=j+curTD.colSpan-1
  1108. }
  1110. if(curTD.rowSpan>1){
  1111. curTD.rowSpan=curTD.rowSpan+1
  1112. }
  1113. }
  1115. }
  1116. //按照计算好的TD个数插入行
  1117. var oTr=t.insertRow(minRow)
  1118. oTr.style.height=21
  1119. for(j=0;j<tdCount;j++){
  1120. t.rows(minRow).insertCell();
  1121. }
  1122. //---------
  1123. }
  1124. //理顺行标
  1125. for (i=minRow;i<=t.rows.length-1;i++){
  1126. t.rows(i).cells(0).innerText=i
  1127. }
  1128. // txtMyGrid.style.top=txtMyGrid.style.pixelTop-(iRows+1)*21  //per row height=21
  1129. CopytHtml()
  1131. var arr=PhyToLog(sRow,sCol)
  1132. var moveTD=t.rows(arr[0]).cells(arr[1])
  1133. grid.moveedit(moveTD)
  1134. showBlueScale(sRow,sCol,eRow,eCol)
  1136. //从单元属性中将公式及预处理过后的公式装入oFormula中
  1137. LoadAllFormula()
  1138. //强制表格宽高同步
  1139. if(grid.autosize){
  1140. grid.autosize=true
  1141. }
  1143. SaveoRedoOneRecord()
  1144. blnChange=true
  1145. }
  1146. /**
  1147. *删除行
  1148. **/
  1149. function DelRow(){
  1150. if(grid.ReadOnly) return
  1151. if (tc.style.display =="none" ) return
  1152. //var lngStatus=SelStatus(sRow,sCol,eRow,eCol)
  1153. //if(lngStatus==2 || lngStatus==5 ) return
  1154. SaveoUndoOneRecord()
  1155. var minRow
  1156. if (sRow>eRow)
  1157. minRow=eRow
  1158. else
  1159. minRow=sRow
  1160. //如选择的兰框在最边上,则删除列后不再显示兰框
  1161. if(eRow==t.rows.length-1 || sRow==t.rows.length-1 ){
  1162. if(minRow==1){
  1163. alert("不能全部删除!")
  1164. return
  1165. }
  1167. }
  1168. clearBlueScale()
  1169. var iRows=Math.abs(eRow-sRow)
  1170. MoveFormula(minRow,-(iRows+1),1)
  1171. for(var i=0;i<=iRows;i++){
  1172. // grid.DeleteRow(minRow)
  1173. //---------列删除
  1174. // t.children[0].removeChild(t.children[0].children[minCol])
  1175. //固定行不能删除
  1176. //if(t.childNodes(0).childNodes.length<=lngFixCols )return
  1177. for (j=t.rows(0).cells.length-1;j>=0;j--){
  1178. //i,minCol单元的坐标换成逻辑坐标找到TD，判断
  1179. //如rowspan>1则i=i+rowspan-1,此TD的colspan>1则colspan=colspan-1,
  1180. //如果colspan=1则删除此TD
  1181. var arr=PhyToLog(minRow,j)
  1182. var curTD=t.rows(arr[0]).cells(arr[1])
  1184. if(curTD.rowSpan==1 && curTD.colSpan==1){
  1185. //
  1186. t.rows(arr[0]).deleteCell(arr[1])
  1187. }
  1188. else {
  1189. if(curTD.colSpan>1){
  1190. j=j-curTD.colSpan+1
  1191. }
  1193. if(curTD.rowSpan>1){
  1194. //alert(arr[0]+","+arr[1])
  1195. //如当前单元是合并单元的主单元格则合并单元下移
  1196. if (arr[0]==minRow){
  1197. var tdNode=t.rows(arr[0]).cells(arr[1]).cloneNode(true)
  1198. var iInsCol=PhyToLogCol(minRow+1,j)
  1199. t.rows(minRow+1).insertCell(iInsCol)
  1200. t.rows(minRow+1).cells(iInsCol).replaceNode(tdNode)
  1201. t.rows(minRow+1).cells(iInsCol).rowSpan=curTD.rowSpan-1
  1203. t.rows(arr[0]).deleteCell(arr[1])
  1204. }
  1205. else{
  1206. curTD.rowSpan=curTD.rowSpan-1
  1207. }
  1210. }
  1211. else if(curTD.rowSpan==1){
  1212. t.rows(arr[0]).deleteCell(arr[1])
  1213. }
  1214. }
  1216. }
  1217. t.deleteRow(minRow)
  1218. //-----------------
  1221. }
  1222. //理顺行标
  1223. for (i=minRow;i<=t.rows.length-1;i++){
  1224. t.rows(i).cells(0).innerText=i
  1225. }
  1227. CopytHtml()
  1228. if(tc.style.display=="block"){
  1229. var arr=PhyToLog(sRow,sCol)
  1230. var moveTD=t.rows(arr[0]).cells(arr[1])
  1231. grid.moveedit(moveTD)
  1232. showBlueScale(sRow,sCol,eRow,eCol)
  1233. }
  1234. //从单元属性中将公式及预处理过后的公式装入oFormula中
  1235. LoadAllFormula()
  1236. //强制表格宽高同步
  1237. if(grid.autosize){
  1238. grid.autosize=true
  1239. }
  1241. SaveoRedoOneRecord()
  1242. blnChange=true
  1243. }
  1244. /**
  1245. *插入列
  1246. **/
  1247. function InsCol(){
  1248. if(grid.ReadOnly) return
  1249. if (tc.style.display =="none" ) return
  1250. SaveoUndoOneRecord()
  1251. var minCol
  1252. if (sCol>eCol)
  1253. minCol=eCol
  1254. else
  1255. minCol=sCol
  1257. var iCols=Math.abs(eCol-sCol)
  1259. MoveFormula(minCol,iCols+1)
  1261. for(var i=0;i<=iCols;i++){
  1262. // grid.InsertCol(minCol)
  1263. //---------列插入
  1264. var o=document.createElement("COL")
  1265. o.style.width=70
  1266. var iPos=t.childNodes(0).childNodes.length-1
  1267. if (iPos>minCol)
  1268. iPos=minCol
  1269. t.children[0].insertBefore(o,t.children[0].children[iPos])
  1271. //固定行不能删除
  1272. //if(t.childNodes(0).childNodes.length<=lngFixCols )return
  1274. for (j=0;j<=t.rows.length-1;j++){
  1275. //i,minCol单元的坐标换成逻辑坐标找到TD，判断
  1276. //如rowspan>1则i=i+rowspan-1,此TD的colspan>1则colspan=colspan-1,
  1277. //如果colspan=1则删除此TD
  1278. var arr=PhyToLog(j,minCol)
  1279. var curTD=t.rows(arr[0]).cells(arr[1])
  1281. if(curTD.rowSpan==1 && curTD.colSpan==1){
  1282. // alert(arr[0]+","+arr[1])
  1283. t.rows(arr[0]).insertCell(arr[1])
  1284. }
  1285. else {
  1286. if(curTD.rowSpan>1){
  1287. j=j+curTD.rowSpan-1
  1288. }
  1290. if(curTD.colSpan>1){
  1291. curTD.colSpan=curTD.colSpan+1
  1292. }
  1293. //else if(curTD.colSpan==1){
  1294. // t.rows(arr[0]).deleteCell(arr[1])
  1295. //}
  1296. }
  1298. }
  1299. //-----------------
  1302. }
  1303. //理顺行标
  1304. for (i=minCol;i<=t.rows(0).cells.length-1;i++){
  1305. t.rows(0).cells(i).innerText=IntToLbl(i)
  1306. }
  1308. CopytHtml()
  1310. var arr=PhyToLog(sRow,sCol)
  1311. var moveTD=t.rows(arr[0]).cells(arr[1])
  1312. grid.moveedit(moveTD)
  1313. showBlueScale(sRow,sCol,eRow,eCol)
  1315. //从单元属性中将公式及预处理过后的公式装入oFormula中
  1316. LoadAllFormula()
  1317. //强制表格宽高同步
  1318. if(grid.autosize){
  1319. grid.autosize=true
  1320. }
  1322. SaveoRedoOneRecord()
  1323. blnChange=true
  1324. }
  1325. /**
  1326. *删除列
  1327. **/
  1328. function DelCol(){
  1329. if(grid.ReadOnly) return
  1330. if (tc.style.display =="none" ) return
  1331. //var lngStatus=SelStatus(1,sCol,t.rows.length-1,eCol)
  1332. //alert(lngStatus)
  1333. //if(lngStatus==2 || lngStatus==5 ) return
  1334. SaveoUndoOneRecord()
  1335. var minCol
  1336. if (sCol>eCol)
  1337. minCol=eCol
  1338. else
  1339. minCol=sCol
  1340. //如选择的兰框在最边上,则删除列后不再显示兰框
  1341. if(eCol==t.rows(0).cells.length-1 || sCol==t.rows(0).cells.length-1 ){
  1342. if(minCol==1){
  1343. alert("不能全部删除!")
  1344. return
  1345. }
  1347. }
  1348. clearBlueScale()
  1349. var iCols=Math.abs(eCol-sCol)
  1353. MoveFormula(minCol,-(iCols+1))
  1354. for(var i=0;i<=iCols;i++){
  1355. // grid.DeleteCol(minCol)
  1356. //---------列删除
  1357. t.children[0].removeChild(t.children[0].children[minCol])
  1358. //固定行不能删除
  1359. //if(t.childNodes(0).childNodes.length<=lngFixCols )return
  1361. for (j=0;j<=t.rows.length-1;j++){
  1362. //i,minCol单元的坐标换成逻辑坐标找到TD，判断
  1363. //如rowspan>1则i=i+rowspan-1,此TD的colspan>1则colspan=colspan-1,
  1364. //如果colspan=1则删除此TD
  1365. var arr=PhyToLog(j,minCol)
  1366. var curTD=t.rows(arr[0]).cells(arr[1])
  1368. if(curTD.rowSpan==1 && curTD.colSpan==1){
  1369. // alert(arr[0]+","+arr[1])
  1370. t.rows(arr[0]).deleteCell(arr[1])
  1371. }
  1372. else {
  1373. if(curTD.rowSpan>1){
  1374. j=j+curTD.rowSpan-1
  1375. }
  1377. if(curTD.colSpan>1){
  1378. curTD.colSpan=curTD.colSpan-1
  1379. }
  1380. else if(curTD.colSpan==1){
  1381. t.rows(arr[0]).deleteCell(arr[1])
  1382. }
  1383. }
  1385. }
  1386. //-----------------
  1388. }
  1389. //理顺行标
  1390. for (i=minCol;i<=t.rows(0).cells.length-1;i++){
  1391. t.rows(0).cells(i).innerText=IntToLbl(i)
  1392. }
  1394. CopytHtml()
  1395. if(tc.style.display=="block"){
  1396. var arr=PhyToLog(sRow,sCol)
  1397. var moveTD=t.rows(arr[0]).cells(arr[1])
  1398. grid.moveedit(moveTD)
  1399. showBlueScale(sRow,sCol,eRow,eCol)
  1400. }
  1401. //从单元属性中将公式及预处理过后的公式装入oFormula中
  1402. LoadAllFormula()
  1403. //强制表格宽高同步
  1404. if(grid.autosize){
  1405. grid.autosize=true
  1406. }
  1408. SaveoRedoOneRecord()
  1409. blnChange=true
  1410. }
  1412. /**
  1413. * 1--->A由索引号取得字母
  1414. **/
  1415. function IntToLbl(colno){
  1416. var strLbl="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
  1417. var inx=parseInt(colno/26)
  1418. if (inx>26)
  1419. return 
  1420. var strPrefix=strLbl.substring(inx-1,inx)
  1421. var strColLbl=strLbl.substring(colno-inx*26-1,colno-inx*26)
  1422. return strPrefix+strColLbl
  1423. }
  1424. /**
  1425. * A--->1由字母取得索引号，只支持最大长度为2的strS
  1426. **/
  1427. function LblToInt(strC){
  1428. var strLbl="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
  1429. var inx=strC.length
  1430. var iCol
  1431. if (inx==1)//一个字母
  1432. iCol=strLbl.indexOf(strC)+1
  1433. else//两个字母
  1434. {
  1435. iCol=(strLbl.indexOf(strC.substring(0,1))+1)*26+strLbl.indexOf(strC.substring(1,2))+1
  1436. }
  1437. return iCol
  1438. }
  1439. /**
  1440. * a1==>1,1
  1441. * strLbl="a1"
  1442. * 返回一个包括行列的数组
  1443. **/
  1444. function TransAto1(strLbl){
  1445.     if(isSpace(strLbl)) return
  1446.     
  1447.     strLbl=trim(strLbl)
  1448. var strChar,strInt
  1449. var iLength=strLbl.length-1
  1450. var iRow,iCol
  1451. var lngA
  1452. var dblR
  1453. for (var i=0;i<=iLength;i++){
  1454. lngA=parseInt(strLbl.charCodeAt(i))
  1455. if (lngA>=49 && lngA<=57){
  1456. var strChar=strLbl.substring(0,i)
  1457. var strInt=strLbl.substring(i,iLength+1)
  1458. break;
  1459. }
  1460. }
  1462. iRow=parseInt(strInt)
  1463. strChar=strChar.toUpperCase()
  1464. iCol=parseInt(LblToInt(strChar))
  1466. var sR=new Array(2)
  1467. sR[0]=iRow
  1468. sR[1]=iCol
  1469. return sR;
  1470. }
  1472. /**
  1473. *除去一节Style属性
  1474. *strSource 为源Style属性串
  1475. *strFind 为要除去的Style属性名
  1476. *返回除去后的Style属性串
  1477. **/
  1478. function RemovePartStyle(strSource,strFind) {
  1479. var strResult=""
  1480. var arrS
  1481. arrS=strSource.split(";")
  1482. for (var i=0;i<arrS.length;i++) {
  1483. var sUpper=arrS[i].toUpperCase()
  1484. if (sUpper.indexOf(strFind.toUpperCase())==-1)
  1485. strResult=strResult+arrS[i]+";"
  1486. }
  1487. return strResult
  1488. }
  1490. /**
  1491. *设置单元格的颜色,iTag=1则表示设置前景色,iDefault=0表示缺省
  1492. *@date 2001-05-09 
  1493. **/
  1494. function SetColor(colorValue,iTag,iDefault){
  1496. if (tc.style.display =="none")
  1497. return
  1498. SaveoUndoOneRecord()
  1499. for (var i=sRowSort;i<=eRowSort;i++){
  1500. for (var j=sColSort;j<=eColSort;j++){
  1501. var arr=PhyToLog(i,j)
  1502. var curTD=t.rows(arr[0]).cells(arr[1])
  1504. if(iTag==1){
  1505. if(iDefault==0){
  1506. //RemovePartStyle(curTD.style.cssText,"color")
  1507. curTD.style.color="#000000"
  1508. }
  1509. else{
  1510. curTD.style.color=colorValue
  1511. }
  1512. }
  1513. else {
  1514. if(iDefault==0)
  1515. curTD.removeAttribute("bgColor")
  1516. else
  1517. curTD.bgColor=colorValue
  1518. }
  1519. //alert(curTD.style.color)
  1520. }
  1521. }
  1522. blnChange=true
  1523. hideTxt()
  1524. SaveoRedoOneRecord()
  1525. }
  1526. /**
  1527. *画线方法, iTag=0-11 sLineStyle="1px solid"
  1528. **/
  1529. function DrawLine(iTag,sLineStyle){
  1531. if (iTag<0) return
  1532. if (tc.style.display =="none")
  1533. return
  1535. SaveoUndoOneRecord()
  1536. switch (iTag){
  1537. case 0: //网格线
  1538. for (var i=sRowSort-1;i<=eRowSort;i++)
  1539. funDrawHLine(i,sLineStyle,"bottom")
  1540. for (var i=sColSort-1;i<=eColSort;i++)
  1541. funDrawVLine(i,sLineStyle,"right")
  1543. break;
  1544. case 1: //框线
  1545. funDrawHLine(sRowSort,sLineStyle,"top")
  1546. funDrawHLine(eRowSort,sLineStyle,"bottom")
  1547. funDrawVLine(sColSort,sLineStyle,"left")
  1548. funDrawVLine(eColSort,sLineStyle,"right")
  1549. break;
  1551. case 2: //上
  1552. funDrawHLine(sRowSort,sLineStyle,"top")
  1553. break;
  1554. case 3: //下线
  1555. funDrawHLine(eRowSort,sLineStyle,"bottom")
  1556. break;
  1557. case 4: //左
  1558. funDrawVLine(sColSort,sLineStyle,"left")
  1559. break;
  1560. case 5: //右
  1561. funDrawVLine(eColSort,sLineStyle,"right")
  1562. break;
  1563. case 6: //右斜线
  1564. DrawVml();
  1565. break;
  1566. case 7: //网格线
  1567. for (var i=sRowSort-1;i<=eRowSort;i++)
  1568. funDrawHLine(i,sLineStyle,"bottom",1)
  1569. for (var i=sColSort-1;i<=eColSort;i++)
  1570. funDrawVLine(i,sLineStyle,"right",1)
  1572. break;
  1573. case 8: //框线
  1574. funDrawHLine(sRowSort,sLineStyle,"top",1)
  1575. funDrawHLine(eRowSort,sLineStyle,"bottom",1)
  1576. funDrawVLine(sColSort,sLineStyle,"left",1)
  1577. funDrawVLine(eColSort,sLineStyle,"right",1)
  1578. break;
  1580. case 9: //上
  1581. funDrawHLine(sRowSort,sLineStyle,"top",1)
  1582. break;
  1583. case 10: //下线
  1584. funDrawHLine(eRowSort,sLineStyle,"bottom",1)
  1585. break;
  1586. case 11: //左
  1587. funDrawVLine(sColSort,sLineStyle,"left",1)
  1588. break;
  1589. case 12: //右
  1590. funDrawVLine(eColSort,sLineStyle,"right",1)
  1591. break;
  1592. case 13: //右斜线
  1593. DelDrawVml();
  1594. break;
  1595. }
  1596. blnChange=true
  1597. SaveoRedoOneRecord()
  1598. }
  1599. /**
  1600. *画右斜线
  1601. **/
  1602. function DrawVml() {
  1603. //画斜线
  1604. if (tc.style.display =="none")
  1605. return
  1606. SaveoUndoOneRecord()
  1608. var arr=PhyToLog(sRow,sCol)
  1609. var curTD=t.rows(arr[0]).cells(arr[1])
  1610. var oRect=curTD.getBoundingClientRect()
  1611. var s1=(oRect.right-oRect.left-2)+"px,"+(oRect.bottom-oRect.top-2)+"px"
  1612. curTD.innerHTML='<v:line id=line1 style="position:relative" from = "0,0" to = "'+s1+'">'
  1614. blnChange=true
  1615. hideTxt()
  1616. SaveoRedoOneRecord()
  1617. }
  1618. /**
  1619. *删除右斜线
  1620. **/
  1621. function DelDrawVml() {
  1623. if (tc.style.display =="none")
  1624. return
  1625. SaveoUndoOneRecord()
  1627. var arr=PhyToLog(sRow,sCol)
  1628. var curTD=t.rows(arr[0]).cells(arr[1])
  1629. curTD.innerHTML=''
  1631. blnChange=true
  1632. hideTxt()
  1633. SaveoRedoOneRecord()
  1634. }
  1635. /**
  1636. *画一条横线的函数，rowno是物理行号，linePx是线粗+实虚，strKey是指画那边线
  1637. *iDelLine=1表示删线
  1638. **/
  1639. function funDrawHLine(rowno,linePx,strKey,iDelLine){
  1641. var i
  1642. for (i=sColSort;i<=eColSort;i++){
  1643. var arr=PhyToLog(rowno,i)
  1644. var curTD=t.rows(arr[0]).cells(arr[1])
  1645. if (strKey=="bottom"){
  1646. if (iDelLine==1)
  1647. curTD.style.cssText=RemovePartStyle(curTD.style.cssText,"border-Bottom")
  1648. else
  1649. curTD.style.borderBottom=linePx+" black"
  1650. }
  1651. else { //="top"
  1652. //找到上一单元的下线画
  1653. var arr1=PhyToLog(rowno-1,i)
  1654. var curTD1=t.rows(arr1[0]).cells(arr1[1])
  1655. if (iDelLine==1)
  1656. curTD1.style.cssText=RemovePartStyle(curTD1.style.cssText,"border-Bottom")
  1657. else
  1658. curTD1.style.borderBottom=linePx+" black"
  1659. }
  1660. }
  1661. }
  1662. /**
  1663. *画一条竖线的函数，colno是物理列号，linePx是线粗+实虚，strKey是指画那边线
  1664. *iDelLine=1表示删线
  1665. **/
  1666. function funDrawVLine(colno,linePx,strKey,iDelLine){
  1668. for (var i=sRowSort;i<=eRowSort;i++){
  1669. var arr=PhyToLog(i,colno)
  1670. var curTD=t.rows(arr[0]).cells(arr[1])
  1671. if (strKey=="right"){
  1672. if (iDelLine==1)
  1673. curTD.style.cssText=RemovePartStyle(curTD.style.cssText,"border-Right")
  1674. else
  1675. curTD.style.borderRight=linePx+" black"
  1676. }
  1677. else { //="left"
  1678. if(colno==1){
  1679. var arr1=PhyToLog(i,colno)
  1680. var curTD1=t.rows(arr1[0]).cells(arr1[1])
  1681. if (iDelLine==1)
  1682. curTD1.style.cssText=RemovePartStyle(curTD1.style.cssText,"border-Left")
  1683. else
  1684. curTD1.style.borderLeft=linePx+" black"
  1685. }
  1686. else {
  1687. //找到上一单元的下线画
  1688. var arr1=PhyToLog(i,colno-1)
  1689. var curTD1=t.rows(arr1[0]).cells(arr1[1])
  1690. if (iDelLine==1)
  1691. curTD1.style.cssText=RemovePartStyle(curTD1.style.cssText,"border-Right")
  1692. else
  1693. curTD1.style.borderRight=linePx+" black"
  1694. }
  1695. }
  1696. }
  1697. }
  1701. /**
  1702. *设置当前单元的字体
  1703. *@param strKey :B,I,U,F,S
  1704. **/
  1705. function cmdFont(strKey)
  1706. {
  1707. // if (SetReadOnly()) return
  1709. if (tc.style.display =="none")
  1710. return
  1711. // var i,j
  1712. // var sColno,eColno
  1713. SaveoUndoOneRecord()
  1715. // MatchRowCol()
  1716. // getColnoPerRow()
  1717. //选中单个的单元格的情况
  1718. var i,j
  1719. var sB=cmdFontBold.getAttribute("fcDown")
  1720. var sI=cmdFontItalic.getAttribute("fcDown")
  1721. var sU=cmdFontU.getAttribute("fcDown")
  1722. if (sB=="1") {
  1723. cmdFontBold.setAttribute("fcDown","0")
  1724. }
  1725. else {
  1726. cmdFontBold.setAttribute("fcDown","1")
  1727. }
  1728. if (sI=="1") {
  1729. cmdFontItalic.setAttribute("fcDown","0")
  1730. }
  1731. else {
  1732. cmdFontItalic.setAttribute("fcDown","1")
  1733. }
  1734. if (sU=="1") {
  1735. cmdFontU.setAttribute("fcDown","0")
  1736. }
  1737. else {
  1738. cmdFontU.setAttribute("fcDown","1")
  1739. }
  1741. for (i=sRowSort;i<=eRowSort;i++)
  1742. {
  1743. for (j=sColSort;j<=eColSort;j++)
  1744. {
  1745. var arr=PhyToLog(i,j)
  1746. var curTD=t.rows(arr[0]).cells(arr[1])
  1747. switch (strKey){
  1748. case "B":
  1749. if (sB=="1") {
  1750. curTD.style.fontWeight="normal"
  1751. }
  1752. else {
  1753. curTD.style.fontWeight="bold"
  1754. }
  1755. break;
  1756. case "I":
  1757. if (sI=="1") {
  1758. curTD.style.fontStyle="normal"
  1759. }
  1760. else {
  1761. curTD.style.fontStyle="italic"
  1762. }
  1763. break;
  1764. case "U":
  1765. if (sU=="1") {
  1766. curTD.style.textDecorationUnderline=false
  1767. }
  1768. else {
  1769. curTD.style.textDecorationUnderline=true
  1770. }
  1771. break;
  1772. case "F":
  1773. curTD.style.fontFamily=cboFont.options[cboFont.selectedIndex].text
  1774. break;
  1775. case "S":
  1776. curTD.style.fontSize=cboFontSize.options[cboFontSize.selectedIndex].text
  1777. break;
  1778. }
  1779. }
  1780. }
  1781. blnChange=true
  1782. hideTxt()
  1783. SaveoRedoOneRecord()
  1784. }
  1785. /**
  1786. *处理当前单元格的对齐
  1787. *@param strAlign:left,center,right,top,middle,bottom
  1788. *@param strOrient:h v
  1789. **/
  1790. function cmdAlign(strAlign,strOrient) 
  1791. {
  1792. //if (SetReadOnly()) return
  1793. //var sColno,eColno
  1794. if (tc.style.display =="none")
  1795. return
  1796. //判断按钮是按下还是恢复。
  1797. var blnPressDown=true
  1798. if((strAlign=="left" && cmdLeft.getAttribute("fcDown")=="1") 
  1799.  || (strAlign=="center" && cmdCenter.getAttribute("fcDown")=="1")
  1800.  || (strAlign=="right" && cmdRight.getAttribute("fcDown")=="1")
  1801.  || (strAlign=="top" && cmdTopv.getAttribute("fcDown")=="1")
  1802.  || (strAlign=="middle" && cmdMiddle.getAttribute("fcDown")=="1")
  1803.  || (strAlign=="bottom" && cmdBottomv.getAttribute("fcDown")=="1")
  1804. )
  1805. blnPressDown=false
  1806. //MatchRowCol()
  1807. // getColnoPerRow()
  1808. //选中单个的单元格的情况
  1809. SaveoUndoOneRecord()//在改变之前保存住位置，备undo时装入
  1810. var i,j
  1811. for (i=sRowSort;i<=eRowSort;i++){
  1812. for (j=sColSort;j<=eColSort;j++){
  1813. var arr=PhyToLog(i,j)
  1814. var curTD=t.rows(arr[0]).cells(arr[1])
  1815. if (strOrient=="h") {
  1816. if (strAlign=="left") {
  1817. if (blnPressDown==false) {
  1818. cmdLeft.setAttribute("fcDown","0")
  1819. curTD.align=""
  1820. }
  1821. else {
  1822. cmdLeft.setAttribute("fcDown","1")
  1823. cmdCenter.setAttribute("fcDown","0")
  1824. cmdRight.setAttribute("fcDown","0")
  1825. cmdCenter.className="tblclassup"
  1826. cmdRight.className="tblclassup"
  1827. curTD.align="left"
  1828. }
  1829. }
  1831. if (strAlign=="center") {
  1832. if (blnPressDown==false) {
  1833. cmdCenter.setAttribute("fcDown","0")
  1834. curTD.align=""
  1835. }
  1836. else {
  1837. cmdLeft.setAttribute("fcDown","0")
  1838. cmdCenter.setAttribute("fcDown","1")
  1839. cmdRight.setAttribute("fcDown","0")
  1840. cmdLeft.className="tblclassup"
  1841. cmdRight.className="tblclassup"
  1843. curTD.align="center"
  1844. }
  1845. }
  1846. if (strAlign=="right") {
  1847. if (blnPressDown==false) {
  1848. cmdRight.setAttribute("fcDown","0")
  1849. curTD.align=""
  1850. }
  1851. else {
  1852. cmdLeft.setAttribute("fcDown","0")
  1853. cmdCenter.setAttribute("fcDown","0")
  1854. cmdRight.setAttribute("fcDown","1")
  1855. cmdLeft.className="tblclassup"
  1856. cmdCenter.className="tblclassup"
  1857. curTD.align="right"
  1859. }
  1861. }
  1862. }
  1863. if (strOrient=="v") {
  1864. if (strAlign=="top") {
  1865. if (blnPressDown==false) {
  1866. cmdTopv.setAttribute("fcDown","0")
  1867. curTD.vAlign=""
  1868. }
  1869. else {
  1870. cmdTopv.setAttribute("fcDown","1")
  1871. cmdMiddle.setAttribute("fcDown","0")
  1872. cmdBottomv.setAttribute("fcDown","0")
  1873. cmdMiddle.className="tblclassup"
  1874. cmdBottomv.className="tblclassup"
  1875. curTD.vAlign="top"
  1876. }
  1877. }
  1878. if (strAlign=="middle") {
  1879. if (blnPressDown==false) {
  1880. cmdMiddle.setAttribute("fcDown","0")
  1881. curTD.vAlign=""
  1882. }
  1883. else {
  1884. cmdTopv.setAttribute("fcDown","0")
  1885. cmdMiddle.setAttribute("fcDown","1")
  1886. cmdBottomv.setAttribute("fcDown","0")
  1887. cmdTopv.className="tblclassup"
  1888. cmdBottomv.className="tblclassup"
  1889. curTD.vAlign="middle"
  1890. }
  1891. }
  1892. if (strAlign=="bottom") {
  1893. if (blnPressDown==false) {
  1894. cmdMiddle.setAttribute("fcDown","0")
  1895. curTD.vAlign=""
  1896. }
  1897. else {
  1898. cmdTopv.setAttribute("fcDown","0")
  1899. cmdMiddle.setAttribute("fcDown","0")
  1900. cmdBottomv.setAttribute("fcDown","1")
  1901. cmdTopv.className="tblclassup"
  1902. cmdMiddle.className="tblclassup"
  1903. curTD.vAlign="bottom"
  1904. }
  1905. }
  1906. }
  1907. }
  1908. }
  1909. blnChange=true
  1910. hideTxt()
  1911. SaveoRedoOneRecord() //在改变之后保存住位置，备redo时装入
  1912. }
  1913. /**
  1914. *当在某单元格时,处理工具栏的显示状态
  1915. **/
  1916. function showFontProperty(tdobj){
  1917. if(blnRunMode)return
  1918. if (tdobj.align=="left") {
  1919. cmdLeft.setAttribute("fcDown","1")
  1920. cmdLeft.className="divmenutrue"
  1921. }
  1922. else {
  1923. cmdLeft.setAttribute("fcDown","0")
  1924. cmdLeft.className="tblclassup"
  1925. }
  1926. if (tdobj.align=="center") {
  1927. cmdCenter.setAttribute("fcDown","1")
  1928. cmdCenter.className="divmenutrue"
  1929. }
  1930. else {
  1931. cmdCenter.setAttribute("fcDown","0")
  1932. cmdCenter.className="tblclassup"
  1933. }
  1934. if (tdobj.align=="right") {
  1935. cmdRight.setAttribute("fcDown","1")
  1936. cmdRight.className="divmenutrue"
  1937. }
  1938. else {
  1939. cmdRight.setAttribute("fcDown","0")
  1940. cmdRight.className="tblclassup"
  1941. }
  1942. if (tdobj.vAlign=="top") {
  1943. cmdTopv.setAttribute("fcDown","1")
  1944. cmdTopv.className="divmenutrue"
  1945. }
  1946. else {
  1947. cmdTopv.setAttribute("fcDown","0")
  1948. cmdTopv.className="tblclassup"
  1949. }
  1950. if (tdobj.vAlign=="middle") {
  1951. cmdMiddle.setAttribute("fcDown","1")
  1952. cmdMiddle.className="divmenutrue"
  1953. }
  1954. else {
  1955. cmdMiddle.setAttribute("fcDown","0")
  1956. cmdMiddle.className="tblclassup"
  1957. }
  1958. if (tdobj.vAlign=="bottom") {
  1959. cmdBottomv.setAttribute("fcDown","1")
  1960. cmdBottomv.className="divmenutrue"
  1961. }
  1962. else {
  1963. cmdBottomv.setAttribute("fcDown","0")
  1964. cmdBottomv.className="tblclassup"
  1965. }
  1967. //跟踪B I U
  1968. if (tdobj.style.fontWeight=="bold") {
  1969. cmdFontBold.setAttribute("fcDown","1")
  1970. cmdFontBold.className="divmenutrue"
  1971. }
  1972. else {
  1973. cmdFontBold.setAttribute("fcDown","0")
  1974. cmdFontBold.className="tblclassup"
  1975. }
  1977. if (tdobj.style.fontStyle=="italic") {
  1978. cmdFontItalic.setAttribute("fcDown","1")
  1979. cmdFontItalic.className="divmenutrue"
  1980. }
  1981. else {
  1982. cmdFontItalic.setAttribute("fcDown","0")
  1983. cmdFontItalic.className="tblclassup"
  1984. }
  1985. if (tdobj.style.textDecorationUnderline==true) {
  1986. cmdFontU.setAttribute("fcDown","1")
  1987. cmdFontU.className="divmenutrue"
  1988. }
  1989. else {
  1990. cmdFontU.setAttribute("fcDown","0")
  1991. cmdFontU.className="tblclassup"
  1992. }
  1994. var strFont=tdobj.style.fontFamily
  1995. var lngFontSize=parseInt(tdobj.style.fontSize)
  1996. switch(strFont) {
  1997. case "宋体":
  1998. cboFont.selectedIndex =0
  1999. break;
  2000. case "仿宋_GB2312":
  2001. cboFont.selectedIndex =1
  2002. break;
  2003. case "黑体":
  2004. cboFont.selectedIndex =2
  2005. break;
  2006. case "楷体_GB2312":
  2007. cboFont.selectedIndex =3
  2008. break;
  2009. case "隶书":
  2010. cboFont.selectedIndex =4
  2011. break;
  2012. case "幼圆":
  2013. cboFont.selectedIndex =5
  2014. break;
  2015. case "Arial":
  2016. cboFont.selectedIndex =6
  2017. break;
  2018. case "Courier":
  2019. cboFont.selectedIndex =7
  2020. break;
  2021. default:
  2022. cboFont.selectedIndex =0
  2023. break;
  2024. }
  2026. switch(lngFontSize) {
  2027. case 4:
  2028. cboFontSize.selectedIndex =0
  2029. break;
  2030. case 6:
  2031. cboFontSize.selectedIndex =1
  2032. break;
  2033. case 8:
  2034. cboFontSize.selectedIndex =2
  2035. break;
  2036. case 9:
  2037. case 10:
  2038. case 11:
  2039. case 12:
  2040. cboFontSize.selectedIndex =lngFontSize - 6
  2041. break;
  2042. case 14:
  2043. cboFontSize.selectedIndex =7
  2044. break;
  2045. case 16:
  2046. cboFontSize.selectedIndex =8
  2047. break;
  2048. case 18:
  2049. cboFontSize.selectedIndex =9
  2050. break;
  2051. case 20:
  2052. cboFontSize.selectedIndex =10
  2053. break;
  2054. case 22:
  2055. cboFontSize.selectedIndex =11
  2056. break;
  2057. case 24:
  2058. cboFontSize.selectedIndex =12
  2059. break;
  2060. case 26:
  2061. cboFontSize.selectedIndex =13
  2062. break;
  2063. case 28:
  2064. cboFontSize.selectedIndex =14
  2065. break;
  2066. case 36:
  2067. cboFontSize.selectedIndex =15
  2068. break;
  2069. case 48:
  2070. cboFontSize.selectedIndex =16
  2071. break;
  2072. case 72:
  2073. cboFontSize.selectedIndex =17
  2074. break;
  2075. default:
  2076. cboFontSize.selectedIndex =8
  2077. break;
  2078. }
  2079. //show(tdobj.bgColor)
  2080. if(isSpace(tdobj.bgColor)){
  2081. sel1.selectedIndex=0
  2082. }
  2083. else {
  2084. for(var i=1;i<sel1.options.length;i++){
  2085. if(sel1.options(i).style.backgroundColor==tdobj.bgColor){
  2086. sel1.selectedIndex=i
  2087. break
  2088. }
  2089. }
  2090. }
  2091. if(isSpace(tdobj.style.color)){
  2092. sel2.selectedIndex=0
  2093. }
  2094. else {
  2095. for(var i=1;i<sel2.options.length;i++){
  2096. if(sel2.options(i).style.backgroundColor==tdobj.style.color){
  2097. sel2.selectedIndex=i
  2098. break
  2099. }
  2100. }
  2101. }
  2102. }
  2103. /**
  2104. *用于点击了工具栏上的按钮后将焦点给到文本框上
  2105. **/
  2106. function ExitMe() {
  2107. window.setTimeout("try {txtMyGrid.focus()} catch (e){}", 10);
  2108. }
  2109. /**
  2110. *初始化表格以外的东西:滚动条,div的边框,运行时显示的按钮等
  2111. *用于打开一个表将这些东西调动后(用进入时运行事件)又打开一个表时恢复
  2112. **/
  2113. function InitOutTable() {
  2114. t.parentNode.style.borderLeft="1px solid";
  2115. t.parentNode.style.borderRight="1px solid";
  2116. t.parentNode.style.borderTop="1px solid";
  2117. t.parentNode.style.borderBottom="1px solid";
  2118. grid.hideHscroll=false;
  2119. grid.hideVscroll=false;
  2120. t.parentNode.style.backgroundImage="";
  2121. t.parentNode.style.backgroundColor="";
  2122. fcPage.style.display="none"
  2123. fcShowAll.style.display="none"
  2124. for(var i=0;i<5;i++){fcButton[i].style.display="none"}
  2125. txtMyGrid.style.display="none"
  2126. tc.style.display="none"
  2127. fc_curpage=1
  2128. fc_allpages=1
  2129. }
  2130. /**
  2131. *保存报表
  2132. **/
  2133. function SaveReport() {
  2134. t.setAttribute("graph",escape(oGraph.documentElement.xml))
  2135. CopytHtml()
  2136. var s1=document.title 
  2137. if(isSpace(s1)){
  2138. //新增存盘
  2139. var sRet=window.showModalDialog("input.htm",s1,"status:no;dialogHeight:120px;dialogWidth:400px;dialogTop:180;dialogLeft:250px") 
  2140. if(typeof sRet=="undefined") return
  2141. var s2=SqlToField("select fstrTableName from fcCell where fstrTableName='"+escape(sRet)+"'")
  2142. if(s2!=""){
  2143. alert("报表名称："+sRet+"的报表已存在，请另取一个报表名称。")
  2144. return
  2145. }
  2146. var sql="Insert into fcCell (fstrTableName,fstrTable,fstrTable1) values ('"+escape(sRet)+"','"+escape(t.outerHTML)+"','"+escape(tCopy.innerHTML)+"')"
  2147. document.title=sRet
  2148. if(fc_Database=="access")
  2149. var sR=fc_insertunescape(sql)
  2150. else
  2151. var sR=fc_insertClob(sql)
  2153. }
  2154. else {
  2155. //修改存盘
  2156. var sql="Update fcCell set fstrTable='"+escape(t.outerHTML)+"',fstrTable1='"+escape(tCopy.innerHTML)+"' Where fstrTableName='"+escape(s1)+"'"
  2157. if(fc_Database=="access")
  2158. var sR=fc_insertunescape(sql)
  2159. else
  2160. var sR=fc_updateClob(sql)
  2162. }
  2163. if(isSpace(sR)){
  2164. alert("保存成功!")
  2165. }
  2166. else{
  2167. alert(sR)
  2168. }
  2169. blnChange=false
  2170. }
  2171. /**
  2172. *报表另存
  2173. **/
  2174. function SaveAsReport() {
  2175. t.setAttribute("graph",escape(oGraph.documentElement.xml))
  2176. CopytHtml()
  2177. var sRet=window.showModalDialog("input.htm","","status:no;dialogHeight:120px;dialogWidth:400px;dialogTop:180;dialogLeft:250px") 
  2178. if(typeof sRet=="undefined") return
  2179. var s2=SqlToField("select fstrTableName from fcCell where fstrTableName='"+escape(sRet)+"'")
  2180. if(s2!=""){
  2181. alert("报表名称："+sRet+"的报表已存在，请另取一个报表名称。")
  2182. return
  2183. }
  2184. var sql="Insert into fcCell (fstrTableName,fstrTable,fstrTable1) values ('"+escape(sRet)+"','"+escape(t.outerHTML)+"','"+escape(tCopy.innerHTML)+"')"
  2185. var sR=fc_insertunescape(sql)
  2186. if(isSpace(sR)){
  2187. document.title=sRet
  2188. alert("保存成功!")
  2189. }
  2190. else{
  2191. alert(sR)
  2192. }
  2193. blnChange=false
  2194. }
  2195. /**
  2196. *新增一张报表,先检查是否要保存当前报表
  2197. **/
  2198. function NewReport() {
  2199. CheckReportChange()
  2200. var sTab='<TABLE borderColor=lightgrey borderColorDark=white cellPadding=0 cellSpacing=0 frame=box id=t style="BORDER-COLLAPSE: collapse; BORDER-BOTTOM: 1px solid; BORDER-LEFT: 1px solid; BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid;  CURSOR: default; FILTER: alpha(opacity=90);TABLE-LAYOUT: fixed; POSITION: absolute; LEFT: 0px; TOP: 0px" '
  2201. +'onmousedown="t_onmousedown()" onmousemove="t_onmousemove()" onmouseup="t_onmouseup()" >'
  2202. +'<COLGROUP id=tg><COL style="width:35" align=middle class=fixedStyle><COL style="width:70"><COL style="width:70"><COL style="width:70"><COL style="width:70"><COL style="width:70"><COL style="width:70"><COL style="width:70"><COL style="width:70"><COL style="width:70"><COL style="width:70"></COLGROUP>'
  2203. +'<THEAD><TR style="height:21" align=middle class=fixedStyle ><TD></TD><TD>A</TD><TD>B</TD><TD>C</TD><TD>D</TD><TD>E</TD><TD>F</TD><TD>G</TD><TD>H</TD><TD>I</TD><TD>J</TD></TR></THEAD>'
  2204. +'<TBODY>'
  2205. +'<TR style="height:21"><TD>1</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR>'
  2206. +'<TR style="height:21"><TD>2</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>3</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>4</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>5</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>6</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>7</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>8</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>9</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>10</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>11</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>12</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>13</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>14</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>15</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>16</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>17</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>18</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>19</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>20</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>21</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>22</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>23</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD>24</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR><TR style="height:21"><TD >25</TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD></TR>'
  2207. +'</TBODY></TABLE>'
  2208. t.outerHTML=sTab
  2209. CopytHtml()
  2210. document.title=""
  2211. grid.reload(sTab)
  2213. initoUndooRedo()
  2215. oFormula=new ActiveXObject("Microsoft.XMLDOM")
  2216. oFormula.async ="false";
  2217. oFormula.loadXML("<root></root>")
  2218. oGraph=new ActiveXObject("Microsoft.XMLDOM")
  2219. oGraph.async ="false";
  2220. oGraph.loadXML("<root></root>")
  2221. blnChange=false
  2222. }
  2223. function LoadReport(TableName,sFilter) {
  2224. //TableName为打开的报表名称。
  2225. //sFilter为联查报表时的过滤条件串
  2226. //先检查是否要保存当前报表
  2227. //show("aaa")
  2228. CheckReportChange()
  2229. ShowWait.style.display="block";
  2231. if(fc_Database=="access"){
  2232. var sql="select fstrTable from fcCell Where fstrTableName='"+escape(TableName)+"'"
  2233. var sTab=unescape(SqlToField(sql))
  2234. t.outerHTML=sTab
  2235. CopytHtml()
  2236. }else {
  2237. var sTab=unescape(fc_loadClob("<no>"+escape(TableName)+"</no>"))
  2238. var sTab1=unescape(fc_loadClob1("<no>"+escape(TableName)+"</no>"))
  2239. //去掉id=t
  2240. sTab1=fc_RepStr(sTab1," id=t "," ")
  2241. tCopy.innerHTML=sTab1
  2242. t.outerHTML=sTab
  2244. }
  2245. document.title=TableName
  2246. grid.reload(sTab)
  2247. InitOutTable()
  2248. //----------------------
  2249. initoUndooRedo()
  2251. LoadAllFormula()
  2252. // oGraph=new ActiveXObject("Microsoft.XMLDOM")
  2253. // oGraph.async ="false";
  2254. // oGraph.loadXML("<root></root>")
  2255. // LoadGraph(1)
  2256. // setGraph(1)
  2257. queryToolbar.style.display="none"
  2258. //装入运行时的设置参数
  2259. if(blnRunMode) {
  2261. //查询SQL
  2262. queryToolbar.style.display="block"
  2263. initButton()
  2264. var s1=t.getAttribute("queryorder")
  2265. if(s1=="1" && arguments.length==1){
  2266. //直接出查询条件对话框
  2267. fc_wherexml="" //清空条件变量
  2268. fc_getwhere()
  2269. }
  2270. else {
  2271. //LoadWhereToSql()
  2272. //用于打开统计表时,需要装入缺省条件进行查询
  2273. if (arguments.length==2){
  2274. fc_wherexml=sFilter
  2275. }
  2276. else {
  2277. if(isSpace(t.getAttribute("initwhere")))
  2278. fc_wherexml=""
  2279. else 
  2280. fc_wherexml=t.getAttribute("initwhere")
  2283. }
  2284. fc_wherexml=unescape(fc_wherexml)
  2286. fc_curpage=1
  2287. fc_executesql(1,fc_wherexml)//1 为页号,fc_wherexml为条件数据的XML串
  2288. //-----------------------------------
  2289. }
  2290. var arySend=t.getAttribute("runpara")
  2291. if(arySend!=null){
  2292. eval(unescape(arySend))
  2293. }
  2294. }
  2295. //当外部是自动表格尺寸时
  2296. if (grid.autosize){
  2297. grid.hideVscroll=true
  2298. grid.hideHscroll=true
  2299. grid.autosize=true
  2300. }
  2301. //----------------------
  2302. //运行模式中的参数内容:
  2303. /*
  2304. 隐藏行标列标和边框:
  2305. t.rows(0).style.display="none";
  2306. t.childNodes(0).childNodes(0).style.pixelWidth=0;
  2307. t.border=0;
  2308. t.style.borderLeft="";
  2309. t.style.borderRight="";
  2310. t.style.borderTop="";
  2311. t.style.borderBottom="";
  2313. 隐藏滚动条:
  2314. grid.hideVscroll=true;
  2315. grid.hideHscroll=true;
  2317. 不能修改行高列宽
  2318. grid.AdjustRowHeight=false;
  2319. grid.AdjustColWidth=false;
  2321. 只读
  2322. (不能增删行增删列,除设了回车键后移动到何单元此属性之外的单元(不能录入和点击进入),不出现兰框
  2323. grid.ReadOnly=true;
  2325. 在固定列上能否拖动修改
  2326. */
  2327. //----------------------
  2328. blnChange=false
  2329. window.setTimeout("ShowWait.style.display='none';", 10);
  2330. }
  2331. /**
  2332. *打印报表
  2334. **/
  2335. function PrintReport(){
  2336. grid.prn.inPrint=1
  2337. grid.print()
  2338. }
  2339. /**
  2340. *打印预览报表
  2341. **/
  2342. function PreviewReport() {
  2343. grid.prn.inPrint=0
  2344. grid.print()
  2345. }
  2346. /**
  2347. *块复制
  2348. **/
  2349. function cmdBlockCopy(){
  2350. if (tc.style.display =="none")
  2351. return
  2352. //检查区域是否有合并的单元格
  2353. /* if (lngStatus==3 || lngStatus==4){
  2354. alert("选择的区域内有合并单元格，不能做块复制！")
  2355. return
  2356. }
  2357. */
  2358. //块复制
  2359. var i,j,clipboard=""
  2360. //var sColno,eColno
  2361. //blockObjAry=new Array()
  2362. //blockObjAry[0]=eRowSort-sRowSort
  2363. //blockObjAry[1]=eColSort-sColSort
  2364. //var inx=2
  2365. for (i=sRowSort;i<=eRowSort;i++){
  2366. /*
  2367. sColno=sCol
  2368. eColno=eCol
  2369. var osFind=oCoor.documentElement.selectNodes("//record[row='" + i + "' and col='" +sCol +"']")
  2370. if (osFind.length>=1)
  2371. sColno=parseInt(osFind.item(0).childNodes.item(2).text)
  2372. var osFind=oCoor.documentElement.selectNodes("//record[row='" + i + "' and col='" +eCol +"']")
  2373. if (osFind.length>=1)
  2374. eColno=parseInt(osFind.item(0).childNodes.item(2).text)
  2375. */
  2376. for (j=sColSort;j<=eColSort;j++){
  2377. var arr=PhyToLog(i,j)
  2378. var curTD=t.rows(arr[0]).cells(arr[1])
  2379. // blockObjAry[inx]=curTD.innerText //curTD.cloneNode(true)
  2380. clipboard=clipboard+curTD.innerText+"t"
  2381. // inx=inx+1
  2382. }
  2383. clipboard=clipboard+"n"
  2384. }
  2385. window.clipboardData.setData("Text",clipboard)
  2386. }
  2387. /**
  2388. *块粘贴
  2389. **/
  2391. function cmdBlockPaste(){
  2392. //if (SetReadOnly()) return
  2393. var clipboard=""
  2395. //检查是否有复制的数据
  2396. //if (blockObjAry.length<=0 ){
  2397. clipboard=window.clipboardData.getData("Text")
  2398. if (clipboard=="" || clipboard==null ) {
  2399. alert("您还未做区域数据的复制，先复制数据，然后再做粘贴！")
  2400. }
  2401. else