如何用delphi画出有箭头、有节点的流程图？

Question

要嘛自己用canvas画了,麻烦
不过可以用第三防控件
我知道好一点的有devexpress一套有一个画流程图的东东

Answer 1

我当然是想画流程图了，
请问devexpress那里有的下啊？

Answer 2

dennisfox(dennis)
:请问你能否说的详细一点，或附上一点代码，

Answer 3

要想画的随便一点还是用vanvas,下面是一个小例子，
procedure TForm1.Button1Click(Sender: TObject);
var
  Bitmap : TBitMap;
begin
  Bitmap := TBitmap.Create;
  try
    with Bitmap do begin
      LoadFromFile('c:\Program Files\Common Files\Borland Shared\Images\Splash\256color\factory.bmp');
      Transparent := True;
      TransParentColor := BitMap.canvas.pixels[50,50];
      Form1.Canvas.Draw(0,0,BitMap);
      TransparentMode := tmAuto;
      Form1.Canvas.Draw(50,50,BitMap);
    end;
  finally
    Bitmap.Free;  end;
end;