Fokuswechsel mit Pfeiltaste verhindern

[blablab]

Hallo!

Ich arbeite gerade an einer Komponente und wenn ich eine Pfeiltaste drücke, dann möchte ich mich innerhalb der Komponente bewegen. Aber irgendwie wird da automatisch der Fokus an die nächste Komponente oben/unten/links/rechts weitergegeben. Kann ich das irgendwie verhindern?

Grüße
blablab

[mkinzler]

Wie fragst du die Tasten ab?

[Daniela.S]

Du musst der Komponente mitteilen, dass sie Pfeiltasten akzeptieren soll.

Delphi-Quellcode:

  TMyComp= class(TCustomControl)
  private
    procedure WMGetDlgCode(var Msg: TWMGetDlgCode); message WM_GETDLGCODE;

...

procedure TMyComp.WMGetDlgCode(var Msg: TWMGetDlgCode);
begin
  Msg.Result := DLGC_WANTARROWS;
end;

procedure TMyComp.KeyDown(var Key: Word; Shift: TShiftState);
begin
  case Key of
    VK_LEFT:  ;
    VK_RIGHT: ;
    VK_UP:    ;
    VK_DOWN:  ;
    end;
end;

[blablab]

Juhu Danke Daniela.S !!!