Fórum Exportação de Paradox para Arquivo Texto #206944
16/01/2004
0
Estou com o seguinte problema: Tenho que fazer uma exportação de dados de uma tabela paradox para um arquivo texto, mas é necessário seguir um layout no arquivo texto por exemplo:
[b:a9dae6169c]Posição[/b:a9dae6169c] - 01-40 , 41-47
[b:a9dae6169c]tamanho[/b:a9dae6169c] - 40 , 07
[b:a9dae6169c]tipo de dado[/b:a9dae6169c] - AlfaNumérico , Numérico
[b:a9dae6169c]descrição[/b:a9dae6169c] - Nome do Cliente , Número do Endereço
Nos campos núméricos os espaços em branco à esquerda devem ser preenchidos com zeros, e no campo AlfaNumério deve ser alinhado a esquerda com espaços à direita.
Se alguém tiver uma solução, para me ajudar, eu agradeço....
[b:a9dae6169c]Posição[/b:a9dae6169c] - 01-40 , 41-47
[b:a9dae6169c]tamanho[/b:a9dae6169c] - 40 , 07
[b:a9dae6169c]tipo de dado[/b:a9dae6169c] - AlfaNumérico , Numérico
[b:a9dae6169c]descrição[/b:a9dae6169c] - Nome do Cliente , Número do Endereço
Nos campos núméricos os espaços em branco à esquerda devem ser preenchidos com zeros, e no campo AlfaNumério deve ser alinhado a esquerda com espaços à direita.
Se alguém tiver uma solução, para me ajudar, eu agradeço....
Andregarcia
Curtir tópico
+ 0
Responder
Posts
16/01/2004
Nigro
Numeros
FormatFloat(´0000000´, 99);
String
function Padr(s:string;n:integer):string;
{alinha uma string à direita}
begin
Result:=Format(´¬´+IntToStr(n)+´.´+IntToStr(n)+´s´,[s]);
end;
FormatFloat(´0000000´, 99);
String
function Padr(s:string;n:integer):string;
{alinha uma string à direita}
begin
Result:=Format(´¬´+IntToStr(n)+´.´+IntToStr(n)+´s´,[s]);
end;
Responder
Gostei + 0
16/01/2004
Andregarcia
Valeu Nigro....
com relação ao FloatStr eu já sabia, a minha dificuldade mesmo era com relação a String.....
valeu, um abraço.....
com relação ao FloatStr eu já sabia, a minha dificuldade mesmo era com relação a String.....
valeu, um abraço.....
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)