Delphi FMX (Android) – How read text file inside zip stream without extract?

  

Is it possible to read a file from the zip file without extract it? I want to read a text file from a compressed file(as an android assets) in a Memo lines.

ZipFile := TZipFile.Create; //Zipfile: TZipFile
try
ZipFile.Open(‘C:\Path\to\file.zip’, zmRead);
for I := 0 to ZipFile.FileCount – 1 do
begin
if ZipFile.FileNames[I]=’A1.txt’ then //S: string
//My problem is here ? How load A1.txt to memo lines?
Memo1.Lines.Add(S);
end;
ZipFile.Close;
finally
ZipFile.Free;
end;

Comments are closed.