Criar arquivo txt colunado...

Question

Boa tarde a todos,Sou novato em Delphi e necessito da seguinte ajuda:Tenho um arquivo txt com diversos campos separados por ; Com base nesse arquivo, gostaria de criar um novo arquivo txt com os campo...

Massuda · Answer

Use a fun��o [url=//www.delphibasics.co.uk/RTL.asp?Name=Format]Format[/url] da unit SysUtils para gerar uma string formatada e salve essa string no arquivo. Por exemplo:[code:1:be3d05d158]var  S: string;...  S := Format(��20.20s�20.20s�10.10s�10.10s�2.2s�,    &#91;Nome, Endere�o, Bairro, Cidade, Estado&93;); // strings com os dados[/code:1:be3d05d158]gera strings desse tipo:[code:1:be3d05d158]Victor Reis     Rua Tal n� 888     Ipiranga  S�o Paulo SP Maria Jos�      Rua X n� 555       Ja�ana    S�o Paulo SP [/code:1:be3d05d158]Se qualquer uma das strings for maior que o espa�o reservado para ela, ela ser� truncada.Os tamanhos podem ser tamb�m parametrizados:[code:1:be3d05d158]var  S: string;  Tamanho: Integer;...  Tamanho := 20;  S := Format(��*.*s�, &91;Tamanho, Tamanho, Nome&93;);  // equivale a   // S := Format(��20.20s�, &91;Nome&93;);[/code:1:be3d05d158]...

Victor Morgani · Answer

Obrigad�o pela ajuda Massuda... Vou testar...Abraxs 8)...

Victor Morgani · Answer

Valew pela ajuda ajuda Massuda, por�m o procedimento q vc me passou tenho q especificar o tamanho exato dos campos separados por ;
Andei pesquisando... ser� q teria como eu fazer utilizando [b:aefe554100]Record?[/b:aefe554100]

Estrutura = Record
ws_nome : string[080];
ws_endereco : string[100];
ws_bairro : string[040];
ws_cidade : string[040];
ws_estado : string[002];
ws_cep : string[008];
end;

Grato

:!: :wink: :?: [/b]

Massuda · Answer

Eu costumo fazer assim:[code:1:8d9d013bf5]const  TAM_NOME = 80;  TAM_ENDERECO = 100;  ...type  TXyz= record    ws_nome: string&#91;TAM_NOME&93;;     ws_endereco: string&91;TAM_ENDERECO&93;;     ...  end;....var   S: string;   X: TXyz;...   S := Format(��*.*s�, &91;TAM_NOME, TAM_NOME, X.ws_nome&93;);[/code:1:8d9d013bf5]Assim, se algum dia algu�m resolver mudar o tamanho de algum dos campos, eu s� mudo o const. Mas talvez exista alguma outra forma de fazer isso....

Victor Morgani · Answer

Valew novamente Massuda...Acho q agora o bonde anda...rsAbra�o :)...

Saraujo · Answer

Ol� PessoalPreciso alinhar os campos  nome,endere�o,etc � esquerda, do jeito que fiz abaixo ele est� a direita o que devo fazer???? Qual par�metro que devo usar??? Aproveitando o ensejo existe alguma apostila ou tutorial dos par�metros do Format, onde encontrar???? :?: var   S: string; ...   S := Format(��20.20s�20.20s�10.10s�10.10s�2.2s�,     [Nome, Endere�o, Bairro, Cidade, Estado]); // strings com os dados...

F�rum Criar arquivo txt colunado... #272286