Таблицы в делфи (sql Запрос)

@Darksinius · Регистрация: 18.06.2013

Студворк — интернет-сервис помощи студентам

Здравствуйте. Есть база данных, в ней 2 таблицы. 1-я это регистрация клиентов, а 2-я это услуги, которыми эти клиенты пользуются. Я скинул сюда пример того что есть в базе. В общем нужно что бы во 2-й таблице ячейки или строки, как их назвать не знаю, что бы в общем они умножались на ячейку сумма и результат выводился в Итоговая сумма, далее нужно что бы в 1 таблице ячейка Сумма за номер складывалась с ячейкой из 2 таблицы Итоговая сумма в ячейку Всего в 1 таблице.

Пожалуйста помогите, очень срочно нужно.
Заранее благодарю от всей души.

@Darksinius · 20.06.2013, 16:18 **[ТС]**

кстати, 1 клиент может использовать много услуг, следовательно строк будет много, вот мне надо что бы они все считались

Скандербег · 20.06.2013, 17:11

Как вариант (во вложении одна главная форма и перед ее заменой необходимо закрыть проект).
При подсчете сумм в подчиненной таблице используются поля этой же таблицы.
При подсчете итоговых сумм по клиентам применяется запрос.

В приведенный примере суммы не записываются в базу.
Как правило, в этом нет никакой необходимости.

@Darksinius · 20.06.2013, 17:18 **[ТС]**

просто мне необходимо это что бы потом выводить Счет. база данных Гостиница

Добавлено через 13 секунд
то бишь на печать отправлять

Скандербег · 20.06.2013, 17:28

А в чем проблема при печати счета?
Делать как в примере. Так же считать и формировать данные для отправки на печать.
Повторяю, очень редко требуется хранить суммы в БД.
В базе данных "Гостиница" суммы тоже не хранят.

@Darksinius · 20.06.2013, 18:01 **[ТС]**

Понятно) большое спасибо)

Добавлено через 30 минут

Delphi
1
2
3
4
5
6
7
8
if Column.FieldName = '' then begin
    R := Rect;
    InflateRect(R, -2, -2);
    qr.Parameters[0].Value := qry1['id'];
    qr.Open;
    S := qr['S'];
    DrawText(dbgrd1.Canvas.Handle, PChar(Format('%8.2n',[S])), -1, R, DT_RIGHT);
    qr.Close;

можете обьяснить где он тут вписывает сумму в 1 таблицу? я что то понять никак не могу

Добавлено через 39 секунд
и в проекте то что вы скинули базы нету, так что наглядно понять я не могу

Добавлено через 46 секунд

Сообщение от Скандербег

А в чем проблема при печати счета?
Делать как в примере. Так же считать и формировать данные для отправки на печать.
Повторяю, очень редко требуется хранить суммы в БД.
В базе данных "Гостиница" суммы тоже не хранят.

если не сложно то сделайте в той базе что я скинул, ибо у вас только форма и все, базы нету, и проверить никак нельзя.
Спасибо

Скандербег · 20.06.2013, 18:12

А тот проект, который у вас? Он куда вместе с базой делся? Тот, который был выложен здесь на форуме (T32.rar).

Отображает сумму функция DrawText.

если не сложно то сделайте в той базе что я скинул,...

Что сделать?
Но что бы это не было, в базе только данные и ничего другого в базе делать невозможно.

@Darksinius · 20.06.2013, 18:16 **[ТС]**

[QUOTE=Скандербег;4749242]А тот проект, который у вас? Он куда вместе с базой делся? Тот, который был выложен здесь на форуме (T32.rar).

@Darksinius · 20.06.2013, 18:17 **[ТС]**

во 2 таблице почему то строчка Итоговая сумма не хочет появляться, хоть в базе она есть

Добавлено через 44 секунды

Delphi
1
DrawText(dbgrd1.Canvas.Handle, PChar(Format('%8.2n',[S])), -1, R, DT_RIGHT);

это он в строку Итого записывает?

Новые блоги и статьи Все статьи Все блоги /
Символьное дифференцирование igorrr37 13.02.2026 / * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .

@Darksinius 0 / 0 / 0 Регистрация: 18.06.2013 Сообщений: 26
	20.06.2013, 16:18 [ТС]
	кстати, 1 клиент может использовать много услуг, следовательно строк будет много, вот мне надо что бы они все считались 0

@Darksinius 0 / 0 / 0 Регистрация: 18.06.2013 Сообщений: 26
	20.06.2013, 17:18 [ТС]
	просто мне необходимо это что бы потом выводить Счет. база данных Гостиница Добавлено через 13 секунд то бишь на печать отправлять 0

Скандербег 1076 / 989 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	20.06.2013, 17:28
	А в чем проблема при печати счета? Делать как в примере. Так же считать и формировать данные для отправки на печать. Повторяю, очень редко требуется хранить суммы в БД. В базе данных "Гостиница" суммы тоже не хранят. 1