ADO Database Delphi

Table1.FindNearest ([Edit1.Text]);
veya
Table1.Findkey;