1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
|
CheminDeLApplication=ExtractFilePath(Application->ExeName);
AbZipper1->TempDirectory=CheminDeLApplication;
AbZipper1->LogFile=CheminDeLApplication+"\\Log.txt";
AbZipper1->BaseDirectory=CheminDeLApplication;
AbZipper1->FileName=CheminDeLApplication+"\\Archive.zip";
for(int i=0;i<ListeFichierACompresser->Count;i++)/*Ajouter les fichier un à un*/
{
AbZipper1->AddFiles(ListeFichierACompresser->Strings[i],1);
}
AbZipper1->ZipfileComment="Ceci est un commentaire depuis mon application, et non pas de WinRar :D";
AbZipper1->Save();
AbZipper1->CloseArchive(); |
Partager