3 / 3 / 0
Регистрация: 17.05.2013
Сообщений: 58

Delphi7 и Access

17.05.2013, 12:27. Показов 913. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте, программисты, у меня возникла проблема с курсовой, если вы не очень заняты, помогите пожалуйста, есть база данных(созданная в Access) в ней есть таблица Билеты содержащая столбцы(код, цена билета, маршрут, кол - во проданных билетов, номер автобуса дата продажи, время отправки и фио водителя) как в делфи программно по нажатию кнопки считалась выручка, за день месяц, год. Например в Edit1 вводим дату, а Еdit2 или Label выводил выручку за данный период. Помогите пожалуйста или дайте хотя бы ссылку на материал, который нужно почитать, что бы мне самой справится с данной задачей. Заанее спасибо)
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
17.05.2013, 12:27
Ответы с готовыми решениями:

Delphi7 Access
При ввовде номера телефона вида 666666 всё хорошо, но при вводе например номера 8905111111 вылетает с ошибкой. Подскажите где ошибка? ...

Delphi7+SQL+Access
Добрый день! Помогите пожалуйста. Есть база данных Access. Структура таблицы ДокПодчен: Key KeyDok Kontragent ObNdt NDFLdt Cassadt...

Delphi7+ADOTable+Access
Добрый день уважаемые знатоки. Помогите решить задачку. Есть БД в Аксесе: Дата Документ Сумма. Необходимо чтобы при открытии...

4
 Аватар для Waddonator
969 / 644 / 97
Регистрация: 01.11.2012
Сообщений: 1,447
17.05.2013, 12:47
Ritochka94, вам необходимо реализовать sql-запрос к вашей таблице типа:
SQL
1
SELECT SUM([цена билета]*[кол-во проданных билетов]) FROM [ваша таблица] WHERE [дата продажи]=:Param1
где Param1 - выбранная вами дата (лучше не в Edit, а в DateTimePicket). А затем из получившейся выборки копируете данные в Еdit2 или Label.
1
3 / 3 / 0
Регистрация: 17.05.2013
Сообщений: 58
17.05.2013, 12:57  [ТС]
Цитата Сообщение от Waddonator Посмотреть сообщение
Ritochka94, вам необходимо реализовать sql-запрос к вашей таблице типа:
SQL
1
SELECT SUM([цена билета]*[кол-во проданных билетов]) FROM [ваша таблица] WHERE [дата продажи]=:Param1
где Param1 - выбранная вами дата (лучше не в Edit, а в DateTimePicket). А затем из получившейся выборки копируете данные в Еdit2 или Label.
Огромное спасибо, что помогаете, а в этом компоненте (DateTimePicket) будет ли подсчитываться выручка за год или нет?
0
 Аватар для Waddonator
969 / 644 / 97
Регистрация: 01.11.2012
Сообщений: 1,447
17.05.2013, 13:04
Цитата Сообщение от Ritochka94 Посмотреть сообщение
будет ли подсчитываться выручка за год или нет?
В приведенном запросе считаться будет за 1 день. Для расчета за любой период нужно либо в запросе ставить условие с двумя датами
SQL
1
...WHERE [дата продажи] BETWEEN :Param1 AND :Param2
либо (если за календарный год), то
SQL
1
...WHERE YEAR([дата продажи])=:Param1
И, вообще, почитайте про sql-запросы.
1
3 / 3 / 0
Регистрация: 17.05.2013
Сообщений: 58
17.05.2013, 13:10  [ТС]
Спасибо огромное, что направили в нужном направлении, сейчас почитаю
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
17.05.2013, 13:10
Помогаю со студенческими работами здесь

Delphi7+Access+ссылка на изображение
Как в Access вставить ссылку на изображение , чтобы потом (после присоединения к интерфейсу Delphi) в элементе DBImage корректно...

Сохранение БД Access в файл из Delphi7
Подключаю mdb-файл из Delphi через ADOQuery, а после внесения изменений в БД, требуется сохранить БД через SaveDialog под другим именем.....

Delphi7 +Access + фильтрация данных
Добрый день уважаемые программисты! Помогите разобраться с кодом. Form65.Edit3.Text:= 'Згідно договору №...

Delphi7 + Access сравнение таблиц
Добрый день уважаемые програмисты! Помогите решить задачку. Есть две базы данных в Access, необходимо сравнить структуру таблиц первой БД...

Delphi7+ADOQuery+Access+DbGrid
Добрый день господа! Помогите решить проблемку. Есть таблица ADOBankBank: Key_b NDnja Rasxod Prixod KDnja Выведена в DbGrid. Как...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

Новые блоги и статьи
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru