Announcement

Collapse
No announcement yet.

Menue zur Laufzeit erweitern

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Menue zur Laufzeit erweitern

    Liebe Kollegen,
    ich möchte zur Laufzeit ein Menu so erweitern, dass die 4 zuletzt geöffneten Dateien als Menüeintrag erscheinen. Das funktioniert auch schon ganz gut.
    Problem: Mit NewItem.OnClick löse ich das Ereignis als NotifyEvent aus. Ich benötige in der folgenden Procedure aber den Pfad und Dateinamen den ich als Caption deklariert habe.
    Frage: Wie kann ich in der nachfolgeneden Procedure den Parameter(Pfad/Dateinamen) abfragen?
    Andreas Schütte

  • #2
    Hallo Andreas,

    mit einer Typumwandlung kannst Du auf die Komponente zugreifen.
    z.B.:<br>
    .<br>
    .<br>
    .<br>
    FileName := TMenuItem(Sender).Caption;<br>
    .<br>
    .<br>
    .<br>
    Wenn das gleiche Ereignis auch durch eine andere Komponente (z.B. einen Button ausgelöst werden kann, dann solltest Du das vorher noch mit:<br>
    if Sender is TMenuItem then ...<br>
    abfangen.

    Gruß Fal
    Wenn du denkst du hast alle Bugs gefunden, dann ist das ein Bug in deiner Denksoftware.

    Quellcode ohne ein Mindestmaß an Formatierung sehe ich mir nicht an! Ich leiste keinen Privatsupport per Mail oder PN!

    Comment


    • #3
      Vielen Dank Falk. Genau das war es

      Comment

      Working...
      X