Cita:
Empezado por escafandra
Y ¿como vigilas la carpeta que debe recibir el archivo.txt?
Saludos.
|
Hola escafandra, como te decia tengo una unidad llamada Hilo que realmente es un Trhead, lo chistoso de esto es que tengo una aplicacion que hice ya tiene 2 años atras que igualmente me vigila la carpeta que yo asigne y no me consume memoria, yo creo que es el servicio que hace un continuo loop te paso una parte del codigo del Thread:
Código Delphi
[-]
procedure VigilanteUnidad.Execute; Var
hNotif: THandle;
P:PAnsiChar;
begin
SDirVigilar:=P;
P:=PAnsiChar(SDirVigilar);
hNotif := FindFirstChangeNotification(P,False,FILE_NOTIFY_CHANGE_FILE_NAME Or FILE_NOTIFY_CHANGE_DIR_NAME );
While True do Begin
WaitForSingleObject(hNotif, INFINITE); Synchronize(LeeIni);
FindNextChangeNotification(hNotif); end;
end;
ese mismo codigo uso para la aplicacion que hice hace 2 años y no tengo problemas de memoria todo esta relax.
Saludos.