KeyboardHook 을 직접 컨트로하면 될것 같습니다.

이곳에서 검색하면 여러 방법이 나옵니다.

-- 아래는 그중에 하나 -- 컨트롤 탭키를 제어하는 방법입니다.

var
  Form1: TForm1;
  KeyHook: HHOOK;
  function KeyboardHook(nCode: Integer; wParam: WPARAM; lParam: LPARAM): LResult; stdcall;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
    KeyHook := SetWindowsHookEx(WH_KEYBOARD, @KeyboardHook, 0, GetCurrentThreadID);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
    UnHookWindowsHookEx(KeyHook);
end;

function KeyboardHook(nCode: Integer; wParam: WPARAM; lParam: LPARAM): LResult;
begin
  if nCode > -1 then begin
    if (wParam = VK_TAB)and(GetKeyState(VK_CONTROL)<0) then begin
        Result := -1;
        exit;
    end;
  end;
  Result := CallNextHookEx(KeyHook, nCode, wParam, lParam);
end;