|
|
|
|
WLanguage Procedure llamado por fTrackFile WLanguage Procedure ("callback") llamado por fTrackFile cuando se realiza un cambio en el archivo rastreado. Esto puede ser una solución local, global o interna.... // Name of file to track sFileName is string = "C:\Temp\MyDir\MyFile.extension" // The ProcessModification procedure will be called when the // "C:\Temp\MyDir\MyFile.extension" file is modified. IF fTrackFile(sFileName, fTrackFile_Callback, ... ftCreateFile + ftModifyFile + ftDeleteFile + ... ftRename) THEN // Inform the user that the file will be tracked Info("The " + sFileName + " file will be tracked.") ELSE // Inform the user that the file will not be tracked Info("The " + sFileName + " file will not be tracked.") END // Code of the procedure INTERNAL PROCEDURE fTrackFile_Callback(sFullName, sFileName, nAction, sOldFileName) sActionDesignation is string // The designation of the action depends on nAction SWITCH nAction CASE ftCreateFile: sActionDesignation = "Creating files" CASE ftDeleteFile: sActionDesignation = "Deleting files" CASE ftModifyFile: sActionDesignation = "Modifying files" CASE ftRename: sActionDesignation = "Renaming files" END // Add a line containing the information about the modification // in the TABLE_MODIFICATIONS control TableAddLine(TABLE_MODIFICATIONS, sFullName, sFileName, ... sActionDesignation, sOldFileName) END
Sintaxis
fTrackFile_Callback(<Full name of the tracked file> , <Name of modified file> , <Action> , <Old file name>)
<Full name of the tracked file>: Cadena de caracteres ruta completa (directorio y nombre) del archivo rastreado. <Name of modified file>: Cadena de caracteres Nombre del archivo rastreado (después de la modificación). <Action>: Constante de tipo Integer Acción realizada en el expediente:
| | ftCreateFile | Se ha creado el <Nombre del fichero modificado> fichero. | ftDeleteFile | El <Nombre del archivo modificado> archivo fue borrado. | ftModifyFile | Se modificó el <Nombre del archivo modificado> archivo. | ftRename | El <Nombre del archivo modificado> archivo fue renombrado. |
<Old file name>: Cadena de caracteres El nombre anterior del archivo modificado, si fue renombrado. Observaciones Atención Este WLanguage Procedure se ejecuta en un WLanguage thread. Atención: Los siguientes procesos no se pueden ejecutar en los hilos: Clasificación Lógica de negocio / UI: Código neutro
Esta página también está disponible para…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|