10.04.2013, 10:13
|
 |
Специалист
|
|
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
|
|
Код:
ADOQuery1.Close;
ADOQuery1.SQL.Text := 'SELECT * FROM bso WHERE f_Der = IIF(:der IS NULL, f_Der, :der)';
ADOQuery1.Parameters.ParamByName('der').Value := Edit1.Text;
ADOQuery1.Open;
не? |