Incluir un fichero en el ejecutable

[Neftali [Germán.Estévez]]

Por pasos:

(1) Crea un hoja de Excel; Supongamos test.xls
(2) Crea un archivo .rc; Datos.rc
(3) Escribe dentro:
EXCEL RCDATA .\test.xls
(4) Compilalo desde la línea de comandos con:
brcc32 datos.Rc
(5) Debe generar un fichero .RES llamado Datos.res con un tamaño casi igual al fichero test.xls
(6) En el fichero DPK de tu proyecto, donde está el código:

Código Delphi [-]
  {$R *.res}

Añade:

Código Delphi [-]
  {$R Datos.res}

(7) Pon un botón y en el evento OnClik escribe:

Código Delphi [-]
var
  // Steam para recuperar el recurso
  RS : TResourceStream;
begin
  // Crear a partir del recurso
  RS := TResourceStream.Create( 0, 'EXCEL', RT_RCDATA);
  try
    // Grabar en un fichero
    RS.SaveToFile('c:\temp\Salida.xls');
  finally
    // Liberar
    RS.Free;
  end;

(8) Al ejecutarlo y pulsar el botón se te habrá creado el fichero de excel en el directorio especificado.

Creo que no me dejo nada; Pruébalo y ya dirás...