Boa Tarde a Todos

Estou com uma duvida, gostaria de ver com a maioria se poderiam me ajudar ..

Seguinte ..

Tenho um Txt mais ou menos desta forma :

Order1 = 'hahahahahahah'
Order2 = 'ebebebbebebeb'
Order3 = 'xixixixixixixxxx'
Order4 = 'eebebbebebebe'

Desejo Criar uma espécie de Index para estes dados .

Por exemplo, passo a uma variavel o Valor 'Order2' e  peço a uma
função/procedure qual linha correspondente a 'Order2, que neste caso seria a
2 Linha.

Qualquer Auxilio será bem vindo ...

Att.
________________________________________
Gean Carlo Vila Lobus
Bacharel em Sistemas de Informação
Unoesc Campus Videira
Celular 49 8817 2820
Email: vilalo...@gmail.com
________________________________________

Não entendi muito bem....voce quer que apartir de um texto do arquivo ele
faça um busca e retorne a linha que ele pertence???

2009/10/29 Gean Carlo Vila Lobus <geanmy...@gmail.com>

Nao quero busca fisica no arquivo, queria criar uma espécie de Index ( Tipo
um sumário sabe ... ) aonde ele retornasse a linha correspondente ao
conteudo da minha variavel .

Tipo, esse arquivo texto não vai mudar, é somente para não agregar "Texto" a
minha programação

Outra coisa .. essa minha linha, tem sempre um caractere '=', que com um
copy até ele resolveria ...

Tenho algumas idéias para fazer , mas recorri ao grupo p/ com auxilio dos
demais chegar a algo mais sensato ..

Obrigado

Não entendi muito bem....voce quer que apartir de um texto do arquivo ele

Gean!

Voce está tocando no ponto central de uma organização de arquivo fisico versus um arquivo de indice. Voce precisa trabalhar com dois arquivos neste caso,  por exemplo: dados.txt e dados.idx ou qualquer estensão que vc desejar. Mas veja bem os dois são arquivos texto, porém o arquivo dados.txt possue os dados e o dados.idx é onde guardamos um registro das posiçãos que cada registro de dentro do arquivo dados.txt ocupa.

exemplo 1.
conteudo no dados.txt

Order1 = 'hahahahahahah'
Order2 = 'ebebebbebebeb'
Order3 = 'xixixixixixixxxx'
Order4 = 'eebebbebebebe'

conteudo no dados.idx
Order1 =  1
Order2 = 2
Order3 = 3
Order4 = 4

voce constroi o indice apartir de uma rotina que varre o arquivo dados.txt.
Mas digamos que voce quer criar um indice em ordem inversa. Em vez de vc alterar o arquivo físico, vc recontroi o arquivo indice que ficará assim:

conteudo dados.txt (permanece igual)

Order1 = 'hahahahahahah'
Order2 = 'ebebebbebebeb'
Order3 = 'xixixixixixixxxx'
Order4 = 'eebebbebebebe'

conteudo no dados.idx (reindexado em ordem inversa)
Order1 =  4
Order2 = 3
Order3 = 2
Order4 = 1

Perceba que vc não alterou nada no arquivo físico mas apenas reconstruiu teu indice com um novo apontamento. Apartir dai vc utiliza o arquivo de indice como um mapa para a cessar o registro no arquivo físico. E assim voce pode proceder criando inumeros arquivos de indice, que correspondam as ordenações que vc deseja.....

Qualquer dúvida prenda o grito....

. Vamos por parte.
Supondo que voce tenha um arquivo fisico com a  seguininte estrutura

Existe a possibilidade de não criar um Segundo arquivo, e sim criar em tempo
de execução algo tipo List ?!

Tipo Stringlist ?!

Obrigado pelas contribuições

Att.
________________________________________
Gean Carlo Vila Lobus
Bacharel em Sistemas de Informação
Unoesc Campus Videira
Celular 49 8817 2820
Email: vilalo...@gmail.com
________________________________________

Certamente!
Todo este processamento pode ser feito em memória sem problema. A criação de indice sempre esta relacionada ao enderecamento da posição física de um registo. Portanto, não importa onde construa este apontamento, se num arquivo texto ou num Stringlist. Fica a teu critério, mas o mecanismo é o mesmo, ou seja, indice é um local onde vc vai procurar o endereço de um registro físico.....

Não entendi muito bem em que tu vai usar isso, mas já ouviu falar em arquivo
.ini?
Talvez sirva pra alguma coisa.

2009/10/29 Liandro J. Bulegon <lbule...@gmail.com>

Eu Imaginei uma solução semelhante a exposta pelo Liandro, soh que em tempo
de execução e usando uma funcão para retornar a posição da linha . Amanha
com tempo eu finalizarei esta "duvida " ..

Aproveitando o gancho , gostaria de mais uma help, pois me bati e até agora
nada do que necessito ..

neste mesmo arquivo txt, existem valores monétarios que  vem formatados da
seguinte maneira :

Ex : Valor:= 12899; Enquanto na verdade o Valor certo seria R$128,99 (
Sempre nas ultimas duas casas decimais )

Lembrando que podem existir valores de até dezenas de milhares

O maior valor que encontrei foi : 12000520 que na verdade seria 120.005,20

Tentei copy, formatFloat, Format, Currency a ainda nada ..

Desde já agradeço novamente,

________________________________________
Gean Carlo Vila Lobus
Bacharel em Sistemas de Informação
Unoesc Campus Videira
Celular 49 8817 2820
Email: vilalo...@gmail.com
________________________________________

com o valor em mãos:
valor:=copy(valor,1,Length(Trim(Valor))-2)+'.'+Copy(Valor,Length(Trim(Valor ))-2,2);

2009/10/29 Gean Carlo Vila Lobus <geanmy...@gmail.com>

com o valor em mãos:

valor:=copy(valor,1,Length(Trim(Valor))-2)+'.'+Copy(Valor,Length(Trim(Valor))-2,2);

2009/10/29 Gean Carlo Vila Lobus <geanmyboy@gmail.com>

Eu Imaginei uma solução semelhante a exposta pelo Liandro, soh que em tempo de execução e usando uma funcão para retornar a posição da linha . Amanha com tempo eu finalizarei esta "duvida " ..

Aproveitando o gancho , gostaria de mais uma help, pois me bati e até agora nada do que necessito ..

neste mesmo arquivo txt, existem valores monétarios que  vem formatados da seguinte maneira :

Ex : Valor:= 12899; Enquanto na verdade o Valor certo seria R$128,99 ( Sempre nas ultimas duas casas decimais )

Lembrando que podem existir valores de até dezenas de milhares

O maior valor que encontrei foi : 12000520 que na verdade seria 120.005,20

Tentei copy, formatFloat, Format, Currency a ainda nada ..

Desde já agradeço novamente,

________________________________________
Gean Carlo Vila Lobus
Bacharel em Sistemas de Informação
Unoesc Campus Videira
Celular 49 8817 2820
Email: vilalobus@gmail.com
________________________________________

--
Armando Bagattini Filho
Desenvolvendo soluções em Delphi e Firebird para todas as finalidades.
Soluções completas com um mínimo de desenvolvimento.
http://abfilho.blogspot.com/