Si la idea es incoporar algun archivo en el interior del ejecutable se puede cargar todo en una variable tipo string.
hacer un pequeño programa que habra el archivo tipo char y guardarlo en un txt
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
ff:file of char;
FText:textFile;
char1:char;
str1:string;
begin
assignfile(ff,'a.exe');
Reset(ff);
while not eof do
begin
Read(ff,char1);
str1:=str1+'#'+IntToStr(ord(char1));
end;
closeFile(ff);
assignfile(FText,'a.exe');
ReWrite(FText);
WriteLn(FText,str1);
CloseFile(Ftext)
end;
El resultado del archivo de texto generado guardarlo en string en nuestra aplicacion y por medio de este codigo lo sacamos
Código Delphi
[-]
procedure StrToFile(Texte: String; Fitxer: String);
var
Stream: TStream;
begin
Stream := TFileStream.Create(Fitxer, fmCreate);
try
Stream.WriteBuffer(Pointer(Texte)^, Length(Texte));
finally
Stream.Free;
end;
end;
Creo que este sistema se le dice archivo mochila.
Espero que esto te sirva
