请问高手:F1book中如何进行合并单元格,1、横向合并 2、纵向合并,高分求教???(200分)

  • 主题发起人 主题发起人 ld999
  • 开始时间 开始时间
L

ld999

Unregistered / Unconfirmed
GUEST, unregistred user!
问题1、F1book中如何进行合并单元格,1、横向合并 2、纵向合并,高分求教???
问题2、如何设置某工作表成为当前焦点或是使某单元格成为焦点,即某单元格显示黑框。
 
请积极拿分,请大家帮忙
 
问题2:发送模拟鼠标:mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
 
问题一急问
 
以前写的
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;
 
问题二是否有其他的答案
 
设某单元格获的焦点
f16book1.GetActiveCell(nRow,nCol)
 
不好意思,写错了
f16book1.Sheet := 1;
f16book1.SetFocus;
f16book1.SetActiveCell(1,2)
 
TO: SharpExpress
问题二已解决,请问问题一是否有具体的使用方法,如何调用,老通不过,请指教。
 
不知如何调用
 
问题一如何使用此代码
 
大家好,高手请帮忙
 
问题已经解决,非常感谢各位老师的指点,谢谢
 
后退
顶部