Показать сообщение отдельно
  #3  
Старый 31.10.2012, 13:05
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Dux
Кое-что набросал, но как обработать найдена запись или нет не догоняю..

Код:
Код:
Edit1.text:='Иванов Иван';
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT *');
ADOQuery1.SQL.Add('FROM Data');
ADOQuery1.SQL.add('WHERE Name like ''' +'%'+Edit1.Text + '%''');
ADOQuery1.ExecSQL;
Тебе здесь нужно использовать не ExecSQL, а Open. Тогда можно проверить так:
Код:
  if ADOQuery1.IsEmpty
    then ShowMessage('Записей не найдено')
    else ShowMessage('Записи найдены');
Ответить с цитированием