Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Tastatur unbekanntes Problem (https://www.delphipraxis.net/188656-tastatur-unbekanntes-problem.html)

alfold 25. Mär 2016 11:41

Delphi-Version: 7

Tastatur unbekanntes Problem
 
Info: Tastatur ist OK !!!!
In meinem jetztigen Projekt wird die Taste FK_DIVIDE (NumBlock) nicht mehr erkannt :shock:
Dies hat eine ganze zeitlang funktioniert.
Dann habe ich weiter programiert und beim jetzigen durchlauf stelle ich fest, sie wird nur noch im FormKeyUp erkannt.
Mit Shift, Strg, Alt wird sie erkannt :gruebel:

Lege ich ein neues Projekt an funct alles!

Auch ausserhalb der IDE ist die Taste nicht da.
also nur in diesem Projekt ist sie verschwunden!
Getestet auf Win7/XP

Delphi-Quellcode:
procedure Form1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
 var
  i: Integer;
begin
    Label1.Caption:='gedruckt';//test ob taste gedrückt
//programmcode

end;
procedure Form1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  i: Integer;
begin
    Label1.Caption:= 'losgelassen';//test ob Taste Losgelassen
//programmcode
end;
Hat jemand ne Idee was ich evtl gedrückt habe, damit die Taste nicht mehr zuverfügung steht!
Geht das überhaupt?
Anmerkung: CNPack ist auch installiert.

Guß alfold

alfold 27. Mär 2016 11:31

AW: Tastatur unbekanntes Problem erledigt
 
Jo, Fehler gefunden!
Wie: Hab versucht das Projekt neu aufzusetzen!
Also neue Form, Standard routine drauf(siehe oben) und dann Copy und Paste!
Als erstes das Mainmenue drauf kopiert. Projekt gestartet und.... FK_DIVIDE weg!
Aha, dann die zuletzt eingefügten Menuepunkte entfernt, Trenner entfernt und siehe da, in einem Trenner war ein Shorcut gesetzt mit diesem Key, wie auch immer er da reinkam.
Da einem Trenner ja allgemein keine Procedure zugeordnet wird lief das ganze ins leere.
Gerettet :dancer:

Und was gelernt!
Das Tasten die bewußt oder 'unbewußt' als Shortcuts gesetzt werden, nicht im KeyDown-, KeypPessEvent der Form erscheinen.

Gruß alfold


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:16 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz