Aqui les digo la forma en que resolví, si existe una forma mas elegante, les agradeceria el comentario
Primero cree el fichero de recursos, en el archivo key.rc
luego de compilarlo
puse en mi aplicación
Código Delphi
[-]
{$R key.RES}
function Convierte : string;
type
zz = array [1..10000] of char;
var
Corriente : TResourceStream;
z : ^ZZ;
i,c :integer;
begin
Corriente:=TResourceStream.Create( hInstance,'#1',RT_RCDATA );
Corriente.Seek(0,soFromBeginning);
i := Corriente.Size;
setlength(result,i);
z := corriente.Memory;
for c := 1 to i do
result[c] := z^[c];
corriente.Free;
end;
begin
cadena := Convierte;
end