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