怎样编改 ActiveX 控件

白日梦

我是使用VFP的MsChrt20.ocx ActiveX component


我修改了 MsChart properties 里 Column Series C1 - C4 的 Width=hairline


可是显示出来只是 Series C1 即 PM94A 变成 hairline，其他的照回原本的 2 point。

谁会这编码？
oleChart.?????????.width = 1

meemee

应该是这个
SeriesCount = 1 && 就是第一个series，SeriesCount = 2 就是第二个series...以此类推
thisform.MSChart1.Plot.SeriesCollection(SeriesCount).Pen.Width = 0

&&这个用来计算有几个series
thisform.MSChart1.Plot.SeriesCollection.Count

&&Pen.Width = 0 应该是hairline

[ 本帖最后由 meemee 于 6-8-2006 04:47 PM 编辑 ]

白日梦

弄到了，谢谢 meemee。

Thisform.oleChart.Init 里编码

1. 
   
2. tRec = 0
   
3. Scan
   
4.   tRec = tRec + 1
   
5.   This.ColumnCount = tRec
   
6.   This.Column = tRec
   
7.   This.ColumnLabel = Fld
   
8.   This.Plot.SeriesCollection(tRec).Pen.Width = 0
   
9.   This.RowCount = 31
   
10.   For Y = 1 To 31
    
11.    This.Row = Y
    
12.    This.RowLabel = Y
    
13.    cField = 'd'+Lead0(Y)
    
14.    This.Data = &cField
    
15.   Next
    
16. Endscan
    

复制代码

[ 本帖最后由 白日梦 于 7-8-2006 10:43 AM 编辑 ]