|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
Справочная служба аэропорта
Система должна выдавать справки об авиарейсах из указанного пункта отправления, по требованию сообщать информацию о количестве свободных мест на заданное число, о проданных местах на весь месяц, выполнять операции покупки и сдачи билета.
Люди, может кто-нибудь делал такое или приблизительно похожее, может есть БД. Если можете чем-то помочь пишите или присылайте на Kvas.off@mail.ru Заранее большое спасибо. |
#2
|
|||
|
|||
Может кто-нибудь делал похожее через файлы?
|
#3
|
|||
|
|||
Такой вопрос:
Использую бд парадокс, создаю таблицу рейсов и одним из пунктов является кол-во мест, целого типа (long integer). А как реализовать покупку билетов и соответственно чтобы показывалось кол-во проднных и свободных мест? |
#4
|
||||
|
||||
Ну для кол-ва свободных мест хватит и простого (integer).
Создай SQL-запрос на выборку: Код:
Query.SQL.Add('SELECT * FROM (имя базы) WHERE (Имя поля) LIKE (признак продажи)'); После этого посчитать места можно путём: Код:
Проданые=Общее количество мест - Свободные; ... используя свойство .DataSet.RecordCount - кол-во записей в DataSet после выборки нужных Поживу - увижу, Доживу - узнаю, Выживу - учту. [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
Последний раз редактировалось Yurk@, 14.12.2007 в 16:00. |
#5
|
|||
|
|||
Я сделал так:
1) таблица рейсов: 1 рейс 2 откуда 3 куда 4 тип самолета 5 кол-во мест всего 2) таблица вылетов 1 рейс 2 дата вылета 3 время отправления 4 время прибытия 5 продано билетов 6 свободно билетов И такие вот возникли вопросы: Создал эти две таблицы, но почемуто в таблиу вылетов не возможно добавлять новые записи или редактировать? Я думаю проданных билетов и свободных будут вычисляемыми полями , зависящими от общего кол-ва мест , а как это реализовать в коде? Заранее благодарю. |
#6
|
||||
|
||||
Цитата:
Цитата:
Посмотри это: http://www.delphisources.ru/forum/sh...26&postcount=8 Поживу - увижу, Доживу - узнаю, Выживу - учту. [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#7
|
||||
|
||||
Цитата:
Установи в Options->Edit=True Цитата:
Посмотри это: http://www.delphisources.ru/forum/sh...26&postcount=8 Поживу - увижу, Доживу - узнаю, Выживу - учту. [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#8
|
||||
|
||||
Цитата:
Установи в Options->Edit=True Цитата:
Посмотри это: http://www.delphisources.ru/forum/sh...26&postcount=8 Поживу - увижу, Доживу - узнаю, Выживу - учту. [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#9
|
|||
|
|||
Хочу сделать так:
procedure TForm1.Button1Click(Sender: TObject); var a,b,c:integer; begin b:=StrToInt(Edit1.Text); Table2Buy.Value:=b+Table2Buy.Value; Table2Svobl.Value:=Table1Mest.Value - Table2Buy.Value; end; но выдает ошибку Table2: dataset not in edit or insert mode. Может что-то неправильно связал? А смысл должен быть такой: В Edit1 ввожу число, нажимаю кнопку и в таблице высчитывается кол-во проданных и свободных мест. |