Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#3

AW: Windows MessageBeep unterdrücken

  Alt 2. Apr 2015, 12:21
Der einfachste und auch vorgesehene Weg ist das Verwenden einer Delphi-Referenz durchsuchenTActionList und einer dort angelegten Delphi-Referenz durchsuchenTAction, wo man unter Delphi-Referenz durchsuchenTAction.SecondaryShortCuts einfach ganz simpel den Eintrag 'Alt++' hinzufügt.

Über Delphi-Referenz durchsuchenTAction.OnExecute steuert man, was ausgeführt werden soll und mit Delphi-Referenz durchsuchenTAction.OnUpdate kontrolliert man, ob das aktuelle ausgeführt werden kann soll.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat