5,908
社区成员




XLS.Sheets[0].Range.Items[i, n, i, n].BorderOutlineStyle := cbsThin;
XLS.Sheets[0].Range.ItemsRef['B1:D4'].BorderOutlineStyle := cbsThick;
我查了网上的很多案例,而且这值在pas中确实是枚举值,但在D12中却提示错误,[dcc32 Error] Unit7.pas(158): E2003 Undeclared identifier: 'cbsThin'
是不是我查询的结果是错误的?应该怎么写?
type TXc12CellBorderStyle = (cbsNone,cbsThin,cbsMedium,cbsDashed,cbsDotted,
cbsThick,cbsDouble,cbsHair,cbsMediumDashed,
cbsDashDot,cbsMediumDashDot,cbsDashDotDot,
cbsMediumDashDotDot,cbsSlantedDashDot);
请教一下,如何能使添加XLSreadwritell5时,自动添加Xc12DataStyleSheet5?
我在XLSreadwritell5源码中加入Xc12DataStyleSheet5后,重新build并安装后,还是不能自动加入?应如何操作?
添加 XLSreadwritell5时,Xc12DataStyleSheet5为什么不自动添加?这个如何解决?
我重新卸载,然后重新编译安装,还是不行。
换个思路,我把这句放进自带的实例中,就没有问题?
看了看引用单元,原来是没有自动引用 Xc12DataStyleSheet5 单元导致的,我晕。
应该是代码声明type TXc12CellBorderStyle的地方启用了带作用域的枚举({$SCOPEDENUMS ON}),所以你需要写:
XLS.Sheets[0].Range.Items[i, n, i, n].BorderOutlineStyle := TXc12CellBorderStyle.cbsThin;
而且VerticalAlignment=chaleft等属性均设置提示错误,
BorderOutlinecolor:=0;却不提示错误。
不解?