PC SOFT

ONLINE HELP
 WINDEVWEBDEV AND WINDEV MOBILE

Home | Sign in | English EN
This content has been translated automatically. Click here to view the French version.
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReports and QueriesUser code (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Browser code
WINDEV Mobile
AndroidAndroid Widget iPhone/iPadIOS WidgetApple WatchMac CatalystUniversal Windows 10 App
Others
Stored procedures
Procedure WLanguage called by the zipAddFolder function
Procedure WLanguage (also called "Callback) called when adding each file by the zipAddDirectory function. This Procedure allows to archive a tree by omitting one or more files.
Example
// Déclaration et initialisation des variables
NomRépertoire is string
NomArchive is string = "MonArchive"
CodeErreurCréation is int
CodeErreurAjout is int
 
// Création d'une archive
CodeErreurCréation = zipCreate(NomArchive, "C:\MonRépertoire\MesArchives\ArchivePdf.wdz")
 
// Affichage du message d'erreur si l'archive n'a pas été créée
IF CodeErreurCréation = 0 THEN
// Sélection du répertoire
NomRépertoire = fSelectDir("", "", "Répertoire à ajouter")
 
// Ajoute les fichiers "BMP" du répertoire sélectionné
// et de ses sous-répertoires dans l'archive
CodeErreurAjout = zipAddDirectory(NomArchive, NomRépertoire, True, ...
 zipDrive, zipAjouteRépertoire_Callback)
 
// Affichage du message d'erreur si les fichiers n'ont pas été ajoutés
IF CodeErreurAjout <> 0 THEN
 Error(zipMsgError(CodeErreurAjout))
END
ELSE
Error(zipMsgError(CodeErreurCréation))
END
 
INTERNAL PROCÉDURE zipAjouteRépertoire_Callback(NomFichier is string)
IF fExtractPath(NomFichier, fExtenssion) ~= ".gif" THEN
RETURN True
ELSE
RETURN False
END
END
Syntax
<Result> = zipAdd_Folder_Callback(<File name>)
<Result>: Boolean
  • If the procedure returns True, the file must be included in the archive.
  • If the procedure returns False, the file must not be included in the archive.
<File name>: Character string
Path of the file that will be processed by zipAddDirectory.
Business / UI classification: Neutral code
Component: wd270zip.dll
Minimum version required
  • Version 26
This page is also available for…
Comments
Click [Add] to post a comment