DELPHI AREA
MESSAGE BOARD
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Create TSimpleGraph

 
   Reply to topic    DELPHI AREA Forum Index -> Delphi Programming
View previous topic :: View next topic  
Author Message
gdavin
Member


Joined: 24 Jan 2005
Posts: 1
PostPosted: 24/01/05 16:09    Post subject: Create TSimpleGraph Reply with quote
Hello Smile

I want to dynamically create a TSimpleGraph with TRectangularNode.

Where I can find some example ?

Thanks
Back to top
View user's profile
Stefan
Member


Joined: 27 Sep 2004
Posts: 49
Location: Netherlands
PostPosted: 24/01/05 16:45    Post subject: Reply with quote
Hi,

Something like this should work:

Code:

procedure TForm1.SomeProc;
begin
  Graph := TSimpleGraph.Create(Form1);
  with Graph do begin
    Parent := Form1;
    Left := 0;
    Top := 0;
    Width := 400;
    Height := 400;
    ZoomMax := 1000;
  end;
end;

procedure TForm1.SomeOtherProc;
var
  r: TRect;
  node: TGraphNode;
begin
  r := Rect(20, 20, 250, 50);
  node := Graph.InsertNode(@r);
  node.Text := 'Node text!';
end;



Cheers,
Stefan
Back to top
View user's profile Send e-mail
Display posts from previous:   
   Reply to topic    DELPHI AREA Forum Index -> Delphi Programming All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB 2.0.6 © 2001, 2002 phpBB Group