Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Проверить наличие записи

Автор: JamesQ 6.8.2010, 16:43

вопрос такой, есть TEdit и есть TButton, в TEdit вводим число, по нажатию на кнопку нужно проверить в таблице (Access), есть ли запись с таким ID (введенное нами число), если есть, то должна открыться вторая форма, если нету, то хотя бы чтобы ничего не делалось, в идеале чтобы сообщюха вылазила "Записи с таким номером в базе не обнаружено". спс

Автор: Данкинг 6.8.2010, 19:48

Выбирать запросом вроде "select * from TABLE where id=....", если выбрано 0 записей, значит, такого ID нет.

Автор: JamesQ 7.8.2010, 07:40

а каким образом можно узнать что выбрано 0, у меня DBGrid есть может как-то через него, но я не знаю как

Автор: Данкинг 7.8.2010, 10:24

Число строк - AdoQuery.RecordCount.

Автор: Akella 8.8.2010, 12:13

запрос

Код

Select count(*) from table where id = :id

вернёт количество записей.

Кинь на форму компоненты, соедини их, подключись к базе и..

Код


AdoQuery.SQL.Text := 'Select count(*) from table where id = ' + Edit1.text
ADOQuery1.Open;
ShowMessage(IntToStr(ADOQuery1.recordcount))
ADOQuery1.close;

примерно так

Автор: Данкинг 8.8.2010, 14:22

Тогда уж логичней так:

Код


AdoQuery.SQL.Text := 'Select count(*) as ccount from table where id = ' + Edit1.text
ADOQuery1.Open;
ShowMessage(IntToStr(ADOQuery1.FieldValues['ccount']));
ADOQuery1.close;

Автор: JamesQ 8.8.2010, 18:11

Спасибо парни, помогло!!!