OnKeyDown will nicht

hansg · Verfasst: So 03.09.06 07:25

Hallo,
warum geht das nicht?

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if ((Key=VK_F5) and (Key=VK_Control))  then GroupBox2.Visible:=true;
end;

Einzelne Tasten gehen aber warum funktioniert diese Kombination nicht?

_________________
Gruß Hans

der Berliner · Beiträge: 417 Win Xp Home delphi 2005

Morjen..
Versuchs mal So:

markieren

Delphi-Quelltext

1:	if (shift=[ssCtrl]) And (Key=vk_F5) then GroupBox1.Visible:=true;

Gruß

_________________
[b]Ich weiß nicht immer, wovon ich rede. Aber ich weiß, dass ich recht habe.[b]

hansg · Verfasst: So 03.09.06 08:02

der Berliner hat folgendes geschrieben:

Morjen..
Versuchs mal So:

markieren

Delphi-Quelltext

1:	if (shift=[ssCtrl]) And (Key=vk_F5) then GroupBox1.Visible:=true;

Gruß

Hallo,

das funktioniert, Danke für den Tip!

_________________
Gruß Hans

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme