FindNearest i tabel kontra Seek i ADOQuery. Hvordan gør man

Table1.FindNearest  - ADOQuery1.Seek ???
Konverterer mit program fra paradox-tabel til Asses-tabel

I mit program med paradox tabel accepteres følgende:
procedure TIndexMad.Image2Click(Sender: TObject);
  var
SearchString:String;
begin
if RadioButton3.Checked = True then
SearchString:=InputBox(' Mad: Søgning',
'Indtast NR','')
else
if RadioButton1.Checked = True then
SearchString:=InputBox(' Mad: Søgning',
'Indtast Opskrift','')
else
if RadioButton2.Checked =True then
SearchString:=InputBox(' Mad: Søgning',
'Indtast Kategori! F.eks: Forret, Mellemret,o.s.v....','');
  Start.Table1.FindNearest ([SearchString]);
end;

FindNearest er tilknyttet tabel komponenten og da jeg nu anvender nu ADOQuery i stedet for Tabel componenten, har jeg et problem . Har forsøgt mig med følgende,da jeg gerne have samme funktion udført :

procedure TIndexMad.Image2Click(Sender: TObject);
  var
SearchString:String;
begin
if RadioButton3.Checked = True then
SearchString:=InputBox(' Mad: Søgning',
'Indtast NR','')
else
if RadioButton1.Checked = True then
SearchString:=InputBox(' Mad: Søgning',
'Indtast Opskrift','')
else
if RadioButton2.Checked =True then
SearchString:=InputBox(' Mad: Søgning',
'Indtast Kategori! F.eks: Forret, Mellemret,o.s.v....','');
  Start.ADOQuery1.Seek ([SearchString]);
end;

Får fgl. fejl:

  [Error] IndexMad1.pas(106): Ordinal type required

Har set lidt på help. men... og prøvet lidt forskelligt med
type TSeekOption = (soFirstEQ, soLastEQ, soAfterEQ, soAfter, soBeforeEQ, soBefore);
function Seek(const KeyValues: Variant; SeekOption: TSeekOption = soFirstEQ): Boolean;

Hvordan skal det se ud for at virke?