|
|
|
|
|
WLanguage procedure called by fWatchDirectory WLanguage procedure ("callback") called by fWatchDirectory when a change is made to the watched directory. This can be a local, global, or internal.
sNomRepertoire is string = "C:\Temp\MonRep"
IF fWatchDirectory(sNomRepertoire, fSurveilleRépertoire_Callback, fwCreateFile + ...
fwModifyFile + fwDeleteFile + fwRename) THEN
Info("La mise sous surveillance du répertoire " + sNomRepertoire + " a réussi.")
ELSE
Info("La mise sous surveillance du répertoire " + sNomRepertoire + " a échoué.")
END
PROCEDURE fSurveilleRépertoire_Callback(sNomRepertoire, sNomFichier, nAction, sAncienNomFichier)
ExecuteMainThread(AjoutTable, sNomRepertoire, sNomFichier, nAction, sAncienNomFichier)
PROCEDURE AjoutTable(sNomRepertoire, sNomFichier, nAction, sAncienNomFichier)
sDesignationAction is string
SWITCH nAction
CASE fwCreateFile : sDesignationAction = "Création de fichier"
CASE fwDeleteFile : sDesignationAction = "Suppression de fichier"
CASE fwModifyFile : sDesignationAction = "Modification de fichier"
CASE fwRename : sDesignationAction = "Renommage de fichier"
END
TableAddLine(TABLE_MODIFICATIONS, sNomRepertoire, sNomFichier, ...
sDesignationAction, sAncienNomFichier)
Syntax
fWatchDirectory_Callback(<Name of the watched directory> , <Name of modified element> , <Action> , <Former name>)
<Name of the watched directory>: Character string Full name of the watched directory. <Name of modified element>: Character string Name of the modified file or directory. <Action>: Integer constant Action performed:
| | fwCreateFile | The <Name of modified element> file or directory was created in <Directory>. | fwDeleteFile | The <Name of modified element> file or directory was deleted from <Directory>. | fwModifyFile | The <Name of modified element> file or directory was modified in <Directory>. | fwRename | The <Name of modified element> file or directory was renamed in <Directory>. |
<Former name>: Character string Former name of the modified file or directory if they were renamed. Remarks Caution This WLanguage procedure is run in a WLanguage thread. Please note: the following processes cannot be run in threads: - opening windows with WLanguage functions such as Open, Use, Close, ... If windows are to be handled in threads (a rare case), a specific management system must be set up. For more details, see Opening a window in a secondary thread.
- managing events.
- managing timers.
Business / UI classification: Neutral code
This page is also available for…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|