TZipForge - nie odczytuje danych z archiwum
Napisane: środa, 10 listopada 2010, 10:53Mam kod pakujący dane za pomocą TZipForge:
I kod odczytujące dane z archiwum do memo:
Problem polega na tym, ze nic w tym Memo1 nie widzę, a powinienem napisy z pliku spakowanego. Wie ktoś może co robię źle ??
Pozdrawiam,
KOD cpp: UKRYJ
ZipForge1->FileName = "skakowany.zip";
ZipForge1->BaseDir = ExtractFilePath(Application->ExeName);
ZipForge1->EncryptionMethod = caAES_256;
ZipForge1->Password = "ppp";
ZipForge1->OpenArchive(fmCreate);
ZipForge1->AddFiles("plikHEX.hex");
ZipForge1->CloseArchive();
ZipForge1->BaseDir = ExtractFilePath(Application->ExeName);
ZipForge1->EncryptionMethod = caAES_256;
ZipForge1->Password = "ppp";
ZipForge1->OpenArchive(fmCreate);
ZipForge1->AddFiles("plikHEX.hex");
ZipForge1->CloseArchive();
KOD cpp: UKRYJ
TMemoryStream *str = new TMemoryStream();
ZipForge1->FileName = "skakowany.zip";
ZipForge1->OpenArchive(fmOpenRead);
ZipForge1->EncryptionMethod = caAES_256;
ZipForge1->Password = "ppp";
ZipForge1->ExtractToStream("plikHEX.hex",str);
Memo1->Lines->LoadFromStream(str);
ZipForge1->CloseArchive();
delete str;
ZipForge1->FileName = "skakowany.zip";
ZipForge1->OpenArchive(fmOpenRead);
ZipForge1->EncryptionMethod = caAES_256;
ZipForge1->Password = "ppp";
ZipForge1->ExtractToStream("plikHEX.hex",str);
Memo1->Lines->LoadFromStream(str);
ZipForge1->CloseArchive();
delete str;
Problem polega na tym, ze nic w tym Memo1 nie widzę, a powinienem napisy z pliku spakowanego. Wie ktoś może co robię źle ??
Pozdrawiam,