asignar letra a radio button

[RedVenom]

Agradezco su orientacion, pero quiero pedir una disculpa ya que lo que estoy utilizando es DBRadioGroup dentro de este grupo hay 4 radiobuttons cada uno asignado a las letras de la A a la D entonces lo que quiero es poder presionar las teclas A,B,C o D para seleccionar uno de los radiobuttons del grupo y despues pasar el foco al siguiente DBRadioGroup.
mil disculpas por no utilizar los nombres adecuados.

[look]

Empezado por RedVenom

Agradezco su orientacion, pero quiero pedir una disculpa ya que lo que estoy utilizando es DBRadioGroup dentro de este grupo hay 4 radiobuttons cada uno asignado a las letras de la A a la D entonces lo que quiero es poder presionar las teclas A,B,C o D para seleccionar uno de los radiobuttons del grupo y despues pasar el foco al siguiente DBRadioGroup.
mil disculpas por no utilizar los nombres adecuados.

pues no cambia mucho :

Código Delphi [-]
IF Key=65 THEN DBRadioGroup1.ItemIndex:=0; /// radio a
IF Key=66 THEN  DBRadioGroup1.ItemIndex:=1; // radio b
IF Key=67 THEN DBRadioGroup1.ItemIndex:=2 /// radio c

utiliza ItemIndex.

saludos.

[RedVenom]

Muchas gracias por su ayuda, ya lo pude implementar.
Solo una pregunta mas como puedo saber en que componente esta posicionado el foco. Por ejemplo si tengo 4 edit como saber en cual de los 4 esta el foco.

[lKinGl]

Empezado por RedVenom

Muchas gracias por su ayuda, ya lo pude implementar.
Solo una pregunta mas como puedo saber en que componente esta posicionado el foco. Por ejemplo si tengo 4 edit como saber en cual de los 4 esta el foco.

Salu2 compa.... podrias usar esto para lo que quieres

en el evento OnEnter de cada uno de los edits pones este código

Código Delphi [-]
Edit1.Color := clYellow;

y en el evento OnExit este código...

Código Delphi [-]
  Edit1.Color := clWindow;

P.D. claro está que clYellow y clWindows son colores y lo puedes cambiar a tu gusto

[*Caro*]

Empezado por RedVenom

Solo una pregunta mas como puedo saber en que componente esta posicionado el foco. Por ejemplo si tengo 4 edit como saber en cual de los 4 esta el foco.

Hola, deberías abrir otro hilo con esta pregunta, para saber que componnete tiene el foco podrías usar ActiveControl o la función Focused del control.

Has esta prueba en el evento OnEnter de uno de tus edit pon este codigo, ademas de asignar este mismo evento a los demas edit que tienes.

Código Delphi [-]
procedure TForm1.Edit1Enter(Sender: TObject);
begin
 showmessage(ActiveControl.Name);
end;
 
//En el caso de Focused deberías preguntar así
 if Edit2.Focused then
  showmessage('el edit2 tiene el foco');

Saluditos