Доброго Вам времени суток уважаемые форумчане!!! Помогите плиз! На работе запускается новый сервис, в принципе не большой, но кроме главного программиста никто написать его не может... А он в отпуске
Всеми усилиями пытаемся как то без него, но результат пока не большой... В общем в чем собственно проблема: Есть инструментарий - Delphi 7 и база на InterBase 1.5. В базе есть две таблицы, называются TICK и TICKED_USED. Первая таблица состоит из двух столбцов, называются SER и NOM, и содержит серию и номер билетика от автобуса (например билет АВ-01 000123 или АП 009384), т.е в первом столбце содержится АВ-01, а во втором 000123. Далее, во второй таблице хранится также серия и номер билета, она нужна для использованных билетиков. Почему использованных? Сейчас расскажу. Акция вот в чем. Наша компания сеть ресторанов пиццы. Руководство запускает акцию, найди счастливый билет в автобусе и получи пиццу бесплатно. Так вот, база счастливых билетов как раз хранится в таблице TICK. В Delphi мы создали форму, на которой расположено 3 TEdit: первый для буквенной части серии, второй для цифровой части серии (ее может не быть, поэтому для нее отдельное поле) и третий TEdit для номера. Диспетчер получает звонок и клиент диктует ей свой номер: если номер только с буквенной серией, тогда диспетчер оставляет второе поле пустым, если же нет то заполняет. Хорошо, далее в событии OnKeyPress третьего Edit мы передаем серию и номер в два ранее созданных TLabel, серию если двойная то конкатенацией строк двух TEdit, если же одинарная то просто передаем, ну а номер аналогично в третий Edit. Дальше нужно произвести запрос в таблицу TICK на проверку выигрышный этот билет или нет? Если же да, то нужно проверить в TICKED_USED, а не использовался ли этот билет ранее? Если же оба контроля проходит, то заносим этот билет в TICKET_USED. Соответственно нужно выводить сообщения при не прохождении того или иного пункта. Задача не сложная, но нам не хватает опыта...
Помогите пожалуйста люди добрые!