suchfunktion

[ulilüding]

Hi und Dank an alle,
zum code (rudimentärer geht's kaum):

procedure myform.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ssCtrl in Shift then begin // is strg gedrückt?
if key=70 then messagebeep(0) // ist es f? dann klingeling
end
end;

Klingeling kommt aber nicht. An logitech glaub' ich eher weniger (nix von denen am Start), das mit dem registerHotkey verfolge ich mal. Ergebnisse demnächst hier.
LG Uli

[alfold]

Versuchs mal so

Code:

if (key = 70) and (shift = [ssCtrL]) then
begin
//machwas
end

Gruss alfold

[ulilüding]

Das wäre schön... einfach andersherum. Das Problem ist, daß FormKeyDown von der f-Taste gar nicht mehr aufgerufen wird, wenn die Steuerungstaste gedrückt ist. Die procedure wird erst gar nicht durchlaufen. STRG-F hängt sich irgendwo vorher raus, bzw. geht erst gar nicht an das Hauptformular meines Programms.

[alfold]

Schliesse mal delhpi
setzt mal ein neues Projekt an und teste den Aufruf!

Gruss

[ulilüding]

Nö, alfold, da geht nix. Daß delphi selber den hotkey abfängt liegt sicher nahe. Aber ist's wohl nicht. Ich versuche morgen mal die registerhotkey-Nummer. Danke einstweilen an alle
LG Uli

[Gollum]

Hallo,

setzte einmal die Eigenschaft KeyPreview des Formulares auf True.

[ulilüding]

Bis hieher Danke, Leute,
falls noch jemand Lust hat: Das Problem hängt zweifelsfrei mit der Verwendung eines Menüs (TMainMenu) zusammen, denn wennn ich das Menü rausschmeiße klappt STRG+F. Ob STRG+F als shortcut im menü drinsteht oder nicht ist gleich, auch dort passiert nix, soll heißen der Menüeintrag mit diesem shortcut wird nicht aufgerufen. Ohne diesen shortcut "frißt" das Menü die Tasteneingabe aber dennoch, so daß sie nicht mal im Hauptformular ankommt(und auch keyPreview nix nützt). autoHotkeys ist auch ohne Wirkung. Idee?
LGU