Vorhergehendes Control fokussieren

[BrunoT]

Hi marabu,

danke für die schnelle Antwort. Nun kann ich zwischen Edit-Feldern mit Enter und Pfeil-Hoch springen,
aber nun kann ich leider dieses in einem Button nicht abfangen:

Delphi-Quellcode:

procedure Tform.JvBitBtn1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = VK_UP then
  begin
    key:=0;
    Feld_Speichern;
    Perform(WM_NEXTDLGCTL, 1, 0);
  end;
end;

Wenn es da noch eine Möglichkeit gäbe...

mfg

BrunoT