L ld999 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-27 #1 问题1、F1book中如何进行合并单元格,1、横向合并 2、纵向合并,高分求教??? 问题2、如何设置某工作表成为当前焦点或是使某单元格成为焦点,即某单元格显示黑框。
T takashiki Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-27 #3 问题2:发送模拟鼠标:mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
S SharpExpress Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-27 #5 以前写的 procedure TFormulaOne.MergeF1Cells(AIsMerge: Boolean); var vCellFmt: IF1CellFormat; begin vCellFmt := F1.CreateNewCellFormat; vCellFmt.MergeCells := AIsMerge; F1.SetCellFormat(vCellFmt); vCellFmt := nil end; procedure TFormulaOne.MergeF1Cells(ARow1, ACol1, ARow2, ACol2: Integer; AIsMerge: Boolean); begin F1.SetSelection(ARow1, ACol1, ARow2, ACol2); MergeF1Cells(AIsMerge); end;
以前写的 procedure TFormulaOne.MergeF1Cells(AIsMerge: Boolean); var vCellFmt: IF1CellFormat; begin vCellFmt := F1.CreateNewCellFormat; vCellFmt.MergeCells := AIsMerge; F1.SetCellFormat(vCellFmt); vCellFmt := nil end; procedure TFormulaOne.MergeF1Cells(ARow1, ACol1, ARow2, ACol2: Integer; AIsMerge: Boolean); begin F1.SetSelection(ARow1, ACol1, ARow2, ACol2); MergeF1Cells(AIsMerge); end;
不 不知道_0909 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-28 #7 设某单元格获的焦点 f16book1.GetActiveCell(nRow,nCol)
不 不知道_0909 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-28 #8 不好意思,写错了 f16book1.Sheet := 1; f16book1.SetFocus; f16book1.SetActiveCell(1,2)
L ld999 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-29 #9 TO: SharpExpress 问题二已解决,请问问题一是否有具体的使用方法,如何调用,老通不过,请指教。