🚀 go-pugleaf

> E-mail it direct.  

Done you must have in a couple of minutes.

>I've started on a new routine, which writes the header
> and file records, which have had an update all Array of Chars are now
> LPWSTR.  
Since this is a dynamic string variable it is not recommended to be used
in a static Record and we need the record to be static in size so it will
easier to handle. 

Take a look on the example I have send you via email.

>The Files are loaded into a TMemoryStream, compressed and then
> written in teh TFileStream.

> But the FileStream only writes 4 Characters.  If using the
> TMemoryStream.SaveToFile routine then the file is written correctly!!
> 
> 
> Any Ideas?
> 

How do you write it to the file??

I personaly use the TfileStream.CopyFrom(Tmemorystream,0); 

which copys the entire TMemoryStream to the current TfileStream position.
You will find an example on the demo I've send you.

If you do have any questions do not hesitate to ask me.
Please keep in mind that the demo is not complete although
it does creates a list of files in a single file it 
lacks the following abilities

1) I do not seperate the compressed data from each other
   with a start/end tag (required if you want to be able
   to extract uncorrupted files from a corrupted backup file
   easelly).
2) No compression method has been used just a copy of the 
   existing files in a single file.
3) I have removed the fullfilename field as it is not needed
   it can be reconstructed by the FileDir+Filename fields.

Regards
johnnie.