Como pegar a seleção de um texto do Rich Edit

Delphi

09/06/2004

Fala Galera!

Alguém pode me explicar como eu apenas o texto selecionado de um RickEdit e o guardo numa variavel????
Isso é extra-urgente!

valew!!!
ps: já usei a busca mas não tive sucesso....


Bueno

Bueno

Curtidas 0

Respostas

Vinicius2k

Vinicius2k

09/06/2004

Colega,

Veja o código:
procedure TForm1.Button1Click(Sender: TObject);
var Texto: String;
begin
  with RichEdit1 do
    begin
      if SelLength > 0 then
        begin
          Texto:= SelText;
          Showmessage(Texto);
        end
      else Showmessage(´Nenhuma seleção efetuada.´);
    end;
end;


Espero ter ajudado...
T+


GOSTEI 0
Bueno

Bueno

09/06/2004

Valew vinicius2K!


GOSTEI 0
POSTAR