一直对于用Delphi开发SVG的程序感兴趣，这两天接触了WinGraphviz(http://home.so-net.net.tw/oodtsen/wingraphviz)，按照例子Graph Visualization in Delphi (http://www.kylecordes.com/story-267-graphviz-delphi.html)学习做了一次，觉得非常好，以后有空多研究研究。

源代码如下：

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls,WINGRAPHVIZLib_TLB, GIFImage, OleCtrls,
  SHDocVw;

type
  TForm1 = class(TForm)
    ctlPicture: TImage;
    txtInput: TMemo;
    cmdExec: TButton;
    Button1: TButton;
    WebBrowser1: TWebBrowser;
    procedure cmdExecClick(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.cmdExecClick(Sender: TObject);
var
  Dot: IDot;
  Image: IBinaryImage;
  ImageFileName: string;
begin
   ImageFileName := 'c:\image.gif';
   Dot := CoDOT.Create;
   Image := Dot.ToGIF(txtInput.Text);
   Image.Save(ImageFileName);
   ctlPicture.Picture.LoadFromFile(ImageFileName);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Dot: IDot;
  Image: IBinaryImage;
  ImageFileName: string;
begin
  ImageFileName := 'c:\image.svg';
  Dot := CoDOT.Create;
  Image := Dot.ToSVGZ(txtInput.Text);
  Image.Save(ImageFileName);
  WebBrowser1.Navigate('file:///C:/image.svg');
end;

end.

这个单元怎么进来的...

找不到啊...怎么装啊...