...
Cette fonction ne peut pas être utilisée en mode test : il est nécessaire de créer l'exécutable pour initialiser un délégué .NET.
...
oFSWatcher est un FileSystemWatcher //Objet FileSystemWatcher
oCreated est un FileSystemEventHandler dynamique //Le Handler de création
//Surveille le répertoire sécifié
oFSWatcher:Path = "c:\monRep"
//Surveille les fichiers TXT
oFSWatcher:Filter = "*.txt"
//Filtre sur les Acces, écriture et taille de fichier
oFSWatcher:NotifyFilter += NotifyFilters::LastAccess
oFSWatcher:NotifyFilter += NotifyFilters::LastWrite
oFSWatcher:NotifyFilter += NotifyFilters::Size
/En .NET Correspond à la procédure suivante
//oFSWatcher.Created += new System.IO.FileSystemEventHandler(onCreated);
//
//private void onCreated(object sender, System.IO.FileSystemEventArgs e)
// .....
//}
SI PAS EnModeTest() ALORS
//DotNetDélégué créé un objet de type FileSystemEventHandler
//Branche la procédure onCreated sur le Handler FileSystemEventHandler
oFSWatcher:add_Created(DotNetDélégué("onCreated","FileSystemEventHandler"))
//On met la détection d'évènement à vrai
oFSWatcher:EnableRaisingEvents = Vrai
FIN
PROCEDURE onCreated(src,args)
trace("OnCreated : "+ args:FullPath+")
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=19&topic_id=5892&post_id=23812