como asignar letra del teclado a radio buttons en delphi 2010

[RedVenom]

como asignarle una letra del teclado a un radio button para que al momento de presionarla se selccione la opcion del radio button que corresponda pero hace tiempo ya hice la pregunta y ya lo habia resuelto pero resulta que ahora que lo quiero hacer en Delphi 2010 no funciona en esta version de Delphi les dejo el codigo y denme su opinion donde debe ir el codigo o como le puedo hacer en esta version espero su ayuda les doy las gracias de antemano

PHP Code:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = ord('A') then
  begin
    RadioButton1.SetFocus; 
  end;
 
  if key = ord('B') then
  begin
    RadioButton2.SetFocus;
  end;
 
  if key = ord('C') then
  begin
    RadioButton3.SetFocus;
  end;
 
  if key = ord('D') then
  begin
    RadioButton4.SetFocus;
  end;
end; 


[BrunoBsso]

Lo que estás buscando se llama HotKey.
Fijate este enlace y tambíen este otro así te das una buena idea
Saludos!

PD: usá las etiquetas [ delphi ] y [ / delphi ] para el código delphi, no uses las PHP.

[roman]

Algo que puees hacer también, es anteponer un & a una de las letras de cada RadioButton, la que quieras que funcione como atajo. Por ejemplo, si pones tus RadioButton así:



donde el Caption del primero es "&A RAdioButton1", el segundo "&B RAdioButton2", etc. Al oprimir A, B, C, o D se seleccionará el RadioButton correspondiente, excepto, claro, si el foco del teclado lo tiene algún componente de edición, como un Edit. En esos casos, basta que presiones Alt+Letra para hacer la selección.

// Saludos

[BrunoBsso]

Algo que usé muchas veces fue un MenuBar, haciéndole una sección Archivo con distintos Items y a cada item le asignaba, en la propiedad ShortCut, una letra o conjunto de teclas (Shift+A por ejemplo). Después, en el evento OnClick de cada item le deciía que hacer (por ejemplo, seleccionar uno de esos RadioButton).
Cuando tenía todo listo, al MenuBar le ponía la propiedad Visible en false y listo, era un HotKey casero.
Espero que se entienda, sino lo hago y mando capturas.
Saludos!

PD: de esta forma no importa dónde esté el foco, funciona igual.

[roman]

Para la técnica del MenuBar también podrías usar un ActionList, que es un componente no visual y muy útil para centralizar acciones.

// Saludos

[BrunoBsso]

Fijate vos que con el largo tiempo que uso Dlephi, nunca usé los ActionList
Pero ni siquiera para probarlos.
Ahora mismo les hecho una ojeada porque realmente jamás los usé ni los vi en acción.
Después cuento acá mismo mi experiencia a ver si le ayuda al dueño del hilo.
Saludos!

EDITO:
Acabo de probar el TActionList como sugirió Roman. Es lo que se necesita y más.
Tenés atajos (ShortCut) predeterminados como Ctrl+M y todo eso (o sea, no letras ni números, creo que solo los no imprimibles) y además tenes una propiedad que se llama SecondaryShortCut o algo así que es de tipo TStrings donde podés agregar atajos vos mismo (más de uno) que sean la letra o el número que quieras.
¡BUE-NI-SI-MO!
Se agradece Roman

[roman]

Je, je. Imaginé que te gustarían. Realmente los ActionList son muy potentes y van más allá de los atajos. Una Action se puede asociar a un botón, un item de un menú, etc. De esta manera, puedes tener varios elementos visuales que ejecuten la misma acción sin tener que programar el evento OnClick de cada uno; sólo el del Action.

Además, mediante el evento OnUpdate del ActionList, puedes establecer si una acción está habilitada o inhabilitada según las circunstancias y todos los elementos visuales cambian su apariencia acordemente de forma automática. Si cambias el Caption o el Hint de una acción, cambia para todos los elementos conectados.

O sea, son una pieza fundamental para centralizar las acciones de tu programa junto con la interfaz visual y te permiten un código más limpio.

// Saludos