我在使用TcxSpreadSheetBook控件向excel中写数据时在有一台机器上有时会报can't open clipboard 错误。
现在也找不出是程序的错误还是用户机器上的问题,大概有20个客户使用这套软件,只有一台机器上总出现这种问题,机器重装后偶尔也会出现错误。xp的剪切板可以设置吗?
这是报错地方的代码。
//拷贝表头代码。
if ipage>1 then
begin
with cxSpreadBook.ActiveSheet do
begin
selectionRect:=rect(0,0,14,59);
Copy(cxspreadBook.activeSheet.selectionrect,false);
end;
end;
if ipage>1 then
for i:=2 to ipage do
begin
//复制格式
with cxSpreadBook.ActiveSheet do
begin
SelectCell(0, 62*(i-1) );
Paste(cxspreadbook.ActiveSheet.SelectionRect.TopLeft);
//设置行高 ggy 0523
for j:=0 to 59+2 do
cxspreadbook.ActiveSheet.Rows.Size[62*(i-1)+j]:= cxspreadbook.ActiveSheet.Rows.Size[j]; end;
end;
现在也找不出是程序的错误还是用户机器上的问题,大概有20个客户使用这套软件,只有一台机器上总出现这种问题,机器重装后偶尔也会出现错误。xp的剪切板可以设置吗?
这是报错地方的代码。
//拷贝表头代码。
if ipage>1 then
begin
with cxSpreadBook.ActiveSheet do
begin
selectionRect:=rect(0,0,14,59);
Copy(cxspreadBook.activeSheet.selectionrect,false);
end;
end;
if ipage>1 then
for i:=2 to ipage do
begin
//复制格式
with cxSpreadBook.ActiveSheet do
begin
SelectCell(0, 62*(i-1) );
Paste(cxspreadbook.ActiveSheet.SelectionRect.TopLeft);
//设置行高 ggy 0523
for j:=0 to 59+2 do
cxspreadbook.ActiveSheet.Rows.Size[62*(i-1)+j]:= cxspreadbook.ActiveSheet.Rows.Size[j]; end;
end;
Try 来处理,有问题再重试就是的