TO:yanglibo
谢谢,今天经过实验,现在已经实现了复制和粘贴的操作,但是我并没有在form上添加一个TOleContainer,
我是这样做的,你帮忙再看一下是否可行.
我是用delphi6与f1book6平台
1、在form上增加PopupMenu,增加两个菜单项,“复制”和“粘贴”
菜单代码如下:
procedure TForm1.N1Click(Sender: TObject);//复制代码
begin
f1book61.GetCellFormat;
f1book61.EditCopy;
end;
procedure TForm1.N2Click(Sender: TObject);//粘贴代码
begin
f1book61.EditPaste;
end;
功能是实现了,我想问两个问题
1、如果实现了,我是否不需在form上添加一个TOleContainer,如果不放TOleContainer,是否有其它影响。
2、我用了f1book61.FixedCol:=1;
f1book61.FixedCols:=2;命令对表格前两列做了锁定。
出现以下问题:当我用鼠标点锁定列来选定了某一行后,再进行复制和粘贴,出现一提示,可能是锁定的单元格不让复制,能否解决不出现提示而只复制除锁定列之外的列内容。
谢谢。