Thema: Delphi Popup-Menü woher?

Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#7
  Alt 4. Sep 2002, 08: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 W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat