Re: [delphi-br] Exportação TXT

2006-02-02 Por tôpico Julio Abdala
edFile.Text = nome do arquivo a ser exportado dsFonte = um DataSource que recebe a table a ser exportada. AssignFile(ArqImp, edFile.Text); Try Rewrite( ArqImp ); dsFonte.DataSet.First; While not dsFonte.DataSet.Eof do Begin sLinha:= '';

Re: [delphi-br] Exportação TXT

2006-02-02 Por tôpico Listas Minerva
Use a procedure abaixo, onde os parâmetros são: Dataset: o dataset a ser exportado (ele deve estar aberto); Arquivo: o caminho (inclusive com o nome) do arquivo; Separador: o caracter quer será usado como separador entre os campos (aconselho usar ';'); Exemplo: GeraTexto(Query1, 'C:\arquivo.txt'

Re: [delphi-br] Exportação TXT

2006-02-01 Por tôpico Filipe
rta-feira, 1 de fevereiro de 2006 12:21 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Exportação TXT dah pra ser mais simples ainda... StringList.SaveToFile(); []'s Filipe Geyer - Original Message - From: Elazar To: delphi-br@yahoogru

Re: [delphi-br] Exportação TXT

2006-02-01 Por tôpico Filipe
dah pra ser mais simples ainda... StringList.SaveToFile(); []'s Filipe Geyer - Original Message - From: Elazar To: delphi-br@yahoogrupos.com.br Sent: Wednesday, February 01, 2006 9:44 AM Subject: RES: [delphi-br] Exportação TXT Dir; bah meu, trabalha com arquivo tex

RE: [delphi-br] Exportação TXT

2006-02-01 Por tôpico Felipe Souza
Amigo, Declare uma variavel como tipo TextFIle; var arq : textfile depois implemente o codigo assignfile(arq,'c:\teste.txt'); rewrite(arq); writeln(arq,'TEXTO'); closefile(arq); Faça as adaptações adequadas e coloque o que for necessário dentro de um loop. Espero ter ajudado... Atenciosam

Re: [delphi-br] Exportação TXT

2006-02-01 Por tôpico valmor (Evoluthiva)
Pesquise na internet por writeln. Este exemplo foi extraído do seguinte endereço: http://www.delphibasics.co.uk/RTL.asp?Name=WriteLn var myFile : TextFile; text : string; begin // Try to open the Test.txt file for writing to AssignFile(myFile, 'Test.txt'); ReWrite(myFile);