Delphi Brasil
Seja bem-vindo (a) ao Delphi Brasil,aqui você encontrará dicas,tutoriais e etc.
Por favor,registre-se para obter o maior proveito possivel do fórum.
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Conectar-se

Esqueci minha senha

Parceiros

Contador de palavras específicas

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Contador de palavras específicas

Mensagem por Rogerio em Ter Ago 27, 2013 4:21 pm

Pessoal

Tenho que acrescentar número de forma crescente toda vez que achar uma palavra que determino em um arquivo .txt

Qual a função no Delphi 6 que utilizo para acrescentar (de forma crescente) numeração com 7 dígitos toda vez que achar a palavra pré-determinada?

Exemplo:

Acrescentar 0000001; 0000002; 0000003 etc. (toda vez que achar a palavra "Ajuda")

Ficariam assim:
Ajuda/0000001
Ajuda/0000002       e assim sucessivamente...

Consigo acrescentar os sete dígitos "0000001" mas toda vez que acha a palavra coloca o comanda insere o mesmo número e não de forma crescente.

Segue o comando:

If Copy(linha, 1, 6) =  ‘Ajuda’  then
begin
   linha := ‘0000001/ ‘ + linha;
end;


Rogério

Rogerio
Membro
Membro

Mensagens : 1
Data de inscrição : 27/08/2013

Ver perfil do usuário

Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum