TXT !!

[lucasjrnany]

Boa noite peço a ajuda da Galera ai do forum sou novato, tenho um sistema que gera o txt no layout da sefaz SP e envio a nota pelo emissor, peço a ajuda de vcs para uma rotina onde que gero o xml a partir de txt para ser enviando.

Agradeço pela ajuda

Te mais ..

[marcelo_sp]

Lucas vc quer uma rotina de ler o seu arquivo txt e carregar as informações contidas no txt para add no componente é isso ?

[lucasjrnany]

Isso eu preciso a rotina para gerar o xml deste txt.

Agradeço a ajuda ...

[marcelo_sp]

Lucas , se entendi direito oque vc quer :

var f : TextFile;

Linha : String;

begin

AssignFile(f, 'C:\Complus\Arquivo.txt');

Reset(f);

While not Eof(f) do

begin

Readln( f, Linha );

// Aqui vc add ao componente ACBrNFE o valor de leitura da variavel Linha

// com o copy( Linha , ...) ; de cada campo e pra isso vc tem que entender

// a estrutura do arquivo txt que vc esta lendo .

end ;

CloseFile(f);

end;

Marcelo