Array
(
)

Ler umarquivo texto ordenado...

Claudio_f
   - 03 set 2004

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


Paulo_amorim
   - 03 set 2004

Olá

Pode-se fazer desse modo

#Código

MyString := TStringList.Create;
MyString.LoadFromFile( <caminho>);
MyString.Sort;
MyString.SaveToFile(<caminho>);


Espero que ajude
Até+


Claudio_f
   - 03 set 2004

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.