Ler umarquivo texto ordenado...
03/09/2004
0
Boa tarde pessoal,
Eh o seguinte eu gerei um arquivo texto atraves de uma query com a seguinte estrutura ´codigo´ e ´quantidade´, soh que agora eu preciso ler este arquivo mas ordenando ele por quantidade decrescente primeiro ler o produto que tem a qtd 40500 depois 2038, 409 e assim por diante, jah pesquisei aqui no forum mas nao achei isso a geracao do arquivo eu fiz com dicas encontradas aqui no forum, se nao der pra ler ele ordenado entao uma forma de criar outro arquivo mas desta vez ordenando ele, desde jah agradeco a atencao...
[010007B ][101]
010049BAG 3
010085B 100
01009.01 3
0101.0706 30
0101.0708 409
0101.0712 2038
0101030050-E 2
01011.01 40500
Eh o seguinte eu gerei um arquivo texto atraves de uma query com a seguinte estrutura ´codigo´ e ´quantidade´, soh que agora eu preciso ler este arquivo mas ordenando ele por quantidade decrescente primeiro ler o produto que tem a qtd 40500 depois 2038, 409 e assim por diante, jah pesquisei aqui no forum mas nao achei isso a geracao do arquivo eu fiz com dicas encontradas aqui no forum, se nao der pra ler ele ordenado entao uma forma de criar outro arquivo mas desta vez ordenando ele, desde jah agradeco a atencao...
[010007B ][101]
010049BAG 3
010085B 100
01009.01 3
0101.0706 30
0101.0708 409
0101.0712 2038
0101030050-E 2
01011.01 40500
Claudio_f
Curtir tópico
+ 0
Responder
Posts
03/09/2004
Paulo_amorim
Olá
Pode-se fazer desse modo
Espero que ajude
Até+
Pode-se fazer desse modo
MyString := TStringList.Create; MyString.LoadFromFile( <caminho>); MyString.Sort; MyString.SaveToFile(<caminho>);
Espero que ajude
Até+
Responder
03/09/2004
Claudio_f
Valeu Paulo,
eu usei o que vc falou:
MyString := TStringList.Create;
MyString.LoadFromFile( <caminho>);
MyString.Sort;
MyString.SaveToFile(<caminho>);
mas o arquivo ficou na mesma ordem que ja estava, mas ai me veio uma luz e gerei o arquivo com a quantidade na frente do codigo e beleza ele ordenou o arquivo pela quantidade, era isso que eu precisava,
OBRIGADO PELA DICA.
eu usei o que vc falou:
MyString := TStringList.Create;
MyString.LoadFromFile( <caminho>);
MyString.Sort;
MyString.SaveToFile(<caminho>);
mas o arquivo ficou na mesma ordem que ja estava, mas ai me veio uma luz e gerei o arquivo com a quantidade na frente do codigo e beleza ele ordenou o arquivo pela quantidade, era isso que eu precisava,
OBRIGADO PELA DICA.
Responder
Clique aqui para fazer login e interagir na Comunidade :)