AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi RegisterHotkey - Taste Druck auswerten
Thema durchsuchen
Ansicht
Themen-Optionen

RegisterHotkey - Taste Druck auswerten

Ein Thema von eddy · begonnen am 8. Nov 2005 · letzter Beitrag vom 9. Nov 2005
 
Benutzerbild von eddy
eddy

Registriert seit: 3. Jan 2003
Ort: Sachsen
573 Beiträge
 
Delphi 5 Professional
 
#1

RegisterHotkey - Taste Druck auswerten

  Alt 8. Nov 2005, 23:17
Hallo Leute,

in diversen anderen Beiträgen habe nachfolgenden Code zum Auswerten von Tasten gefunden.
Ziel: Bei Betätigung der Taste Druck (VK_SNAPSHOT) will ich Aktionen hinterlegen, die vom Standard abweichen.

Delphi-Quellcode:
  private
    { Private-Deklarationen }
    procedure WMHotKey(var Msg : TWMHotKey); message WM_HOTKEY;


const
  SnapshotHotKey = VK_SNAPSHOT;

procedure TForm1.WMHotKey(var Msg : TWMHotKey);
begin
  if Msg.HotKey = SnapshotHotKey
    then ShowMessage('SnapshotHotKey (' +IntToStr(Msg.HotKey)+ ') wurde betätigt')
    else ShowMessage('MsgHotKey = (' +IntToStr(Msg.HotKey)+ ') wurde gedrückt');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  if not RegisterHotkey(self.Handle, SnapshotHotKey, 0, SnapshotHotKey)
    then ShowMessage(SysErrorMessage(GetLastError));
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  UnRegisterHotKey(self.Handle, SnapshotHotKey);
end;
Funktioniert auch alles, nur beim Testen ist mir aufgefallen, daß
TForm1.WMHotKey(var Msg : TWMHotKey); nur dann abgearbeitet wird, wenn die korrekte Taste (SnapshotHotKey) gedrückt wurde, ich mir also die Abfrage mit if-then-else verkneifen kann und nur die Befehle des then-Zeiges hinterlegen muß.

Unter welchen Umständen macht dann da die Abfrage
if Msg.HotKey = SnapshotHotKey überhaupt einen Sinn.

mfg
eddy
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:53 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz