Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: Radiobutton per Taste auslösen?

   
    by Bummi, 26. Dez 2012
  procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
  begin
  case Key of
  VK_DOWN: Caption := 'Down';
  VK_UP: Caption := 'Up';
  VK_LEFT: Caption := 'Left';
  VK_RIGHT: Caption := 'Right';
  end;
  end;
• Forum: Multimedia

  AW: Radiobutton per Taste auslösen?

   
    by Bummi, 26. Dez 2012
  Ich würde keine Radiobuttons verwenden, sondern den Zustand in einem "NichtWincontrol" darstellen. Bei Dir dürften die automatischen &x selectionen kollidieren mit mit den KeyDownroutinen des Elementes welches gerade den Focus hat und dessen welches durch &x gewählt wird. Wenn Du bei RadioButtons bleiben willst würde ich die &'s aus den Captions entfernen und den Code eindampfen auf:
  
  ...