Delphi : recursos dentro de la aplicacion

Muy utilizado por los creadores de virus, troyanos y cualquier software malicioso.

Bueno con delphi es muy simple, tambien ustedes podrian llamar a esto como un contenedor de archivos.



Crear el recurso

Necesitamos ir a la consola cmd.exe pero como yo hago esto mucho mejor diseñe un bat.
Estructura
  • compile_Res.bat
  • compile_Res.rc
  • compile_Res.RES
  • xxxx.exe
Ahora a cada uno

compile_Res.bat
BRCC32   es obligatorio.
BRCC32 "C:\compile_Res.rc"
pause

compile_Res.rc
Nombre del recurso tipo de recurso y ubicacion.
SOMEVIR0S RCDATA "C:\xxxx.exe"
compile_Res.RES
este es exactamente elrecurso.
Para crear este archivo solo debes ejecutar el archivo  compile_Res.bat


Pueden utilizar el reshacker o cualquier otro editor de recursos, obviamente este RCDATA no se va a entender pero si fuera de tipo wav o jpg o cualquiera si se va a visualizar en el editor.


La mayoria de los juegos tienen sus imagenes, modelos, sonidos en un recurso.

 Implementacion del recurso con delphi 7, delphi 2010 rad , etc
Debajo de
implementation
{$R *.dfm}
{$R compile_Res.res}
ahi ponen el nombre del recurso.

Ahora esta dentro de nuestro proyecto, ahora como lo utilizamos?

procedure extraer(const ruta: string);
var
temp_stream : TResourceStream;
recurso :TFileStream;
ruta_Temp :String;
begin
   //Stream to memory
  ruta_Temp := ExtractFileDir(Paramstr(0))+'/temp';
  temp_stream := TResourceStream.Create(hInstance , 'NOMBREDELRECURSO' , RT_RCDATA );
  try
   recurso := TFileStream.Create( ruta_Temp ,fmCreate);
   try
     recurso.CopyFrom(temp_stream,0);
     finally
     recurso.Free;
     convertir(ruta);
     end;
   finally
     temp_stream.Free;
   end;
end;

0 pensamientos:

Post a Comment

feedback!