Wie hast Du denn den Hotkey realisiert? Vielleicht setzt die Komponente auch selber den Focus. Bei folgendem Beispiel (ein Edit und ein Memo zum Testen) verliert das Edit jedenfalls nicht den Focus, das Memo scrollt ordnungsgemaess:
Delphi-Quellcode:
procedure TFormHotKeyTest.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if shift = [ssCtrl] then
begin
case key of
VK_LEFT :
begin
MemoScroll.Perform(WM_KEYDOWN, VK_HOME,0);
key := 0;
end;
VK_RIGHT :
begin
MemoScroll.Perform(WM_KEYDOWN, VK_END,0);
key := 0;
end;
end;
end;
end;