用F1Book做的ACTIVEX在IE8中的问题
- Delphi(Pascal) code
procedure TActiveFormX.SetCellsBorder(startRow, startCol, endRow, endCol: Integer);var cellfrmt :F1CellFormat ;begin F1Book61.SetFocus; ShowMessage('aaa'); try F1Book61.DefaultInterface.SelStartRow:=3; F1Book61.DefaultInterface.SelStartCol:=3; F1Book61.DefaultInterface.SelEndRow:=6; F1Book61.DefaultInterface.SelEndCol:=6; cellfrmt := F1Book61.CreateNewCellFormat;//上句出问题:canves does not drawing ShowMessage('1'); cellfrmt.MergeCells:=True;//有时上句也出问题 ShowMessage('2'); cellfrmt.BorderStyle[F1RightBorder] := F1BorderThin; cellfrmt.BorderStyle[F1LeftBorder] := F1BorderThin ; cellfrmt.BorderStyle[F1TopBorder] := F1BorderThin ; cellfrmt.BorderStyle[F1BottomBorder] := F1BorderThin ; ShowMessage('3'); cellfrmt.BorderColor[F1RightBorder] :=clBlack; cellfrmt.BorderColor[F1LeftBorder] := clBlack; cellfrmt.BorderColor[F1TopBorder] :=clBlack; cellfrmt.BorderColor[F1BottomBorder] :=clBlack; ShowMessage('4'); F1Book61.SetCellFormat( cellfrmt); except on E:Exception do ShowMessage(e.Message); end;// F1Book61.DefaultInterface.SelStartCol:=1;// F1Book61.DefaultInterface.[解决办法]
安全性问题?
[解决办法]
应该是IE8安全性问题。