shortcut

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
kartmanne
Beiträge: 108
Registriert: 19.03.2015 18:16
Wohnort: Altenstadt
Kontaktdaten:

shortcut

Beitrag von kartmanne »

HI,
ich möchte in einem Fenster auf einen Tastendruck reagieren. Dazu benutze ich addwindowshortcut(...) und frage die Nummer hinterher in einer event-schleife ab. Funzt auch gut.

Ich frage ein Minus-Zeichen ab. Dazu gibts den #pb_shortcut_substract. das ist aber das Minus-Zeichen auf dem Nummernblock. Laptops haben oft keinen Nummernblock. Auf so einem Laptop wird der #pb_shortcut_substract nicht gemeldet.

Wie heißt der shortcut für die "normale" Tastatur? In der pb Hilfe find ich den irgendwie nicht...
Benutzeravatar
RSBasic
Admin
Beiträge: 8047
Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Kontaktdaten:

Re: shortcut

Beitrag von RSBasic »

Die Konstante scheint nicht definiert zu sein, aber damit klappt es:

Code: Alles auswählen

EnableExplicit

#PB_Shortcut_Minus = 189 

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  AddKeyboardShortcut(0, #PB_Shortcut_Minus, 1)
  
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_Menu
        Select EventMenu()
          Case 1
            Debug "a"
        EndSelect
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf
Aus privaten Gründen habe ich leider nicht mehr so viel Zeit wie früher. Bitte habt Verständnis dafür.
Bild
Bild
Benutzeravatar
kartmanne
Beiträge: 108
Registriert: 19.03.2015 18:16
Wohnort: Altenstadt
Kontaktdaten:

Re: shortcut

Beitrag von kartmanne »

HI,

ok. Danke. Da ich beide Minüsse(:-) ) brauche, muß ich nun zwei Konstanten verwenden. Kieg ich wohl hin.

Gibt's für diese codes eine Tabelle? ASCII ist's ja nicht.
Benutzeravatar
RSBasic
Admin
Beiträge: 8047
Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Kontaktdaten:

Re: shortcut

Beitrag von RSBasic »

Das sind Virtual-Key Codes.

Wenn du den Wert der Taste selber ermitteln möchtest:

Code: Alles auswählen

EnableExplicit

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  
  Repeat
    Select WaitWindowEvent()
      Case #WM_KEYDOWN
        Debug EventwParam()
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf
(einfach die gewünschte Taste drücken)

Ansonsten hier eine vollständige Liste: https://msdn.microsoft.com/de-de/librar ... s.85).aspx
Aus privaten Gründen habe ich leider nicht mehr so viel Zeit wie früher. Bitte habt Verständnis dafür.
Bild
Bild
Benutzeravatar
kartmanne
Beiträge: 108
Registriert: 19.03.2015 18:16
Wohnort: Altenstadt
Kontaktdaten:

Re: shortcut

Beitrag von kartmanne »

HI,

ahhso.

Danke!
Antworten