Thema: Delphi Popup-Menü woher?

Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#7
  Alt 4. Sep 2002, 09:53
Ich würde Dir folgenden Ansatz empfehlen (sicher ist sicher)
Code:
begin
  if [color=#ff0008]PopupMenu1.PopupComponent[/color] is TMemo then // PopUp Menü kam vom Memo
  begin
    if [color=#ff0008]PopupMenu1.PopupComponent[/color] = Memo1 then
    begin
      // kam von Memo 1
    end else if [color=#ff0008]PopupMenu1.PopupComponent[/color] = Memo2 then begin
      // kam von Memo 2
    end else begin
      // kam von einem anderen Memo
    end;
  end else begin
    // Aufruf kam nicht von einem Memo
  end;
end;
[edit]Sender --> PopupMenu1.PopupComponent [/edit]
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat