Tastaturtaste sperren?

[dde]

Wie kann ich den Gebrauch einer beliebigen Tastaturtaste sperren? Ich will z.B., dass die F1..F5 Tasten gesperrt werden, sprich kein Ereignis ausrufen.

[NicoDE]

Zitat:

Zitat von dde

Wie kann ich den Gebrauch einer beliebigen Tastaturtaste sperren? Ich will z.B., dass die F1..F5 Tasten gesperrt werden, sprich kein Ereignis ausrufen.

Mit einem
a) eigenen Tasturtreiber
b) eigenem Tastatur-Filtertreiber
c) Registry-Eintrag für den MS-Tastaturtreiber
d) systemweiten Tastatur-Hook
e) thread-lokalen Tastatur-Hook
f) ...

Wahrscheinlich wird e am wenigsten Aufwand für Dich bedeuten und das gewünschte Ergebnis liefern.

[dde]

Zitat:

Wahrscheinlich wird e am wenigsten Aufwand für Dich bedeuten und das gewünschte Ergebnis liefern.

damit habe ich aber immer noch nicht den effekt der Taste abgeschaltet.

[NicoDE]

Warum nicht? Bitte formuliere Deine Frage genauer.

[toms]

f) RegisterHotKey

[dde]

http://www.swissdelphicenter.ch/torry sei dank:

Delphi-Quellcode:

{
 Connect a handler to the Application.OnMessage event.
 You have to do this in code:
}

  private
    procedure AppOnMessage(var Msg: TMsg; var Handled: Boolean);
    { Private declarations }
  public
    { Public declarations }
  end;
  
var
  Form1: TForm1;

implementation

{$R *.dfm}

var
  FConnected: Boolean;

procedure TForm1.AppOnMessage(var Msg: TMsg; var Handled: Boolean);
begin
  if FConnected then
    case Msg.Message of
      WM_KEYFIRST..WM_KEYLAST,     // Keyboard events
      WM_MOUSEFIRST..WM_MOUSELAST: // Mouse events
        Handled := True
    end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnMessage := AppOnMessage;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  Application.OnMessage := nil;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  FConnected := True;
end;

[NicoDE]

Zitat:

Zitat von toms

f) RegisterHotKey

Wenn die zu unterdrückende Taste einen 'Effekt' hat, gehe ich mal davon aus, dass sie sich nicht (mehr) als Hotkey registreiren lässt.

Zitat:

Zitat von dde

http://www.swissdelphicenter.ch/torry sei dank

Schön, nur ist immer noch nicht klar, was Du eigentlich wolltest.

[dde]

Zitat:

Schön, nur ist immer noch nicht klar, was Du eigentlich wolltest.

Bestimmte Tastatureingaben ignorieren [z. B. Alt+F4];

[Evian]

Bei Swissdelphicenter wird erklärt, wie man Globale Hotkeys registriert -> URL

Wenn Du die Taste, die Du sperren willst, als globalen Hotkey definierst, aber diesem keine Funktion zuteilst, dann ist sie wie gesperrt. Geht auch bei Tastenkombination (z.B. ALT + x)

Also das funzt 100pro, ist aber sicher nicht die Beste Lösung.

gruss

Phill