como hacer para que mi aplicacion se auto copie

[gulder]

hola usuarios del foro mi pregunta es la siguiente necesito que mi aplicacion al momento de ejecutarce se autocopie ella misma en una direccion especifica es decir tengo mi .exe lo ejecuto y quiero que se copie por ejemplo en C:\ grasias de antemano logula....

[dec]

Hola,


var
copia: string;
begin
copia := 'C:\'+ ExtractFileName(ParamStr(0));
CopyFile(PChar(ParamStr(0)), PChar(copia), false);
end;

[gulder]

dec si funciono grasias por la colaboracion jeje

[DarkByte]

Si bueno, ¿y qué tal te va con ese troyano que estás fabricando?

[gulder]

trabajando y haciendo lo que se puede jejejejejejeje >(:)