2013-11-22 21 views
-5

我已經下載並安裝了TSimpleGraph組件,但無法真正瞭解如何使用它。我已經檢查了這個演示,但是對於我和Delphi(我使用C++ Builder)來說這太複雜了,以便能夠剖析我需要的東西。如何使用TSimpleGraph組件?

我在試圖創建兩個用箭頭線連接的矩形。當用戶拖動它們時,矩形應該能夠移動,並且箭頭應該相應地移動(從一個矩形指向另一個矩形)。如果有人能爲我提供這個例子(Delphi或C++ Builder),我相信我可以找出其餘的。提前致謝。

+0

我不認爲這會奏效。您可以向您顯示嘗試並詢問其中的特定錯誤。但是作爲一個教你的人,爲了給你一個全新的教程,不要太複雜也不要太簡單,爲你的閱讀方便而定製。我認爲這不會奏效。 http://mattgemmell.com/2008/12/08/what-have-you-tried –

+0

我指定了我需要的東西。我不需要教程,只需要用箭頭線連接兩個矩形。我不能展示我的作品,因爲我不知道如何開始,也無法在網上找到其他東西。 – Tracer

回答

2
procedure TForm1.FormCreate(Sender: TObject); 
var 
    Node: TRectangularNode; 
    Link: TGraphLink; 
begin 
    FGraph := TSimpleGraph.Create(Self); 
    FGraph.SetBounds(10, 10, 400, 400); 
    FGraph.BeginUpdate; 
    Node := TRectangularNode.Create(FGraph); 
    Node.SetBounds(25, 25, 100, 50); 
    Node := TRectangularNode.Create(FGraph); 
    Node.SetBounds(200, 200, 50, 100); 
    Link := TGraphLink.Create(FGraph); 
    Link.Link(FGraph.Objects[0], FGraph.Objects[1]); 
    FGraph.EndUpdate; 
    FGraph.Parent := Self; 
end; 
+0

非常感謝。 – Tracer