Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.05.10;
Скачать: CL | DM;

Вниз

Поиск в БД   Найти похожие ветки 

 
igorntk   (2009-03-27 11:37) [0]

В TEdit вносятся значения для поиска. Необходимо, чтобы в случае удачного поиска было сообщение "Такой существует". Процедуру выполняю с помощью нажатия кнопки:
procedure TForm5.Button6Click(Sender: TObject);
var kod:longint;
begin
kod:=strtoint(Edit3.Text);
if table1.FindKey([kod])then showmessage ("такой существует");
end;

Как данный поиск сделать при выходе из компонента TEdit. Пытался сделать с помощью OnExit - сообщение об ошибке...


 
Palladin ©   (2009-03-27 11:40) [1]

Сообщение об ошибке говорит что ты лось. Только люди этого типа думают что все в мире знают ее текст.


 
Плохиш ©   (2009-03-27 11:52) [2]


> igorntk   (27.03.09 11:37)

Читал, читал, вопросительных знаков не заметил. В чём вопрос-то?


 
Ega23 ©   (2009-03-27 11:54) [3]

За такое надо убивать на медленном огне. На каждый Exit в БД запросом стрелять...


 
igorntk   (2009-03-27 13:09) [4]

Нужно, чтобы поиск осуществился при выходе из TEdit. Вместо нажатия кнопки. Как это сделать?


 
Сергей М. ©   (2009-03-27 13:13) [5]


> Как это сделать?


Перенести код из обработчика Button.OnClick в обработчик Edit.OnExit

Сказка про белого бычка)


 
igorntk   (2009-03-27 13:24) [6]


> Перенести код из обработчика Button.OnClick в обработчик
> Edit.OnExit

Ошибка:
Proect1 raisedexception class EconverterError with message "is not a valid integer value"


 
Сергей М. ©   (2009-03-27 13:27) [7]

Так ты в Edit-то чего-нть введи целочисленное, прежде чем его покидать !


 
clickmaker ©   (2009-03-27 14:39) [8]

или хотя бы TryStrToInt
а лучше - выводить где-нибудь пользователю красным цветом "не введен критерий поиска"


 
igorntk   (2009-03-27 14:53) [9]


> Сергей М. ©


> clickmaker ©

Спасибо!


 
MsGuns ©   (2009-03-27 15:20) [10]

Похоже, что все-таки убьют :)



Страницы: 1 вся ветка

Текущий архив: 2009.05.10;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.01 c
15-1236184377
It's not me
2009-03-04 19:32
2009.05.10
Можно определить, что адрес является широковещательным?


15-1236501951
тимохов-криптор
2009-03-08 11:45
2009.05.10
Веб-сервер на Linux


2-1238076003
igorntk
2009-03-26 17:00
2009.05.10
Как запретить дублирование данных в поле таблицы?


2-1238068203
D@nger
2009-03-26 14:50
2009.05.10
Операционка ругается


2-1238493524
начинающий96
2009-03-31 13:58
2009.05.10
ООП