Contador de palavras específicas
Página 1 de 1 • Compartilhe •
Contador de palavras específicas
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
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
- Mensagens : 1
Data de inscrição : 27/08/2013

» Imagens específicas por sub-fórum
» Restringir acesso a mensagens específicas
» Regras específicas para fóruns
» [Resolvido]Importar campos do access em colunas específicas do excel
» Desempenho - O que é melhor: Criar uma tabela genérica ou diversas tabelas específicas?
» Restringir acesso a mensagens específicas
» Regras específicas para fóruns
» [Resolvido]Importar campos do access em colunas específicas do excel
» Desempenho - O que é melhor: Criar uma tabela genérica ou diversas tabelas específicas?
Página 1 de 1
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum
» Fontes Sistema Store Protheus 7.0 - Versão completa Delphi XE7
» Fontes Sistema Store Protheus 7.0 - Versão completa Delphi XE7
» Como gravar um campo Blob no FireBird + Delphi de um campo tipo imagem no MS-ACCESS ?
» Exception EBDEngineError
» Exception EBDEngineError
» Componente Delphi Brasil
» Erro no Delphi “A linha não pode ser localizada para atualiz
» Fontes Automação Comercial 8.5 - Retaguarda c/ PDV, PAF 1.10, TEF, ECF, Sintegra, SpedFiscal, Google Maps e muito mas...