[delphi-br] Gerar Arquivo Texto
Pessoal Preciso gerar um arquivo texto para importação em outro sistema, como um arquivo que a linha é muito grande, tenho que saber se a informação está sendo gerada na posição/coluna correta, qual programa vocês utilizam para verificar posicionamento de colunas em um arquivo texto, pelo Edit do MS-DOS não está dando mais... rsrsrrs? att. Juliano [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerar Arquivo Texto
eu uso o NotePad ++ e tem conttxt se não me engano... de uma olhada são Free abraço 2008/9/29 Juliano Silva - Yahoo [EMAIL PROTECTED] Pessoal Preciso gerar um arquivo texto para importação em outro sistema, como um arquivo que a linha é muito grande, tenho que saber se a informação está sendo gerada na posição/coluna correta, qual programa vocês utilizam para verificar posicionamento de colunas em um arquivo texto, pelo Edit do MS-DOS não está dando mais... rsrsrrs? att. Juliano [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerar Arquivo Texto
bloco de notas do windows - Original Message - From: Juliano Silva - Yahoo To: delphi-br@yahoogrupos.com.br Sent: Monday, September 29, 2008 3:11 PM Subject: [delphi-br] Gerar Arquivo Texto Pessoal Preciso gerar um arquivo texto para importação em outro sistema, como um arquivo que a linha é muito grande, tenho que saber se a informação está sendo gerada na posição/coluna correta, qual programa vocês utilizam para verificar posicionamento de colunas em um arquivo texto, pelo Edit do MS-DOS não está dando mais... rsrsrrs? att. Juliano [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG - http://www.avg.com Version: 8.0.169 / Virus Database: 270.7.5/1697 - Release Date: 29/9/2008 07:40 [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Gerar Arquivo Texto
Notepad++ Luciano Calenzani Simões - Mensagem original De: Juliano Silva - Yahoo [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Segunda-feira, 29 de Setembro de 2008 15:11:30 Assunto: [delphi-br] Gerar Arquivo Texto Pessoal Preciso gerar um arquivo texto para importação em outro sistema, como um arquivo que a linha é muito grande, tenho que saber se a informação está sendo gerada na posição/coluna correta, qual programa vocês utilizam para verificar posicionamento de colunas em um arquivo texto, pelo Edit do MS-DOS não está dando mais... rsrsrrs? att. Juliano Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Gerar Arquivo Texto
Valew a todos pelas indicações, obrigado... De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Luciano Calenzani Simões Enviada em: segunda-feira, 29 de setembro de 2008 15:27 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] Gerar Arquivo Texto Notepad++ Luciano Calenzani Simões - Mensagem original De: Juliano Silva - Yahoo [EMAIL PROTECTED] mailto:smjjuliano%40yahoo.com.br Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Enviadas: Segunda-feira, 29 de Setembro de 2008 15:11:30 Assunto: [delphi-br] Gerar Arquivo Texto Pessoal Preciso gerar um arquivo texto para importação em outro sistema, como um arquivo que a linha é muito grande, tenho que saber se a informação está sendo gerada na posição/coluna correta, qual programa vocês utilizam para verificar posicionamento de colunas em um arquivo texto, pelo Edit do MS-DOS não está dando mais... rsrsrrs? att. Juliano Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 3480 (20080929) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
Re: Res: [delphi-br] Gerar Arquivo Texto
Colega... Você está trabalhando com o padrão CNAB400? Os editores de texto tipo o Notepad, etc, pode te ajudar nisso, Quem sabe o xEdit, ou o Notepad++ [] Emauel Coutinho Luciano Calenzani Simões escreveu: Notepad++ Luciano Calenzani Simões - Mensagem original De: Juliano Silva - Yahoo [EMAIL PROTECTED] mailto:smjjuliano%40yahoo.com.br Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Enviadas: Segunda-feira, 29 de Setembro de 2008 15:11:30 Assunto: [delphi-br] Gerar Arquivo Texto Pessoal Preciso gerar um arquivo texto para importação em outro sistema, como um arquivo que a linha é muito grande, tenho que saber se a informação está sendo gerada na posição/coluna correta, qual programa vocês utilizam para verificar posicionamento de colunas em um arquivo texto, pelo Edit do MS-DOS não está dando mais... rsrsrrs? att. Juliano Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Gerar arquivo texto
Galera, tenho a rotina abaixo para gerar um arquivo texto, mas estou tendo
um problema que o espaçamento entre as colunas estão ficando muito grandes.
Algupem poderia me dar uma mão e ver se consegue arrumar isso ?
Esta ficando mais ou menos assim:
Eduardo Silva Rua Dr. Marcos, 77
Jose dos SantosAv. Brasil, 66
Pedro Henrique do Nascimento Rua Tiradentes, 32
E eu gostaria que ficasse assim:
Eduardo SilvaRua Dr. Marcos, 77
Jose dos Santos Av. Brasil, 66
Pedro Henrique do Nascimento Rua Tiradentes, 32
Obrigado.
procedure GeraArquivoTexto(DataSet: TdataSet; NomeArq: string);
var
Registros : TstringList;
Linha, Espacos, Diretorio : string;
TamanhoMaximo, i, j : integer;
begin
TamanhoMaximo := 0;
Diretorio := '';
Registros := TstringList.Create;
DataSet.Open;
DataSet.First;
Try
while not DataSet.Eof do
begin
Linha := '';
for i := 0 to DataSet.FieldCount - 1 do
begin
Espacos := '';
TamanhoMaximo := DataSet.Fields[i].DisplayWidth;
for j := Length(DataSet.Fields[i].Asstring) to TamanhoMaximo do
Espacos := Espacos + ' ';
Linha := Linha + DataSet.Fields[i].Asstring + Espacos;
end;
Registros.Add(Linha);
DataSet.Next;
end;
Registros.SaveToFile(nomeArq + '.txt');
Application.Messagebox(Pchar('Tabela ' + DataSet.Name + ' exportada
com sucesso !'),'Aviso',MB_OK or MB_ICONWARNING);
finally
Registros.Free;
DataSet.Close;
end;
end;
~\\|//~
-(o o)-
o--oOOOo--(_)--oOOOo-o
||
| Eduardo de Almeida Silva |
| Kobra Sistemas |
| [EMAIL PROTECTED] - (14)3263-0326 |
||
|.oooO Oooo. |
o( )---( )---o
\ ( ) /
\_) (_/
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
