Das folgende "Rezept" stellt ein Formular vor, mit dem der Anwender Menütastenkürzel (Shortcuts) selbst ändern kann. Würde diese Möglichkeit in jedem Programm genutzt werden, wäre es eine ENORME VERBESSERUNG für BEHINDERTE MENSCHEN!!! Deswegen biete ich hier auch, dass komplette Formular zum Download an!

Die Funktionsweiße ist folgendermaßen:

Es ist nur nötig, dem ShortcutFormular das zu verändernde Menü anzugeben und beim Programmstart die Shortcuts zu laden. Gespeichert werden die Shortcuts automatisch beim Beenden des ShortcutFormulars. Die Shortcuts werden in der Datei "DeinProjekt".ini abgespeichert.

Folgendes sollte im OnShow-Ereignis des Hauptformulars bzw. des Aufruffenster stehen:

procedure TForm1.FormShow(Sender: TObject);
begin
ShortCutForm.MenuToConfig := MainMenu1;
ShortCutForm.Load;
end;

Folgendes dient zum aufrufen des Dialogs, wobei MainMenu1 das Menü ist, dem die Shortcuts zugeordnet werden sollen:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShortCutForm.Execute(MainMenu1);
end;

Download des Formulars

zurück zum Stichwortverzeichnis