Quick Tips: Recuperando o texto selecionado em um Memo

 

Nesta quick tip veremos recuperar o texto selecionado em um Memo

 

Insira um memo e um Button no formulário e insira o seguinte código no click do botão:

 

  ShowMessage('Texto Selecionado: ' + Memo1.SelText + #13 +

              'Posição de inicio da seleção:' + IntToStr(Memo1.SelStart) + #13 +

              'Caracteres Selecionados:' + IntToStr(Memo1.SelLength));

 

O resultado será o seguinte:





É isso aí pessoal, vou ficando por aqui.

Fiquem a vontade para criticar, tirar dúvidas e sugerir novos temas.
Abraço.

Ricardo Coelho