ADODataSet1.Active:=false;

ADODataSet1.CommandText:='select name, surname '+

'from fio '+

'where (name like '+''''+Edit1.Text+'%'+''''+')'+

'and (surname like '+''''+Edit2.Text+'%'+''''+')';

//ShowMessage(ADODataSet1.CommandText);

ADODataSet1.Active:=True;

select name, surname

from fio

where (name like 'А%')

and (surname like 'Б%')