Class TOutlineNodePlus (unit Outlplus)

Inherits from

TPersistent

Constructors


constructor Create(AOwner: TOutlinePlus);

TOutlineNodePlus


Functions

procedure ChangeLevelBy(Value: TChangeRange);


procedure Collapse;


procedure Expand;


procedure FullExpand;


function GetDisplayWidth: Integer;


function GetFirstChild: LongInt;


function GetLastChild: LongInt;


function GetNextChild(Value: LongInt): LongInt;


function GetPrevChild(Value: LongInt): LongInt;


procedure MoveTo(Destination: LongInt; AttachMode: TAttachMode);


function AddNode(Value: TOutlineNodePlus): LongInt;

0103 fix

destructor Destroy;


function GetDataItem(Value: Pointer): LongInt;


function GetNodeAtIndex(TargetIndex: LongInt): TOutlineNodePlus;

Quick exit if we are lucky

function GetRowOfNode(TargetNode: TOutlineNodePlus; var RowCount: Longint): Boolean;


function GetTextItem(const Value: string): LongInt;


function GetVisibleNode(TargetCount: LongInt): TOutlineNodePlus;


function HasAsParent(Value: TOutlineNodePlus): Boolean;


function InsertNode(Index: LongInt; Value: TOutlineNodePlus): LongInt;


procedure InternalRemove(Value: TOutlineNodePlus; Index: Integer);


procedure Remove(Value: TOutlineNodePlus);

Added from Delphi 2.

procedure WriteNode(Buffer: PChar; Stream: TStream);


procedure ChangeExpandedCount(Value: LongInt);


procedure Clear;


procedure CloseNode;


procedure Error(ErrorString: String);


function GetExpandedNodeCount: LongInt;


function GetFullPath: string;


function GetIndex: LongInt;


function GetLastIndex: LongInt;


function GetLevel: Cardinal;


function GetList: TList;


function GetMaxDisplayWidth(Value: Cardinal): Cardinal;


function GetNode(Index: LongInt): TOutlineNodePlus;


function GetText: string;


function GetTopItem: Longint;


function GetVisibleParent: TOutlineNodePlus;


function HasChildren: Boolean;


function HasVisibleParent: Boolean;


function IsEqual(Value: TOutlineNodePlus): Boolean;


procedure ReIndex(StartNode, EndNode: TOutlineNodePlus; NewIndex: LongInt; IncludeStart: Boolean);

Added from Delphi 2.

procedure Repaint;


function Resync(var NewIndex: LongInt; EndNode: TOutlineNodePlus): Boolean;


procedure SetExpandedState(Value: Boolean);


procedure SetGoodIndex;

not

procedure SetHorzScrollBar;


procedure SetLevel(Level: Cardinal);


procedure SetText(const Value: string);


Properties

property Data : Pointer


property Expanded : Boolean


property FullPath : string


property HasItems : Boolean


property Index : LongInt


property IsVisible : Boolean


property Level : Cardinal


property Parent : TOutlineNodePlus


property Text : string


property TopItem : Longint


property ExpandCount : LongInt


property Items : TOutlineNodePlus


property List : TList


property Outline : TOutlinePlus


Events

Variables

FData : Pointer;


FExpandCount : LongInt;


FIndex : LongInt;


FList : TList;


FOutline : TOutlinePlus;


FParent : TOutlineNodePlus;


FState : Boolean;


FText : PString;



Constructors


constructor Create(AOwner: TOutlinePlus);

TOutlineNodePlus


Functions


procedure ChangeLevelBy(Value: TChangeRange);


procedure Collapse;


procedure Expand;


procedure FullExpand;


function GetDisplayWidth: Integer;


function GetFirstChild: LongInt;


function GetLastChild: LongInt;


function GetNextChild(Value: LongInt): LongInt;


function GetPrevChild(Value: LongInt): LongInt;


procedure MoveTo(Destination: LongInt; AttachMode: TAttachMode);


function AddNode(Value: TOutlineNodePlus): LongInt;

0103 fix


destructor Destroy;


function GetDataItem(Value: Pointer): LongInt;


function GetNodeAtIndex(TargetIndex: LongInt): TOutlineNodePlus;

Quick exit if we are lucky


function GetRowOfNode(TargetNode: TOutlineNodePlus; var RowCount: Longint): Boolean;


function GetTextItem(const Value: string): LongInt;


function GetVisibleNode(TargetCount: LongInt): TOutlineNodePlus;


function HasAsParent(Value: TOutlineNodePlus): Boolean;


function InsertNode(Index: LongInt; Value: TOutlineNodePlus): LongInt;


procedure InternalRemove(Value: TOutlineNodePlus; Index: Integer);


procedure Remove(Value: TOutlineNodePlus);

Added from Delphi 2.01


procedure WriteNode(Buffer: PChar; Stream: TStream);


procedure ChangeExpandedCount(Value: LongInt);


procedure Clear;


procedure CloseNode;


procedure Error(ErrorString: String);


function GetExpandedNodeCount: LongInt;


function GetFullPath: string;


function GetIndex: LongInt;


function GetLastIndex: LongInt;


function GetLevel: Cardinal;


function GetList: TList;


function GetMaxDisplayWidth(Value: Cardinal): Cardinal;


function GetNode(Index: LongInt): TOutlineNodePlus;


function GetText: string;


function GetTopItem: Longint;


function GetVisibleParent: TOutlineNodePlus;


function HasChildren: Boolean;


function HasVisibleParent: Boolean;


function IsEqual(Value: TOutlineNodePlus): Boolean;


procedure ReIndex(StartNode, EndNode: TOutlineNodePlus; NewIndex: LongInt; IncludeStart: Boolean);

Added from Delphi 2.01


procedure Repaint;


function Resync(var NewIndex: LongInt; EndNode: TOutlineNodePlus): Boolean;


procedure SetExpandedState(Value: Boolean);


procedure SetGoodIndex;

not


procedure SetHorzScrollBar;


procedure SetLevel(Level: Cardinal);


procedure SetText(const Value: string);


Properties


property Data : Pointer


property Expanded : Boolean


property FullPath : string


property HasItems : Boolean


property Index : LongInt


property IsVisible : Boolean


property Level : Cardinal


property Parent : TOutlineNodePlus


property Text : string


property TopItem : Longint


property ExpandCount : LongInt


property Items : TOutlineNodePlus


property List : TList


property Outline : TOutlinePlus


Events


Variables


FData : Pointer;


FExpandCount : LongInt;


FIndex : LongInt;


FList : TList;


FOutline : TOutlinePlus;


FParent : TOutlineNodePlus;


FState : Boolean;


FText : PString;