ShadowFlare's Realm
http://sfsrealm.hopto.org/cgi-bin/yabb2/YaBB.pl
ShadowFlare's Realm Forums >> Program Development >> How to decompress w3g file on Delphi?
http://sfsrealm.hopto.org/cgi-bin/yabb2/YaBB.pl?num=1127291461

Message started by Wi34rD on Sep 21st, 2005, 10:31am

Title: How to decompress w3g file on Delphi?
Post by Wi34rD on Sep 21st, 2005, 10:31am

I bad speak english, so exuse me, plz.

Title: Re: How to decompress w3g file on Delphi?
Post by wulfskin on Sep 22nd, 2005, 9:20pm

Hello,

an extract out of my program:
Code:
           for I := 1 to FBlockCount do begin
             BlockSize := ReadWord;
             Seek(6, soFromCurrent);
             ZipStream := TMemoryStream.Create;
             ZipStream.CopyFrom(FileStream, BlockSize);
             DezipStream := TZDecompressionStream.Create(ZipStream);
             ReplayStream.CopyFrom(DezipStream, 0);
             DezipStream.Free;
             ZipStream.Free;
           end;
Google for Ziblib and Delphi to get the unit for extraction.

Regards,
Hape

Title: Re: How to decompress w3g file on Delphi?
Post by Wird on Aug 28th, 2006, 10:40am

Who can give me source-code on Delphi?

Title: Re: How to decompress w3g file on Delphi?
Post by wulfskin on Aug 28th, 2006, 11:13am

Hello,

my program "Replay Explorer" is open source and written in delphi. The source code is not documented/commented, sorry.
You may want to look at my source:
http://sourceforge.net/projects/rep-ex.
Extraction is in unit "w3g.pas".
If you got any further question, you're welcome to ask!

Regards,
Hape

ShadowFlare's Realm » Powered by YaBB 2.2.1!
YaBB © 2000-2008. All Rights Reserved.