Ich wechsle auf eine kyrillische Sprache und da ist ein 'j' was anderes. Hier mein Code:
Delphi-Quellcode:
procedure TMainForm.FormKeyPress(Sender: TObject; var Key: char);
begin
if Key = 'j' then
begin
if VolumeOnImage.Visible = True then VolumeOnImageClick(Self)
else VolumeOffImageClick(Self);
end;
end;
Ich möchte damit nur zwei Prozeduren aufrufen (Lautstärke ein/ausschalten), mehr nichts. Und ich habe mich für die j-Taste entschieden, da sie ne Markierung für blinde hat.