ActiveDelphi

r.alves · Enviada: Ter Fev 14, 2006 11:07 am Assunto: Botão Direito

Como eu faço para funcionar o botão direito do mouse em um DBRichEdit? (Colar, Copiar e Etc...)

adriano_servitec · Enviada: Ter Fev 14, 2006 12:06 pm Assunto: Botão Direito

Use o componente popupmenu, ligue a propriedade do richedit ao popupmenu dentro do popupmenu vc escreve

copiar
colar

ai vc coloca o codigo assim no events onclick de cada um:
procedure TForm1.Copiar1Click(Sender: TObject);
begin
Richedit1.CopyToClipboard;
end;

procedure TForm1.Colar1Click(Sender: TObject);
begin
Richedit1.PasteFromClipboard;
end;

Flw
T+

_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree

adriano_servitec · Enviada: Ter Fev 14, 2006 12:08 pm Assunto: Botão Direito

Obs: se vc usar um memo, edit, mask e alguns mais nao ha necessidade de udar este codigo acima, ja tem este recurso direto no componente.

Flw
T+
_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree