Guardar Dll's o exe's en archivos de recursos

[DarkByte]

Ah!! yo creía que la línea

1 WAVE "Path of wave file"

¡¡Indicaba el tipo de archivo!!, yo creía que WAVE era el tipo... Muchísimas gracias roman aqui estoy para lo que necesites.

[DarkByte]

Estoy probando con

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

  procedure SacarNotepad(Directorio:string;nombre:string);
type
  TForm1 = class(TForm)
    Button1: TButton;
    eDirectorio: TEdit;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}
{$R piltrafa.res}

  procedure SacarNotepad(Directorio:string;nombre:string);
  var
    h : TresourceStream;
  begin
    h := TResourceStream.create(hInstance,'Nombre','BLAH'); //*Aqui falla
    h.savetofile(directorio+'\'+Nombre);
    h.free
  end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  SacarNotepad(eDirectorio.Text,'notepad.exe');
end;
end.

y poniendo en el rc

1 Nombre c:\windows\notepad.exe

Pero a la hora de ejecutarlo me salta, en la línea

Código Delphi [-]
    h := TResourceStream.create(hInstance,'Nombre','BLAH');

una excepcion tipo EResNotFound con el mensaje "Resource Nombre not found". ¡Pero si le pongo el nombre que le he puesto al recurso!, ¡Si le he puesto de nombre "Nombre" por algo!.

[roman]

¿De dónde salió el BLAH?

En fin, luego de algunas pruebas infructuosas y algunas búsquedas (yo no sé nada de recursos) me he enterado de lo siguiente:

El formato del archivo .rc puede ser:

nombre tipo "ruta"

donde nombre es el nombre del recurso, tipo es el tipo de recurso y ruta es la ruta al archivo.

Entonces puedes poner, por ejemplo,

MIDLL DLLS "ruta\midll.exe"

y la construcción con TResourceStream será:

Código Delphi [-]
Resource := TResourceStream.Create(HInstance, 'MIDLL', 'DLLS');

El tipo de recurso lo defines tú ya que, aunque hay recursos estándar como bitmaps, iconos, strings, etc., en este caso es un recurso personalizado.

En el ejemplo de antes

1 WAVE "Path of wave file"

supongo, no estoy seguro, que el recurso será identificado por índice en lugar de por nombre.

Otra cosa importante- la razón por la que tampoco podía extraer el recurso del ejecutable -el nombre y tipo del recurso deben especificarse en mayúsculas tanto en el archivo .rc como al momento de extraerlo.

¡Y listo! Ya he podido extraer el recurso y guardarlo en disco.

// Saludos

[DarkByte]

¡Gracias roman!, ¡Funciona perfectamente!.

Me gustaría saber de donde has sacado la información, puesto que yo la he buscado y no he encontrado en ningún sitio...

[roman]

Empezado por DarkByte

Me gustaría saber de donde has sacado la información, puesto que yo la he buscado y no he encontrado en ningún sitio...

Lo del formato del archivo .rc, como de muchas, muchas otras cosas, de aquí.

Lo de las mayúsculas de ningún lado en particular, pero en varios archivos de recursos que abro así están. No he visto tal referencia en ningún lado pero es posible, no lo he probado, que el compilador de recursos convierta a mayúsculas. Yo lo tenía en minúsculas porque usé un editor de recursos para cambiar el 1 por un identificador.

// Saludos