_FCopyToZip

(    FNFrom     : String[79];
     NameZip    : String[79]; 
     FNTo       : String[79]; 
     NewFile    : Byte;
 dim Error      : String) : Byte

Kopíruje soubor FNFrom do FNTo jako zabalený ZIP soubor. Jestliže ve FNFrom nebo ve FNTo není uvedena cesta (např. c:\Test...), je volen standardní adresář pro data. Tento adresář je možné měnit v okně prostředí. Funkce vrací true, když se vše podaří a false když během balení vznikla chyba. Znění chyby se vrací v parametru Error.

Do ZIP souboru bude FNFrom uložen se jménem NameZip. Jestliže bude parametr NameZip prázdný, použije se pouze jméno souboru a přípona z FNFrom bez cesty!

Parametr NewFile definuje, zda bude FNFrom přidán do stávajícího ZIP souboru FNTo nebo bude vytvořen zcela nový soubor.

Podívejte se na: Práce se soubory

Příklad:

dim sChyba : String;
if(_FCopyToZip(
    "N:\Pam5\Mac\SPECMANA.MAC", 
    "",
    "N:\Pam5\firma1\dta\Mac.zip", true, sChyba) = false)then
    _MsgBox(1, sChyba, 0);
endif