PureBoard

Verfasst: **14.12.2005 00:53**

Ich verwende in meinem Programm ein einfaches Fenster mit Gadgets (kein Menü).
Darin habe ich einen Hilfe-Button eingebaut, der eine Hilfedatei Help.chm öffnet.
Ich würde die Hilfedatei aber auch gerne mit der Funktionstaste F1 aufrufen.
Wie müsste ich dafür folgende Schleife erweitern?

Code: Alles auswählen

Repeat  
  EventID = WaitWindowEvent()
  Select EventID
    Case #PB_Event_CloseWindow
       Quit=1
    Case #PB_Event_Gadget
      Select EventGadgetID()
        Case #Button_Help
          OpenHelp("Help.chm","")
      EndSelect
  EndSelect   
Until Quit=1

Verfasst: **14.12.2005 00:56**

AddKeyBoardShortCut
Liefert ein Menüereignis. Guck mal in die Hilfe,
wenn Du noch nicht klar kommst, fragste einfach
nochmal nach

Verfasst: **14.12.2005 01:07**

Danke für den Tipp, aber bezieht sich AddKeyboardShortcut nicht auf Menüereignisse.
Ich verwende in meinem Programm keine Menüs.

Wie müsste der Code in die Schleife integriert werden, damit die Taste F1 die Funktion OpenHelp("Help.chm","") aufruft?

Verfasst: **14.12.2005 01:13**

In etwa so:

Code: Alles auswählen

AddKeyboardShortcut(#Window, #PB_Shortcut_F1, 0) ; 0 ist das Menuereignis
Repeat 
  EventID = WaitWindowEvent()
  Select EventID
    Case #PB_Event_CloseWindow
       Quit=1
    Case #PB_Event_Menu
      Select EventMenuID()
        Case 0
          OpenHelp("Help.chm","")
      EndSelect
    Case #PB_Event_Gadget
      Select EventGadgetID()
        Case #Button_Help
          OpenHelp("Help.chm","")
      EndSelect
  EndSelect   
Until Quit=1

Verfasst: **14.12.2005 01:24**

Problem gelöst!

Hat wunderbar geklappt.

Ich hatte den Befehl vorhin schon ausprobiert, wusste aber nicht, was ich als Menüereignis eintragen soll.
Da ich keine Menüs habe, kann ich aber auch eine 0 eintragen, wie du es empfohlen hast.

Vielen Dank.
Du hast mir sehr geholfen!

PureBoard

Eigene CHM-Hilfedatei mit Taste F1 aufrufen?

Eigene CHM-Hilfedatei mit Taste F1 aufrufen?