Visual Graph有強(qiáng)大的圖庫開發(fā)能力,而且使用非常簡(jiǎn)便,下面以VB中的使用為例:
一、在VB中建立一個(gè)新的工程,在左側(cè)工具欄上按右鍵,選擇菜單“部件”,添加Visual Graph控件。
二、在窗口上添加Visual Graph ActiveX Control控件,這個(gè)控件將用來畫圖。
三、再添加一個(gè)Visual Graph ActiveX Control控件,這個(gè)控件中的文件將被當(dāng)作圖庫,我們把這個(gè)控件充分縮小,放到上面那個(gè)控件的下面。
四、在Load事件里寫程序:
vgctrl1.Design ""
vgctrl2.Run "e:\vg\lib\電力設(shè)備.tbl"
vgctrl2.Library = true
這一句把vgctrl2中的圖形文件當(dāng)作元件庫。
五、在窗口上插入按鈕。在這個(gè)按鈕的OnClick事件里面寫:
vgctrl1.NewUnit "垂直刀閘", 0
畫圖時(shí),將從當(dāng)前指定的圖庫中尋找“垂直刀閘”這個(gè)元件。
六、再放一個(gè)按鈕,在這個(gè)按鈕的OnClick事件里面寫:
vgctrl1.ActiveSheet.AddUnit "垂直刀閘", 10, 10, 0, 0
七、運(yùn)行,測(cè)試。