Como inserir caracteres em um RichText na posição do cursor

01/09/2004

Olá a todos, gostaria de saber como posso inserir caracteres (palavras, números, etc), na posição onde se encontra o cursor de texto ( | ), num componente RichText ou Memo clicando num botão.

Ex.: - Antes de clicar no botão: Falta a palavra | «-cursor de texto - Ao clicar no Botão 1 (que contém a palavra ´texto´) Falta a palavra texto| «-cursor de texto



Respostas

04/09/2004

Jc

Galera, por favor me deem uma força ai vai!


Responder Citar

04/09/2004

Bon Jovi

Nao entendi bem o exemplo da sua questao, mas veja se é isso q deseja:

procedure TForm1.Button1Click(Sender: TObject);
begin
RichEdit1.SelText := RichEdit1.SelText + Edit1.Text;
end;


Responder Citar