Class TBuffSort (unit BuffSort)

Inherits from

TObject

TMergeFile

Constructors


constructor Create(Compare: TMergeCompare);

MergeSort


Functions

destructor Destroy;

Start

procedure Init(FileName: String);

Create

procedure Start;

SetMaxMem

function GetMaxMem:LongInt;


procedure SetMaxMem(value:LongInt);

GetMaxMem

Properties

property MaxLines : LongInt


property MaxMem : LongInt


Events

Variables

MergeData : PMergeData;


fBuffersSize : Longint;


fCompare : TMergeCompare;


fFileName : String;


FMaxLines : LongInt;


fMaxMem : LongInt;


fMerArray : TM3Array;


fTempFileList : TStringList;


MergeFile : TMergeFile;


Reader : TSorStream;


Writer : TSorStream;



Constructors


constructor Create(Compare: TMergeCompare);

MergeSort


Functions


destructor Destroy;

Start


procedure Init(FileName: String);

Create


procedure Start;

SetMaxMem


function GetMaxMem:LongInt;


procedure SetMaxMem(value:LongInt);

GetMaxMem


Properties


property MaxLines : LongInt


property MaxMem : LongInt


Events


Variables


MergeData : PMergeData;


fBuffersSize : Longint;


fCompare : TMergeCompare;


fFileName : String;


FMaxLines : LongInt;


fMaxMem : LongInt;


fMerArray : TM3Array;


fTempFileList : TStringList;


MergeFile : TMergeFile;


Reader : TSorStream;


Writer : TSorStream;