Поместите Tabset(TabSet1) и  Edit (Edit1) на форму.
Добавьте 4 страницы в TabSet -  св-во Tabs: Hello, World, Of, Delphi.
   
Напишите обработчик OnChange для Edit:
 
procedure TForm1.Edit1Change(Sender: TObject);
var
  I : Integer;
begin
  for  I:= 0 to tabset1.tabs.count-1 do
   if  edit1.text = tabset1.tabs[I] then
     tabset1.tabindex:=I;
end;
 
Если набрать любое имя в Edit1, фокус 
установится на соответствующую страницу.