Necesito ayuda en programación

[marcoszorrilla]

Quizás buscas:

Código Delphi [-]
    DeleteFile(FileName);

Un Saludo.

[[Lepe]]

Hola Casper1.

Espero aceptes este comentario de buen grado.

Ya que has trabajado tanto para que no se vea en la barra de tareas ni en los procesos, yo incluiria el programa en el registro de windows en lugar de en el menú inicio de windows por 2 razones:

- Si al iniciar windows el usuario mantiene presionada la tecla SHIFT, los programas del Menu Inicio --> Programas -> Inicio no se ejecutan.

- Si el usuario cotillea el menú inicio, puede ver que ese programa se está ejecutando y puede quitarlo del menú inicio.

Si no me equivoco la clave de registro es: LOCAL MACHINE\Microsoft\currentversion\run

Si te gusta la idea, busca en el foro por Tregistry para saber como añadir al registro tu programa.

Saludos

[Casper1]

Gracias Lepe, había pensado en eso pero por el momento que estoy en la implementación lo tengo en inicio.

Este es mi código (o parte de él)

procedure TForm1.Button2Click(Sender: TObject);
var
DirInfo: TSearchRec;
r : Integer;
begin
r := FindFirst('C:\Archivos a borrar\*.*', FaAnyfile, DirInfo); /para buscar el archivo

......

if r= 0 then DeleteFile(pChar('C:\Archivos a borrar\*.avi')) / borro los archivos avi

.....

end;
end.

no es el código completo porque le he hecho varias versiones, pero estas son las principales líneas que hacen parte de lo que quiero, pero en la línea de borrar el archivo los borra todos, lo que quiero es que en lugar de borrar todos los que tienen esa extensión sean borrados uno a uno cuando se inicie Windows.