ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Gerar txt a partir de tabela paradox posicionando os campos

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
marcosvra
Novato
Novato


Registrado: Terça-Feira, 24 de Setembro de 2013
Mensagens: 6

MensagemEnviada: Ter Set 24, 2013 12:14 pm    Assunto: Gerar txt a partir de tabela paradox posicionando os campos Responder com Citação

Bom Dia

Preciso criar uma rotina para gerar a partir de uma tabela paradox um arquivo txt, mas o arquivo tem que ser gerado já posicionando os campos dentro da linha, porque tem que serem deixados muitos espaços em branco.
Ex:
Campo data na primeira posição da linha então 1
Depois campo valor na posição 50 por exemplo, depois nome na posição 110
10102013 0000000100 Marcos e assim por diante
Alguém teria por favor uma dica de uma função para ao usar write posicionar o campo nome na posição 110
e também me ajudar na sintaxe do write para inserir cada campo,vejam se esta correto:
write ( ditatau, gdesc.FieldByName ('Nome').AsString, 30 );

Desde já, grato
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
imex
Moderador
Moderador


Registrado: Sexta-Feira, 7 de Janeiro de 2011
Mensagens: 11666

MensagemEnviada: Ter Set 24, 2013 3:32 pm    Assunto: Responder com Citação

Boa tarde,

Confira alguns exemplos de código nos tópicos abaixo:
http://www.activedelphi.com.br/forum/viewtopic.php?t=79072&sid=91767133fc88e5e3279af51301dbd218
http://www.activedelphi.com.br/forum/viewtopic.php?t=74210&sid=30cdd155ad6940077c00aaa09dbe39d0

Espero que ajude.


Editado pela última vez por imex em Dom Fev 25, 2024 3:57 pm, num total de 1 vez
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
joemil
Moderador
Moderador


Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 9100
Localização: Sinop-MT

MensagemEnviada: Ter Set 24, 2013 3:35 pm    Assunto: Responder com Citação

pra alinhar o texto a esquerda:

Format('%-100s', ['seu texto aqui']): sera gerado um texto com 100 caracteres, caso o texto usado tenha menos de 100 caracteres, sera preenchido com espacos a direita, caso o texto tenha mais de 100, sera truncado
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB