Показать сообщение отдельно
  #25  
Старый 28.11.2013, 10:52
YuliyaKar YuliyaKar вне форума
Прохожий
 
Регистрация: 13.11.2013
Сообщения: 37
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Так и я о том же. Поле это нигде не фигурирует, но проект сразу выбивает.
Попробовла так! И все заработало!!!!!!!!!!
Просто все поля выбрала, потому что , когда я добавила "KodD", он тогла начал показывать, что другие не может найти
Код:
Query3.Close;
Query3.SQL.Text:='SELECT * FROM Stab.DB WHERE Dispt  <= ''' + Edit6.Text + ''' ORDER BY Dispt DESC';
Query3.Open;
if Query3.IsEmpty then
  raise Exception.Create('Ничего не найдено')
else
  Edit8.Text := Query3.FieldByName('DRAFT').AsString;
Это просто счастье!!! Спасибо вам, Проверила, выбирает наиболее близкое или равное!!!
Ответить с цитированием