A sua dica já foi meio caminho andado :)
Criei um *.RES com o brcc32.exe - OK
mas agora estou com dificuldade para carregar
do res para Stream para depois do Stream para TstringList :(
Dá Abstract Error na linha conforme abaixo...
{$R TEXTO.RES}
constructor TcNFeINU.Create;
var
Res: TResourceStream;
xyz: TStream;
begin
inherited Create;
Fmodelo := TStringList.create;
xyz := TStream.create;
Res := TResourceStream.Create(Hinstance, 'TEXTO', 'TXTFILE'); // Até
aqui foi beleza <<<<
Res.SaveToStream(xyz); // Nessa linha da Abstract Error <<<<
Fmodelo.LoadFromStream(xyz);
Res.Free;
xyz.Free;
end;
PS: Testei com REs.SaveToFile e gravou beleza ( mas não é isso que eu
quero.)
> Não me lembro a sintaxe, mas você pode usar diretivas de compilação
> para isso.
> Da mesma que em um TForm você tem a diretiva {$R *.DFM}
> Pesquise sobre isso.
>
> Luciano Calenzani Simões
>
> Bom dia a todos...
>
> Estou criando uma classe e tenho a necessidade de trabalhar com um
> arquivo texto.
> Até hoje eu fiz assim:
> ...
> Texto: TstringList;
> begin
> Texto := TstringList. create;
> Texto.add(' nonononononononon ' );
> Texto.add(' nonononon ' );
> Texto.add(' nonononononon ' );
> Texto.add(' nonononon ' );
> ...
>
> Mas é pouco produtivo e não quero carregar o texto em run time
> (Texto.loadFrom. ...)
>
> Minha pergunta:
>
> Tem como eu criar o texto e deixar em um txt e quando eu compilar a
> aplicação ele
> importa esse texto todo para o TStringList?
>
> Ou existe algum semelhante ao TEXT ENDTEXT do clipper (acho que era
> isso) que criava um bloco com o texto?
>
> []'s
>
