Class TFileNode (unit ProjNode)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);

******************************************************************** TFileNode


Functions

procedure AddCreatedHistItem;


procedure AddVersion(const FilePath: string; var Replaced: boolean);


procedure Delete;


procedure DeleteHistory(hi: THistoryItem);


function GetFile(hi: THistoryItem): TMemoryStream;

WriteSubProjs must be called later

function GetHist(Index: integer): THistoryItem;


function GetLastHistWithFile: integer;


procedure WriteHistList;


function CompareWithLatestFile(ms: TMemoryStream): boolean;

Returns TRUE if they match

function GetActive: boolean;


procedure ReadHistList;

Copy the file into a Mem buffer

procedure SetActive(b: boolean);


function StgName: string;


Properties

property CheckedOut : boolean


property CheckOutUser : string


property Created : TDateTime


property FileName : string


property Modified : TDateTime


property NumVersions : integer


property StgID : integer


property Active : boolean


Events

Variables

DataSize : integer;


Hist : TDataModule;


MetaSize : integer;


ParProj : TProjectNode;


Storage : IStorage;


Fco : boolean;


Fcou : string;


Fcr : TDateTime;


Ffn : string;


Fmd : TDateTime;


FNumVer : integer;


Fsi : integer;


NextID : integer;



Constructors


constructor Create(AOwner: TComponent);

******************************************************************** TFileNode


Functions


procedure AddCreatedHistItem;


procedure AddVersion(const FilePath: string; var Replaced: boolean);


procedure Delete;


procedure DeleteHistory(hi: THistoryItem);


function GetFile(hi: THistoryItem): TMemoryStream;

WriteSubProjs must be called later


function GetHist(Index: integer): THistoryItem;


function GetLastHistWithFile: integer;


procedure WriteHistList;


function CompareWithLatestFile(ms: TMemoryStream): boolean;

Returns TRUE if they match


function GetActive: boolean;


procedure ReadHistList;

Copy the file into a Mem buffer


procedure SetActive(b: boolean);


function StgName: string;


Properties


property CheckedOut : boolean


property CheckOutUser : string


property Created : TDateTime


property FileName : string


property Modified : TDateTime


property NumVersions : integer


property StgID : integer


property Active : boolean


Events


Variables


DataSize : integer;


Hist : TDataModule;


MetaSize : integer;


ParProj : TProjectNode;


Storage : IStorage;


Fco : boolean;


Fcou : string;


Fcr : TDateTime;


Ffn : string;


Fmd : TDateTime;


FNumVer : integer;


Fsi : integer;


NextID : integer;