PAGUE 6 MESES
LEVE 12 MESES
GARANTIR DESCONTO

Fórum Salvar ObjectList em Arquivo TXT #401356

20/05/2011

0

Pessoal preciso de ajuda..... Tenho uma classe e um object list, como faço para enviar esse object list para um arquivo txt ?   Veja meu codigo abaixo:   ListaNfEntrada := TObjectList.Create;
  NfEntrada := TNfEntrada.Create;   with NfEntrada do
  begin
    IdForn_01  := 1;
    DocForn_02 := 123;
    CodInt_03  := 123456;
  end;   ListaNfEntrada.Add(NfEntrada);
  NfEntradaDaLista := TNfEntrada.Create;
  NfEntradaDaLista := TNfEntrada(ListaNfEntrada.Items[0]);   caminho := 'C:\NfEntrada.txt';
  AssignFile(arquivo, caminho);
  ReWrite(arquivo);   s:= ?????
  WriteLn(arquivo, s);
  CloseFile(arquivo);       Valew pessoal.....
Suprasys Inteligente

Suprasys Inteligente

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar