| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск в БД
igorntk © (2009-03-27 11:37:00)В TEdit вносятся значения для поиска. Необходимо, чтобы в случае удачного поиска было сообщение "Такой существует". Процедуру выполняю с помощью нажатия кнопки:
procedure TForm5.Button6Click(Sender: TObject);
var kod:longint;
begin
kod:=strtoint(Edit3.Text);
if table1.FindKey([kod])then showmessage ('такой существует');
end;
Как данный поиск сделать при выходе из компонента TEdit. Пытался сделать с помощьюOnExit- сообщение об ошибке...
MsGuns (2009-03-27 15:20:00) [1]Похоже, что все-таки убьют :)
igorntk (2009-03-27 14:53:00) [2]
> Сергей М. ©
> clickmaker ©
Спасибо!
clickmaker (2009-03-27 14:39:00) [3]или хотя бы TryStrToInt
а лучше - выводить где-нибудь пользователю красным цветом "не введен критерий поиска"
Сергей М. (2009-03-27 13:27:00) [4]Так ты в Edit-то чего-нть введи целочисленное, прежде чем его покидать !
igorntk (2009-03-27 13:24:00) [5]
> Перенести код из обработчика Button.OnClick в обработчик
> Edit.OnExit
Ошибка:
Proect1 raisedexception class EconverterError with message "is not a valid integer value"
Сергей М. (2009-03-27 13:13:00) [6]
> Как это сделать?
Перенести код из обработчика Button.OnClick в обработчик Edit.OnExit
Сказка про белого бычка)
igorntk (2009-03-27 13:09:00) [7]Нужно, чтобы поиск осуществился при выходе из TEdit. Вместо нажатия кнопки. Как это сделать?
Ega23 (2009-03-27 11:54:00) [8]За такое надо убивать на медленном огне. На каждый Exit в БД запросом стрелять...
Плохиш (2009-03-27 11:52:00) [9]
> igorntk (27.03.09 11:37)
Читал, читал, вопросительных знаков не заметил. В чём вопрос-то?
Palladin (2009-03-27 11:40:00) [10]Сообщение об ошибке говорит что ты лось. Только люди этого типа думают что все в мире знают ее текст.
| |
