|
|
 |
 |
|
FTP | |
|
CCD | |
|
Buscar | |
|
Trucos | |
|
Trabajo | |
|
Foros | |
|
#1
27-09-2003
|
|||
|
|||
|
Auto borrado
Hola gente:
En algun hilo lei a alguen que quieria hacer un probrama que se borrara solo y la verdad es que no encuentro el hilo. Ahora me toca a mi. El tema es que tengo una aplicacion y cuando se esta ejecutando o bien luego de su ejecucion deseo que se borre automaticamente. He tratado de utilizar el FileDelete pero me dice que la aplicacion esta en uso y alli quedo. Desde ya gracias. 
|
|
#2
27-09-2003
|
||||
|
||||
|
Prueba este código http://www-tcsn.experts-exchange.com..._20661274.html
A mi no me ha funcionado, pero sería cuestión de buscarle la vuelta. Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. 
|
|
#3
27-09-2003
|
|||
|
|||
|
No la verdad que ami tampoco me funciona, ya no se que tecnica aplicar.
La otra que estoy usando para salir del paso es que otra aplicacion borre el archivo, pero no me gusta y crea huecos de seguridad que no debo tener. Gracias.
|
|
#4
27-09-2003
|
||||
|
||||
|
Haz la prueba con esta información, que yo reconozco que no he comprobado si funciona o no, de paso si te sirve nos lo dices, para añadirle la información de que funciona.
Under Win32, unless you are running from a removable drive, you cannot delete a running executable. You can have Windows delete the executable the next time Windows is ran by adding an entry to the RunOnce key in the Windows registry under: HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce You can name the key anything you like, and specify a command line to another executable or to a dos command passed to command.com. Example: Código:
uses
Registry;
procedure TForm1.Button1Click(Sender: TObject);
var
reg: TRegistry;
begin
reg := TRegistry.Create;
with reg do begin
RootKey := HKEY_LOCAL_MACHINE;
LazyWrite := false;
OpenKey('Software\Microsoft\Windows\CurrentVersion\RunOnce', false);
WriteString('Delete Me!','command.com /c del FILENAME.EXT');
CloseKey;
free;
end;
end;
__________________
Guía de Estilo de los Foros Cita:
|
|
#6
27-09-2003
|
||||
|
||||
|
Muy bien muchas gracias por la noticia, lo anotaré en mi base de datos como truco que funciona.
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
 |
|
|
 |
|
Mode Lineal
