Visual Graph常见问题回答（FAQ）
12.1.何謂設計態？
回答：我們常用的工具像?C#、Delphi、VB、PB、Jbuilder等都存在設計態，也就是可視化編程。還有AutoCAD、PowerPoin t、Flash等軟件也都可以看作設計態。設計態的特點是，用戶可以用鼠標編輯圖形。
12.2.何謂運行態？
回答：我們常用的工具像?C#、Delphi、VB、PB、Jbuilder等都存在運行態，也就是開發完成后交付使用的部分。PowerPoint、F lash等軟件也都有運行態，也就是播放的部分。像AutoCAD、PhotoShop這樣的專門繪圖工具是沒有運行態的。運行態的特點是，用戶不能任意編輯圖形，但圖形可以響應交互事件、圖形可以動作。
12.3.支持硬件板卡接口么？
回答：VG是一個圖形平臺，不做硬件，如果圖形想與硬件通訊，要自己開發相關的程序或DLL等功能庫掛入VG作為VG的外部函數或內部函數，程序員可以通過VG來調用這些功能庫了。因為圖形提供了完善的I/O方法，程序員可以通過它把圖形和硬件等連接起來。
12.4.支持數據庫么？
回答：VG是一個圖形平臺，不包含數據庫功能，但提供了數據庫接口方案，因此，如果要實現和數據庫的關聯關系或者把圖形存儲到數據庫，我們可以提供解決方案。
12.5.在瀏覽器中能用么？
回答：在瀏覽器中使用和其他語言環境中沒什么差別，作為插件在客戶端運行，當然，在IE中開發WEB應用需要用JavaScript或者VBScript語言進行控制VG。
12.6.繪圖可能擅長，做表格可能太困難吧？
回答：有人覺得，VG的表格采用文字單元拼湊的方式實現，這樣畫一張表格太蹩腳、太不方便了。
?? VG制表其實非常容易，在整個畫表過程中，和其他表格軟件沒什么差別?？梢岳L制幾行幾列的表格、移動線條、劃線、單元合并、表格邊框設定等。幾分鐘就可以繪制一張大表。這種表格的特殊之處在于，每個單元格都可以自由移動位置，此外，由于表格和圖形混 排，因此可以插入圖片、圖表、棒圖、餅圖、曲線圖等等。
????事實上，VG曾經是一種專門的表格設計軟件，只是由于現在側重圖形，所以很多人根據自己的經驗以為無法用它制表，因為市場上很少有矢量繪圖軟件支持表格，在WEB上編輯與運行表格相當方便。
12.7.動態連接線問題,請問用c#做類似與visio的動態連接線，是把線設計為一個控件呢，還是直接在面板上畫線？如果直接作為控件，控件的形狀很難控制，因為這跟是動態線，可以任意變形的。但一般都是由橫線和豎線組成。如果直接在面板上畫線，又比較難實現拖動刪除等操作。問題困擾很久，望大蝦們能指點設計思路！有代碼參考就更感激不盡了！
回答：有現成的LinkLine可以用，詳情請查看小節10.12、圖形拓撲連接的使用
12.8.在vg里如何使用定時器控件??現想用一定時器控制圖元的角度變化，如何實現？另vg里如何創建一定時器控件呢？
回答：在lib\Controls.tbl里面有個定時器元件，此元件有個OnTimer事件，或者在每個Sheet類下是有Ontimer事件的。
12.9.VG下如何調用MSSQL語句并且如何保存MSSQL數值？想用VG去顯示MSSQL中的數據,卻不知道如何用VG去調用MSSQL語句,并且用什么去保存MSSQL中找到的數據？
回答：vg是個圖形系統，不處理數據庫操作系統。但VG提供外部接口DLL擴展來數據庫操作函數，但從系統設計思想看，因為數據庫的連接資源非常寶貴，所以不建議VG直接數據庫。
12.10.線的末端箭頭問題：我在arrows.tbl添加空心三角形圖元，然后在線的末端箭頭屬性中選中這個圖元，為什么顯示出來的是黑色的實心三角形啊？
回答：網紋Pattern設置成此自定義的空心三角形圖元所在Sheet里面序號，詳情查看小節10.10、自定義箭頭與填充
12.11.線上圖標問題?：我用的是試用版VG，線上圖標圖庫文件在什么位置，我可以在線上圖標圖庫中添加自定義圖標嗎？
回答：在目錄?dat\lineicon.tbl?的文件里定義。
12.12.關于數組：數組是不是只能一個一個的給數組中的每個元素賦值，不能一次就給所有的元素賦值，例如，la=array(10)
la={1,2,3}?？
回答：確實只能一個一個賦值
12.13.在使用vg.Execute( "SystemParams.GraphDriver =?１" )后會在關閉ie時會異常出錯，為什么？
回答：在IE關閉前必須運行恢復回來，用vg.Execute( "SystemParams.GraphDriver = 0" )
12.14.vg控件對象在web中與Div覆蓋的問題?：activex對象在網頁中使用時，總是顯示在最上面，覆蓋掉了其它內容，如何解決 ？？
回答：調整位置和大小吧?,還是這個對象的z-index值永遠是最大的,?永遠是在最上面的。
12.15.如何延長hint的提示時間?vg控件的hint時間大約只有2秒，如何延長hint的提示時間？沒有找到hintwindow類，無法針對該類編程。
回答：用vg.Execute( "SystemParams.ShowHintDelay=5000" )設置它，默認為2秒。
12.16.vb中調用問題?我現在要用vb做一個電力上的模擬操作軟件，在vb中怎么調用vg啊？比方說，在vb的窗口上繪制一個commond命令按鈕， 單擊此命令按鈕時，就會出現vg的編輯畫面？具體怎么實現啊？
回答：vgctrl1.Design( "文件名" )，詳情可查看小節5.1、VB6
12.17.一個圖元只有1個連接點，該連接點連接了多條line，如何從該圖元得到這些連接的line？
回答：看LinksCount、Links[n]，詳情查看小節10.12、圖形拓撲連接的使用
12.18.在C#窗體程序里怎么判斷一個元件被放到了繪圖區上
回答：會觸發OnAddUnit事件
12.19.關于選中圖形對象的問題？?目前鼠標選中圖形（如rect)時，圖形四周出現可調整大小的特征點，現在我想當鼠標點中圖形，選中后，讓圖形背景色發生改變來表示當前圖形背選中，而不想顯示特征點框框？該怎么辦？
回答：運行態實現即可,自己處理一下OnClick,設計態下不能如此?.
12.20.如果一張圖 有多個圓之間要用線連接?因為圓很多都是直線不可能 要辟開那些圓 連接線能否做到能否自動彎曲 注:是根據配置文件做圖 不是直接畫??
回答：詳情查看小節10.12、圖形拓撲連接的使用
12.21.如何刪除折線上的點？怎么用代碼刪除折線上的一個點，不通過DeletePoint()函數??
回答：先設置pointcount = pointcount - 1 ,然后依次把后面的頂點挪到前面去。 直接的方法就是自己寫一個函數，調用，這樣以后就很方便了。
12.22.VC中Text控件問題?:Text控件有個"運行只讀"屬性，在VC6中設為false沒有辦法在里面輸入數據，同樣的圖在VB6中卻可以正常輸入，請問 該如何解決。
回答：處理premessage事件，把焦點還給vg
12.23.VC中怎么轉換視圖坐標??我的VG是7.1版的，在VC中使用時發現ClientToView和ViewToClient這兩個函數的參數為long型， 但幫助文檔中卻是一個Point結構,那么VC中應該怎樣轉換視圖坐標?
回答：VG中的Point結構如下：
struct TDoublePoint
{
double x;
double y;
}
那個long是個指向TDoublePoint的指針。
12.24.請教Delphi中的Sheet里面的ClientToView小問題：
var
Sheet1 : ISheet;
fp : TDPoint;
begin
Sheet1 := vgctrlMap.ActiveSheet;
Sheet1.ClientToView( Integer( @fp ) );
end;
我想請問BASE大俠，上面的Sheet1.ClientToView是什么意思，是將當前可視的區域賦值給@fp嗎？?
回答：不是，應該這樣：
var
Sheet1 : ISheet;
fp : TDPoint;
begin
Sheet1 := vgctrlMap.ActiveSheet;
fp.x := ClientWidth;
fp.y := ClientHeight;
Sheet1.ClientToView( Integer( @fp ) );
end;
//取得窗口右下角所在的視圖坐標
fp.x := ClientWidth;
fp.y := ClientHeight;
Sheet1.ClientToView( Integer( @fp ) );
//是右下角
12.25.asp.net頁面中用C#直接控制vg?在vs2005中，控件為何不能添加到工具欄中。是不是在vs2005中只能通過jscript或vbscript才能控制vg?？ 在asp.net頁面中能否利用c#語言直接控制vg？請給個例子！！！！
回答：可以先用vs2003創建畫面（工具欄允許添加ActiveX)?然后用vs2005環境打開老版本的工程文件，具體為何vs2005無法把控件插入工具欄，原因可能是你的VS2005配置的原因。?vs2003中使用該控件的方法在source.zip里面有源代碼示例。?c#、vb.net的例子。如果是在ASP.net下進行編程，那么只查看5.3、.net(vb.net,vc.net,C#,J#.....)和6.3.2、.net(asp.net)－中文編碼問題,WEB編程下的Cilent端IE的控制只有jscript或vbscript才能控制vg。
12.26.如何刪除圖元的自定義屬性 ？使用SetPropertyValue可以給元件添加屬性，如果這個屬性不需要了，用什么函數或方法來刪除這個屬性呢？
回答：不能刪除屬性。
12.27.UnitAtPoint()?問題，取得鼠標下所在的元件?如果使用UnitAtPoint（）得到的是一個元件，那么如何得到該元件中位于該點的單元？
回答：1種（封裝）：在元件A中添加GetTheUnit如下：
public function GetTheUnit( x, y )
return UnitAtPoint( x, y, 0 )
end function
如果你用UnitAtPoint函數已經得到了這個元件A。
2種（循環）：
TheUnit = 0
i = 0
while i < A.UnitCount
d = A.Units
if d.Contains( x, y ) then
??? TheUnit = d
??? break
end if
i = i + 1
wend
這里得到的TheUnit就是你要的。
12.28.GetFocusedText()問題?在設計態（design）下，可否使用GetFocusedText()？
如果可以，在VC++下如何使用？ 如果不可以，在VC++下如何獲得擁有焦點的文字單元？我在VC++?下的代碼如下：?VARIANT var = pvgCtrl->Execute("d = GetFocusedText(); if d <> 0 then ShowMessage(d.Text); return d; else return 0 end if");
if(var.vt != VT_EMPTY) MessageBox("sfasfasf");?第一行代碼用于取有焦點的文字單元，并用showmessage測試； 第二行大名用于測試返回的結果；
回答：可以得到擁有焦點的文字單元，GetFocusedText()是腳本語言的函數，控件卻沒有。 這樣就得用點辦法： 例如，在vb中寫下面的代碼：
Set d = vgctrl1.Execute("d = GetFocusedText(); if d <> 0 then; return d; else; return ActiveSheet; end if")
If d.Type = "text" Then
??? d.Text = "HHHH"
End If
12.29.請教如何將AUOTOCAD文件轉換到vg格式?謝謝!
回答：VG正式版有專用CAD到VG圖形的轉換工具，轉換效果非常好！
12.30.我是想問：靜態圖形控件系列 ，VG圖形控件繪圖版，相對于圖形引擎繪圖版，但不含內置腳本語言，適合開發常用繪圖應用。 此版本，是開發常用繪圖軟件的最佳選擇。例如房屋布置設計、施工繪圖、簡單CAD制圖、繪制表格、圖形建模、圖形拓 撲分析、地圖等。 這個的“一服務器”和“特別授權”有什么區別？
回答："一個服務器"就是用在“一個服務器”上的意思，非一個服務器的需求，都叫特別授權。
12.31.元件全部導入問題。如果我將所有需要使用的元件全部存放到“元件.tbl”文件中，我在程序中點元件按鈕，彈出一元件列表界面，這些元件存放在什么容器？也就是說，可以象線上圖標那樣，先出來一個元件界面，再選擇需要的元件。請base大俠賜教！
回答：打開arrowdlg.tbl，找到里面的arrows.tbl，把它改為"元件.tbl"，把arrowdlg.tbl另存為?"?元件選擇窗口.tbl"
調用此對話盒的方式（這段代碼是VG語法。 ）如下：
doc = Create( Handle, "元件選擇窗口.tbl", false, false )
if doc.ShowModal() = 1 then
ret = doc.ActiveSheet.Element1.GetSelectedName()
'?這個ret就是返回的元件在arrows.tbl中的序號
end if
doc.Free()
VG的變量不需要聲明，直接使用，因為Create函數返回彈出窗口的視圖類，所以，Doc就是視圖類。
12.32.請問VG是否能夠將線條、圖形、元件等顯示帶立體效果？?看了VG自帶的lib和demo中的例子，有帶立體感的例子，請問VG是否能夠顯示出立體效果？
回答：VG沒有專門立體效果的功能，需要手工制作。VG帶有陰影功能
例如，一個按鈕，添加陰影的方法是在背后放一個暗色無邊矩形，然后把它們組合。您也可以在陰影上放一個控制點，當鼠標拖動這個控制點的時候，可以讓陰影的方向和長度發生改變等等（這需要處理調控點的OnNodeChange事件）
12.33.我將*.tbl中的所有元件，圖形，線條名稱都導入到了一個Combox中，我選擇combox中的任意個名稱，怎樣將選中光標 移到對應的元件、圖形、線條上？
回答：BeginUpdate()
ActiveSheet.Selection.Clear()
ActiveSheet.Selection.Add( ActiveSheet.UnitByName( "某圖形的名字" ) )
EndUpdate()
12.34.在vgctrl1SelectChange事件中怎么使用Sender對象？?如果使用這個Sender對象，也就是怎么控制當前選中的元件或圖形的屬性等信息。
回答：vgctrl1SelectChange(Sender: TObject);
beign
Tvgctrl(Sender).
end;
12.48.自定義元件loadfrombuffer?該怎么寫？?NewUnit.LoadFromBuffer(‘<自定義元件名1 name="？？？？" lib="自定義元件庫.tbl" bounds="654.818182,768,668.818182,797" origin="661.818182,782.5" protect="128" color="65535"/>
’);?對內建的元件上面的語句通過了，到自定義元件的時候出現錯誤， 應該怎么寫？
回答：d = AddUnit( "element", 0, 0, 0, 0)
d.LoadFromBuffer( ................ )
?
12.36. loadfrombuff的問題?元件A
S=A.savetobuffer?然后
B=Addunit（'xxx',0,0,0,0）
B.loadfrombuffer(S)
B能夠重現A的形狀，但不能重現A的初始位置，這是什么原因??如何實現完全的重現（包括拓撲連接關系）?
回答：調用頁面的SaveToBuffer()?和LoadFromBuffer()?頁面的savetobuffer和Loadfrombuffer沒問題
12.37..net顏色轉換方式 ？？？
回答：System.Drawing.Color cl;
int n = System.Drawing.ColorTranslator.ToWin32(cl)
12.38.請問，在VC下修改系統參數類，除了vgctrl1.Execute()這個手段，還有別的嗎？?用vgctrl1.Execute()這個手段實在不方便。
回答：系統參數是關系到整個系統所有文件的一些參數，例如DefaultPath（箭頭、網紋、屬性列表窗口等系統文件存放的路徑） 如果寫成形如：?vgctrl1.DefaultPath = "c:\vg\dat\"?。那就表示只是針對vgctrl1這個視圖控件進行設置了。以后勢必還要對其他控件進行同樣的設置......
12.39.請問如何用VC枚舉一個頁面的所有圖元？
回答：例如用VC++ 6.0生成11對類庫文件 ，然后用vc.net打開vc60創建的工程 ，GetActiveSheet()返回CSheet（頁面類） ，頁面上有UnitCount個圖形 ，第一個圖形是GetUnits(0)(基本圖形類CUnit)，做一個循環遍歷就可以了。
12.40.在入門教程里,?我要是拿vc寫該怎么寫啊，你給出了VB的修改屬性的語句如下:
set d = vgctrl1.ActiveSheet.Units( 0 )
d.SetPropertyValue "circle1.BackColor", 255
d.SetPropertyValue "circle1.Pattern", 15
我們不僅可以對元件的屬性進行直接讀寫，而且還可以通過SetPropertyValue操作元件內部圖形的屬性。
回答：CUnit d = vgctrl1.GetActiveSheet().Get_Units( 0 );
d.SetPropertyValue( "circle1.BackColor", 255 );
12.41.如何獲得圖形元素中的文字內容？
回答：AText = AUnit.GetPropertyValue( "text1" )
AString = AUnit.GetPropertyValue( "Text1.Text" )
12.42.怎么給連接線加箭頭？?我用控件在vb程序中用語句vgctrl1.NewUnit "Line", 5畫了一條連接線，怎么給該線加箭頭？，用程序怎么獲得此對象啊？
回答：NewUnit返回值就是此對象 線條有StartArrow屬性和EndArrow屬性，這是起止箭頭形狀。
12.43.VG怎么才能導入其它作圖工具繪制的矢量圖？有沒有現成工具將作圖工具繪制的矢量圖轉換為VG能夠使用的？
回答：選擇編輯/粘貼emf圖片功能、或VG的專門格式轉換工具、VG.EXE的導入
12.44.請問，如何取消平移畫面效果？在使用了movesheet（）函數后，如何才能將鼠標、選擇狀態還原回初始狀態（加載圖元時狀態）？
回答：Edit()
12.45.因為圖片太大，現在想在vg中實現漫游。請問有這方面的思路與例子嘛？ 請問平移畫面是用movesheet()?移動圖元是用什么？
回答：movesheet()?、moveselection()
12.46.在Vb程序中使用VG控件，VB程序中的變量能否與VG控件中的變量交互，例 如，在Vb中設置變量，當該變量值變化，是否能映射到VG控件中的變量？
回答：請參考source.zip包里面提供的vb例子
12.47.詢問,VG幫助上Delphi的問題：FormCreate
procedure TForm1.FormCreate(Sender: TObject);
begin
?? vgctrl1.Design( '' );
?? vgctrl2.Run( 'C:\Documents and Settings\LG\桌面\vg\lib\電力設備.tbl' );
?? vgctrl2.Library_ := True
end;
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
??? vgctrl1.NewUnit('水平刀閘',1);
end;
我就是按照幫助上原樣照搬在DELPHI試驗下,看能不能畫出刀閘,為什么以上代碼,運行過后,不能畫出刀閘,?還有我從你們給的例子,運行可執行文件,也畫不出東西呢,?請問應該怎么辦我以上代碼錯誤嗎,?我就是想看看 怎么在自己程序上做出圖
回答：不能在FormCreate里面寫 ，必須在FormShow里面寫，因為FormCreate的時候，窗口沒有創建起來，而Design和Run函數需要窗口創建后才能運行
12.48.如何在元件的下方自動顯示元件的名稱.?
回答：目前無這個功能 ，代替辦法：可在狀態欄里面顯示鼠標所在位置處的圖形名稱
處理OnMouseMove事件，根據ActiveSheet.UnitAtCursor( 0 )返回值就知道當前鼠標位置處的圖形了。
12.49.在圖形和元件直接設置連接出現的問題？我在delphi下,想在已經畫好的折線的每個頂點上連接一個元件(相同的),已經把折線的linkmode:=2(是被連接者?),每個元件中linkmode:=1(是連接者)請問如何設置連接啊,
這樣設置為什么不行?
punit:=asheet.AddUnit('航路點',0,0,0,0);
punit.SetLink(aline,punit.Links[0],p0);
其中punit是元件,aline是被連接的折線？
回答：punit.setlink( aline, "dot", "p1" )
其中"dot"是元件中那個連接點的名字?"p1"是線條連接點的名字（第二個點） 請仔細閱讀幫助中關于setlink的說明，詳情查看小節10.12、圖形拓撲連接的使用
12.50.想利用數據庫中的兩組數據為為點坐標使用vg畫線,這些線是連起來的,數據庫已連接好了,寫了代碼運行之后,為什么馬上顯示畫線？
回答：首先建立一條線，然后對線上頂點進行賦值。最后調用線條的Refresh()函數
12.51.如何向一個函數中傳參數？?Results = Array(6)
Results.Text = ValueArray
i = 0
iUnit = 0
While i < Elements.Count
iUnit = UnitByName(Elements)
If iUnit <> 0 then????
??? iUnit.Exequte("RefreshValue", CStr(Results))
End If
i = i + 1
Wend
一段腳本程序如上，其中iUnit?是從外部添加的。iUnit?中定義了一個函數RefreshValue用于刷新數據，現請問，如何在以上程序中調用此函數呢？
回答：這是在腳本中么？ 如果是在腳本中,如此即可：
iUnit.RefreshValue( Results )?如果是在控件中，需要這樣：?vg.Execute( "unitname.RefreshValue( results )" )?其中unitname是圖形單元的名字?results是其中的參數。
12.52.在IE中，ActiveX控件定時調用GetURL更新數據，鼠標變為沙漏形，有何解決方法？
回答：是不是數據太多了，太多數據下載的話，應該規劃好數據傳輸，另外可用下面的辦法：
?vgctrl1.Execute( "cursors[4]=cursors[0]" ) ;
12.53.你們有沒有導入SVG的工具或者代碼?
回答：有，你在VG.EXE里面新建一個文件，然后點擊菜單->文件->導入，選SVG格式。
12.54.?在time?的ontimer中這個寫
dim ran as Random
text1.Text=ran.Next(100,1000)
為什么不對?
回答：dim ran as Random是什么語法？不是VG語法，請查看VG的語法幫助說明。
12.55.我要聲明一個隨機數,怎么做?
回答：Random?求一個隨機整數?:text1.Text=Random(100,1000)?VG的內部函數
12.56.?如何動態添加元件的屬性?
回答：在VG腳本里，用：元件名.setpropertyvalue('屬性名',屬性值)進行增加與賦值屬性。返回值用：元件名.getpropertyvalue('屬性名')，詳情請看幫助的setpropertyvalue。
12.57.?還有，在.NET下如何實現這樣的功能：vgctrl1.AddFunction "EndRunning", "41", 48, AddressOf EndRunning??在VB下是行的，但在.NET下會出錯.
回答：.NET下面的函數與變量、對像都是托管代碼，是訪問不了他們的內存地址，所以.NET會出錯,在.net、JAVA下不能直接操作地址,所以在.net下不能使用函數AddFunction。只能把功能函數放在一個DLL中，然后用VG聲明DLL外部函數，而DLL必須是按WIN32API的dll標準？
12.58.?VG正式網絡版里面的vgserver.exe是做在網絡認證服務的嗎，它的端口是多少？
回答：vgserver監聽端口1024,register（“IP”）時VG.dll調用Ry4Com.dll去和vgserver聯系，知道是否取得VG使用權。如果后臺的服務器是在路由后面的，那么應該把路由的端口1024開放并映射到后臺服務器的1024端口上來
12.58.?如何在JS里面post一段VG的XML串到后臺WEB服務器？
回答：JS代碼如下：_form.column_value.value = vgctrl1.SaveToBuffer();
??????? _form.event.value = 'save';
??????? _form.submit();
就可以實現網上VG編輯圖形，用JS腳本上傳TBL入數據庫了。
12.59.?如何判斷圖形是否在某個矩形范圍內？
回答：Touches函數是Iunit圖形單元類的：
bool=Touches(double,double,double,double)
四個參數分別表示這個矩形的左邊、上邊、右邊、下邊坐標（視圖坐標）。
如果圖形在這個矩形框內，返回true，否則返回false。
12.59.VC里如何用AddFcnction增加類的成員函數做為內部函數
回答：VC里面聲明如下：?void __stdcall CallByVG1( double x );
定義如下：void? __stdcall?? CReadwriteDlg::CallByVG1( double x )
{
??? thisdlg->SetDlgItemInt( IDC_EDIT1, (int)x );???
};
Addfunction增加函數如下：
??? void (__stdcall CReadwriteDlg::*CallByVG1)(double a);
??? CallByVG1=&CReadwriteDlg::CallByVG1;
??? vgctrl1.AddFunction( "CallByVG", "12", '0', *(long*)(& CallByVG1) );
VG調用如下：
CallByVG(0,Sender.Value )
由于C++類中成員函數的this指針的默認聲明，所以要聲明時要多一個參數this.但VC函數使用this指針時，會有些問題，所以不推薦使用類成員函數。增加內部函數時應建議使用全局函數。
總結
以上是生活随笔為你收集整理的Visual Graph常见问题回答（FAQ）的全部內容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： session set()用法php,P
- 下一篇： np.zeros（）生成3维