Ver Mensaje Individual
  #1  
Antiguo 07-06-2006
RaulChemical RaulChemical is offline
Miembro
 
Registrado: jul 2003
Ubicación: Madrid
Posts: 59
Reputación: 21
RaulChemical Va por buen camino
Incluir un fichero en el ejecutable

Hola de nuevo. Este es mi segundo hilo del dia:

Tengo que incluir dentro de mi ejecutable (en este caso, una .dll) un archivo, concretamente un excel que tengo que extraer para hacer una serie de historias con el.

He estado trasteando en el trucomania y he encontrado un truco en el que incluyen dentro del ejecutable un jpg para mostrarlo en la tipica ventanita de splash.

Código Delphi [-]
var 
   Corriente   : TResourceStream;
   Imagen      : TJPegImage;
begin 
  Imagen:=TJPegImage.Create;
  Corriente:=TResourceStream.Create( hInstance,
                                     '#1',
                                     RT_RCDATA );
  Corriente.Seek(0,soFromBeginning);
  Imagen.LoadFromStream(Corriente);
  Image1.Canvas.Draw(0,0,Imagen);
  Imagen.Free;
  Corriente.Free;
end;


Mi pregunta es saber si igual que carga el TImage a partir del ResourceStream, se puede cargar un TFileStream con el fichero que incluyo dentro del .res y hacer un SaveToFile para guardar en disco el fichero y operar con el.


Hemos estado barajando la posibilidad de tener un directorio con los exceles a tratar, pero lo hemos descartado ya que el cliente es un poco "tocón" y ya se ha cargado archivos de los que usamos, incluso los Ini's.


Muchas gracias por todo.

Raul.
__________________
ash nazg durbatulûk
ash nazg gimbatul
ash nazg thrakatulûk
agh burzum-ishi krimpatul
Responder Con Cita