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