delphi 样式常量值
xlNone = $FFFFEFD2;
xlAutomatic = $FFFFEFF7;
xlSolid = $00000001;
xlInsideHorizontal = $0000000C;
xlInsideVertical = $0000000B;
xlDiagonalDown = $00000005;
xlDiagonalUp = $00000006;
xlEdgeBottom = $00000009;
xlEdgeLeft = $00000007;
xlEdgeRight = $0000000A;
xlEdgeTop = $00000008;
xlContinuous = $00000001;
xlDash = $FFFFEFED;
xlDashDot = $00000004;
xlDashDotDot = $00000005;
xlDot = $FFFFEFEA;
xlDouble = $FFFFEFE9;
xlSlantDashDot = $0000000D;
xlLineStyleNone = $FFFFEFD2;
xlHairline = $00000001;
xlMedium = $FFFFEFD6;
xlThick = $00000004;
xlThin = $00000002;
xlCenter = $FFFFEFF4;
xlBottom = $FFFFEFF5;
xlLeft = $FFFFEFDD;
xlRight = $FFFFEFC8;
xlTop = $FFFFEFC0;
有时候设置边框特殊样式就会用到上面这些值 如
Excelid.worksheets[1].range['A1','M1'].borders[1].linestyle:=1;
Excelid.worksheets[1].range['A1','M1'].borders[2].linestyle:=1;
Excelid.worksheets[1].range['A1','M1'].borders[3].linestyle:=1;
Excelid.worksheets[1].range['A1','M1'].borders[3].Weight:= $FFFFEFD6; ;
Excelid.worksheets[1].range['A1','M1'].borders[4].linestyle:=1;
//borders常数 1-左 2-右 3-顶 4-底 5-斜( \ ) 6-斜( / )
//Weight 边框格式,具体可以通过excel 宏录制查看具体样式值
Q群 Delphi Home 235236282,QQ:359985051/183902633
诚邀delphi 爱好者加入,一起学习,研究、探讨。