Tastenkombination bei FormKeyDown

mk3 · Beiträge: 36

Hallo!

Kann mir jemand helfen? Wie kann ich die Tastenkombination ausführen?
Ich habe mit der folgenden Code versucht, aber tbNeu.Click wird nie ausgeführt. Wenn ich Strg - Taste drücke, dann wird immer Key=17 geschickt.
Nur wenn ich alleine N drücke (ohne Strg), dann Key=78.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if (Shift = [ssCtrl]) and (Key=78) then 
  tbNeu.Click;  // STRG+N
end;

Danke im voraus für jeden Hinweis!
mk

Moderiert von Motzi: Code- durch Delphi-Tags ersetzt.

teebee · Beiträge: 109 D6 Prof

Also bei mir funktioniert das, allerdings nur, wenn KeyPreview auf True steht.

Gruß, teebee

patrick · Beiträge: 1481 WIN2k, WIN XP D6 Personal, D2005 PE

zur ergänzung:
in Tmenu, tpopupmenu und auch in tacionlist gibt es die im objectinspector die option shortcut schon vorprogrammiert.

_________________
Patrick
im zweifelsfall immer das richtige tun!!!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme