Esta dica é para trocar a string. Adapte para as suas necessidades.

procedure TForm1.Button1Click(Sender: TObject);
var
  n : word;
begin
 for n := 0 to memo1.Lines.Count - 1 do
  begin
    memo1.Lines[n] := StringReplace(memo1.Lines[n],'abcd','ffff',[]);
  end;
end;

Espero ter ajudado.

----- Original Message -----
From: "paulovitormc" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Tuesday, January 18, 2005 11:40 AM
Subject: [delphi-br] Localizar caracter





Gostaria de saber como faço uma busca em um memo ou richedit, o que
quero é o seguinte entrar com uma palavra em um edit e dai quando
apertar enter ele seleciona o texto no richEdit , e depois se eu
apertar enter denovo ele seleciona o proximo texto. Uma busca simples
de caracters, não estou conseguindo fazer , PLZ me ajudem !!!
   GRATO,








--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos











--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.6.13 - Release Date: 16/01/2005





-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.6.13 - Release Date: 16/01/2005






-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a