como hacer para que mi aplicacion se auto copie

[dec]

Hola,

Código Delphi [-]
 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 >(