TProgress & TLineList component 1.3

TProgress is a component for breakable program progress indication.
TLineList is a component to process huge text files sequentially.

Demo project is attached to show how easy to use it.

Files:
 PROGDEMO.DPR   Demo Project
 PROGDEMO.RES   Demo Project resource
 PROGTOP .PAS   Demo code
 PROGTOP .DFM   Demo resource
 PROGFORM.PAS   TProgress code
 PROGFORM.DFM   TProgress resource
 LINELIST.PAS   TLineList code
 STRINGS .PAS   String compatibility 16/32


Instead of documentation here are some words about the interface.

--------------------------------------
TProgress
--------------------------------------

procedure Start(Title: string; Max: Longint);
To start the progress indicator.
It disables the calling form.

procedure ShutUp;
To stop and hide the progress indicator.
It enables the calling form.

procedure SetValue(Value: Longint);
To set indicator value.

procedure Step(n: Longint);
To step indicator value.

--------------------------------------
TLineList
--------------------------------------

constructor Create(const Fn: TFileName; Ahead: Integer);

Fn is the name of the file to be processed.
Any time (included create) when the number of lines becomes 
less then Ahead it appends lines from the file 
otherwise TLineList works just like TStringList.
The appending process starts as OnChange event.

procedure Reset;
To set the current file position to the beginning of the file.

property FileName;
The file name of the processed file. Read only. 

property FileSize;
The file size of the processed file. Read only. 

property FilePos;
The current file position of the processed file. Read only. 

--------------------------------------

If you find the components useful I want to hear about you!

--------------------------------------
--------------------------------------
Tibor F. Liska     MTA SZTAKI
                   Lagymanyosi utca 11
                   1111 Budapest
                   Hungary
Fax:    +36-1-269-8288
Tel:    +36-1-269-8281
E-mail: liska@sztaki.hu
--------------------------------------
