Den nemmeste måde at lave shurtcuts med F-tasterne er at have en skjult mainmenu eller popupmenu i dit program.
Hvis du har en knap der skal afslutte dit program så kan du inde i knappens clickprocedure skrive mnuAfslut.click;
Derefter laver du en menu med en valgmenu ved navn: mnuAfslut. På denne menu sætter du en shortcut fx. ctrl+q eller F4 eller hvad du selv synes ! Inde i mnuAfslut.click skriver du så fx:
If Application.MessageBox('Do You want to exit the application?', 'Confirm exit', mb_YesNo or MB_ICONQUESTION) = mrYes Then Application.Terminate;
Synes at det er smartest at bruge en TActionList. Her opretter/administrerer du actions som du på samme tid kan tilknytte eksempelvis et menu-punkt og en knap. Hvis du sætter aMyAction.Enabled := false, så bliver begge komponenter også disabled. Ydermere så har TAction to shortcut-properties som du kan sætte.
Bemærk, at hvis den ønskede genvej ikke findes i listen, så kan du sætte den i formens OnCreate: aMyAction.Shortcut := ShortCut(VK_RETURN,[]);
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.