Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Kontextmenu in einem RichEdit
OliverN_26 - Mo 08.11.10 07:49
Titel: Kontextmenu in einem RichEdit
Hallo Leute
gibt es eine einfach Möglichkeit Text aus einem RichEdit Feld zu kopieren, wie man dies aus einem Kontextmenu her kennt?
Wenn ich innerhalb des RichEdits die rechte Maustaste drücke passiert leider nichts.
Vielen Dank
:-)
bummi - Mo 08.11.10 08:56
ein eigenes Popupmenü :
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| procedure TForm2.copyy1Click(Sender: TObject);
var
r:TRichedit;
begin
if PopupMenu1.PopupComponent is TRichedit then
begin
r := TRichedit(PopupMenu1.PopupComponent);
SendMessage(r.Handle , WM_Copy,0,0);
end;
end; |
Gerd Kayser - Mo 08.11.10 09:09
 OliverN_26 hat folgendes geschrieben  : |
| gibt es eine einfach Möglichkeit Text aus einem RichEdit Feld zu kopieren, wie man dies aus einem Kontextmenu her kennt? |
1. Ein PopupMenu auf dem Formular plazieren.
2. Im Objektinspektor das unter RichEdit1.PopupMenu zuweisen.
3. Das PopupMenu mit dem Menu-Editor bearbeiten.
4. Den gewünschten Menüpunkten die entsprechenden Aktionen zuweisen.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure TMainform.Ausschneiden1Click(Sender: TObject);
begin
RichEdit1.CutToClipboard;
end;
procedure TMainform.Einfgen1Click(Sender: TObject);
begin
RichEdit1.PasteFromClipboard;
end;
procedure TMainform.Kopieren1Click(Sender: TObject);
begin
RichEdit1.CopyToClipboard;
end; |
OliverN_26 - Mo 08.11.10 15:45
Hallo
Sieht sehr nach dem aus was ich suche. Ich werds gleich mal testen.
Vielen Dank schon einmal
OliverN_26 - Mo 08.11.10 15:59
Super :-)
Genau das was ich brauchte.
Vielen Dank nochmal
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!