[nikotan]

вот так ошибки не выдаёт, но и записи при вводе в edit1 не выводит ,

Код:

ADOQuery1.SQL.Clear;
AdoQuery1.Sql.Text := 'select * from organized where Title like :Edit1.Text and classroom like :Edit2.Text';

AdoQuery1.Open;