Показать сообщение отдельно
  #10  
Старый 02.09.2018, 14:05
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Цитата:
Сообщение от kiddan
Пользователь вводит номер в Edit и нажимает поиск (Button).
Тогда придется вот так бегать по всем записям таблички
Код:
 with Table1 do
begin
 First;
 while (not Eof) and
       (not (Trim(FieldByName('GIC').AsString) = Edit1.Text)) do
 Next;
 if Eof then ShowMessage('Такого номера ГИЦ нет');
end;
Ответить с цитированием