VFP 愛用者社區

[Ruey]

來源:myf1 luweikan

統計圖表範例

經常看到朋友們要求製作統計圖表的問題，我今天抽空整理了我以前做的快速圖表模組，濃縮了一個示例表單，供有這方面需求的朋友參考。儘管我做的可能繁雜了一些，未必最好，僅供學習參考，也歡迎提出批評，以便我完善。
本示例表單提供打開或新建一個供繪圖的資料表，並可修改資料、添加資料，添加資料只要在表格中用方向鍵向下按鍵即增加1條記錄，本示例可修改資料表結構，列印統計圖表，圖表支援8種圖形，分別是：
1、立體直條圖
2、平面直條圖
3、三維餅形圖
4、平面餅形圖
5、三維曲線形
6、平面曲線形
7、三維山形圖
8、平面山形圖

添加背景3種方法：
1、修改form 的 picture 屬性，指定一個背景圖片檔，如 *.bmp 或 *.jpg，此辦法可將圖片檔編譯到EXE檔中，發佈時不需要該圖片檔；
2、在form 的 init 事件中用代碼裝載圖片檔，此辦法不能將圖片檔編譯到EXE檔中，發佈時必須附該圖片檔,裝載代碼：
mypicturefile="pict.jpg"
if file(mypicturefile)
this.picture=mypicturefile
endif
3、動態載入圖片檔
form 上建command 控制項，click 代碼如下：
mypicturefile=getpic()
if !empty(mypicturefile)
thisform.picture=mypicturefile
endif