Hallo,
ich habe 4 TRichEdit Komponenten auf einer Form für die ein und das selbe TPopupMenu verwendet werden soll, ist halt auf alle 4 anwendbar. Mein Problem ist nun das ich beim ausführen des Codes unterscheiden muß von welcher TRichEdit Komponente aus eine Funktion aus dem Menü aufgerufen wurde.
Ich habe dazu bereits mit "Sender" experimentiert, aber erfolglos...Sender scheint keinerlei information zu enthalten.
Code:
procedure TForm.Function1Click(Sender: TObject);
begin
if Sender = RichEdit1 then
Function1(RichEdit1);
if Sender = RichEdit2 then
Function1(RichEdit2);
if Sender = RichEdit3 then
Function1(RichEdit3);
if Sender = RichEdit4 then
Function1(RichEdit4);
end;
Wer kann mir hier weiterhelfen ?