Como copiar uma palavras de um TMemo e transferila para um edit

[AndréAraujo 2]

Olá pessoal, gostaria de encontrar uma linha de um TMemo por duas

palavras que apareceram nela e copiar a palavra para um edit.

 

exemplo:

 

palavras que quero encontrar: ativo e inativo.

 

texto texto texto

texto texto texto

ativo

texto texto texto

 

texto texto texto

texto texto texto

inativo

texto texto texto

 

nem sempre elas aparecerão na mesma na mesma linha, por isso

a necessidade de buscar a linha pela palavra.

 

Agradeço a atenção!

 

 

 

 

[LazaroBinda 3]

Vc pode user o método IndexOf do TStrings:

Memo1.Lines.IndexOf('SuaLinha');

Esse método retorna o índice do elemento caso ele o encontre ou retorna -1 caso não encontre.

 

Veja que este método só vai encontrar o elemento se vc digitar exatamente como está na linha do seu memo, isso significa que 'Ativo' é diferente de 'ativo' e 'ativo' é diferente de 'ativo '.

 

Se a sua linha for montada por vc via código e não recebe interferência do usuário, vc pode usar esse método. Caso contrário, recomendo que vc faça uma função percorrendo as linhas do memo.

Vc pode user o método IndexOf do TStrings:

Memo1.Lines.IndexOf(&%2

[AndréAraujo 2]

Muito obrigado, LazaroBinda!