Søg i en Ado-tabel

Dette virker fint i en paradox tabel og vil nu gerne have det til at virke i en Ado-tabel:

procedure TStart.Image2Click(Sender: TObject);
    var
SearchString:String;
begin
if  RadioButton3.Checked = True then
SearchString:=InputBox('Madglæder: Søgning',
'Indtast NR','')
else
if RadioButton1.Checked = True then
SearchString:=InputBox(' Madglæder: Søgning',
'Indtast Opskrift','')
else
if RadioButton2.Checked =True then
SearchString:=InputBox(' Madglæder: Søgning',
'Indtast Kategori! F.eks: Forret, Mellemret, o.s.v...','');
  Table1.FindNearest ([SearchString]);

end;


procedure TStart.RadioButton1Click(Sender: TObject);
var
SearchString:String;
begin
  RadioButton1.Checked :=True;
RadioButton2.Checked:=False ;
RadioButton3.Checked :=False;

Table1.IndexName:='OpskriftIndeks';
  if Opskrift1.Checked = True then
SearchString:=InputBox('Madglæder: Søgning',
'Indtast Opskrift','') ;
  Table1.FindNearest ([SearchString]);
end;

Ændre dette til:
procedure TStart.Image2Click(Sender: TObject); 

    var
SearchString:String;
begin
if  RadioButton3.Checked = True then
SearchString:=InputBox('Madglæder: Søgning',
'Indtast NR','')
else
if RadioButton1.Checked = True then
SearchString:=InputBox(' Madglæder: Søgning',
'Indtast Opskrift','')
else
if RadioButton2.Checked =True then
SearchString:=InputBox('Madglæder: Søgning',
'Indtast Kategori! F.eks: Forret, Mellemret, o.s.v...','');
  ADOQuery1.Seek (SearchString);

end;


procedure TStart.RadioButton1Click(Sender: TObject);
var
SearchString:String;
begin
  RadioButton1.Checked :=True;
RadioButton2.Checked:=False ;
RadioButton3.Checked :=False;

ADOQuery1.IndexName:='OpskriftIndeks';
  if Opskrift1.Checked = True then
SearchString:=InputBox('Madglæder: Søgning',
'Indtast Opskrift','') ;
  ADOQuery1.Seek (SearchString);
end;


Får fejl når jeg trykker på image 2 og ligeledes når jeg sætter radiobuttons til checked:
Project Mad.exe raised exception class EOleException
with message'Den aktuelle provider understøtter ikke den nødvendige grænseflade for funktionen Index'.
Process stopped. Use Step or Run to continue

Mit opskriftfelt hedder AdoQuery1Opskrift og under prop.Index står der 1.
Prøver så at ændre linien:
ADOQuery1.IndexName:='OpskriftIndeks';
til:
ADOQuery1.Name:='AdoQuery1Opskrift';
Men får fejl:

Project Mad.exe raised exception class EcomponentError with message 'A component AdoQuery1 Opskrift already exists'.
Process stopped. Use step or run to continiue

Hvad skal jeg ændre for at få samme funktion i min access-tabel som øverste eksempel fra paradoxtabel?