TCustomLvlGraphControl

type TCustomLvlGraphControl = class(TCustomControl)

protected

  procedure GraphInvalidate(); virtual;

  procedure GraphSelectionChanged(); virtual;

  procedure GraphStructureChanged(); virtual;

  procedure DoSetBounds(); override;

  procedure DoStartAutoLayout; virtual;

  procedure DoMinimizeCrossings; virtual;

  procedure DoAutoLayoutLevels(); virtual;

  procedure DoMinimizeOverlappings(); virtual;

  procedure DoEndAutoLayout; virtual;

  procedure DoDrawEdge(); virtual;

  procedure Paint; override;

  function Draw(); virtual;

  procedure MouseMove(); override;

  procedure MouseDown(); override;

  procedure MouseUp(); override;

  procedure CreateWnd; override;

  procedure HighlightConnectedEgdes();

  procedure DoOnShowHint(); override;

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure EraseBackground(); override;

  property Graph: TLvlGraph; [r]

  procedure Clear;

  procedure AutoLayout; virtual;

  procedure Invalidate; override;

  procedure InvalidateAutoLayout;

  procedure BeginUpdate;

  procedure EndUpdate;

  function GetNodeAt();

  function GetEdgeAt();

  class function GetControlClassDefaultSize; override;

  function GetDrawSize;

  property NodeStyle: TLvlGraphNodeStyle; [rw]

  property NodeUnderMouse: TLvlGraphNode; [rw]

  property EdgeNearMouse: TLvlGraphEdge; [rw]

  property EdgeStyle: TLvlGraphEdgeStyle; [r]

  property Limits: TLvlGraphLimits; [r]

  property Options: TLvlGraphCtrlOptions; [rw]

  property OnSelectionChanged: TNotifyEvent; [rw]

  property ScrollTop: Integer; [rw]

  property ScrollTopMax: Integer; [r]

  property ScrollLeft: Integer; [rw]

  property ScrollLeftMax: Integer; [r]

  property OnMinimizeCrossings: TNotifyEvent; [rw]

  property OnMinimizeOverlappings: TLvlGraphMinimizeOverlappingsEvent; [rw]

  property OnStartAutoLayout: TNotifyEvent; [rw]

  property OnEndAutoLayout: TNotifyEvent; [rw]

  property OnDrawStep: TLvlGraphDrawEvent; [rw]

  property Images: TCustomImageList; [rw]

  property PixelPerWeight: single; [r]

  property SelectedNode: TLvlGraphNode; [rw]

  property ShowHint;

end;

TCustomLvlGraphControl

TObject