Post by Jim Mellish on Apr 6, 2005 9:56:11 GMT -5
Hi,
I am using VclZip v3.04 build 1, Windows XP sp2, Delphi 7 sp1.
The following code doesn't do what I woild expect:
procedure TForm1.Button2Click(Sender: TObject);
var s, t, u: string;
begin
s := VclZip.ZLibCompressStr('My name is Jim');
ShowMessage(s);
t := s;
u := VclZip.ZLibDecompressString(t);
ShowMessage(u);
end;
I would expect my final ShowMessage to show 'My name is Jim' but it actually shows 't%'.
In the code where I doscovered this I compress a string and store it is a database using a query. Close the query, open it again and then decompress the string retreived from the query.
I am using VclZip v3.04 build 1, Windows XP sp2, Delphi 7 sp1.
The following code doesn't do what I woild expect:
procedure TForm1.Button2Click(Sender: TObject);
var s, t, u: string;
begin
s := VclZip.ZLibCompressStr('My name is Jim');
ShowMessage(s);
t := s;
u := VclZip.ZLibDecompressString(t);
ShowMessage(u);
end;
I would expect my final ShowMessage to show 'My name is Jim' but it actually shows 't%'.
In the code where I doscovered this I compress a string and store it is a database using a query. Close the query, open it again and then decompress the string retreived from the query.
