Запросы в цикле, можно ли так?

@Vid_012 · Регистрация: 29.10.2024

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

Я не профи, это первое знакомство с SQLite и все делаю методом проб. Можно ли в цикле значение вычитать и суммировать как в примере.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
double ka, fk, wk;
int a,b;
 for (x=0; y<z; x++)
{
if (a < b)
ka= fk;
 
      try {
     query->SQL->Text = "Update Tabl SET Kf = Kf - (:ka) WHERE Name == (:TbName)";
     query->Params->ParamByName("ka") ->Value = ka;
     query->Params->ParamByName("TbName") ->AsString = TbName;
     query->ExecSQL();
    } catch (Exception &E) {
     ShowMessage(" Error ka - ");
    }
 
//-----------
if (a >b)
ka= wk;
 
     try {
     query->SQL->Text = "Update Tabl SET Kf = Kf + (:ka) WHERE Name == (:TbName)";
     query->Params->ParamByName("ka") ->Value = ka;
     query->Params->ParamByName("TbName") ->AsString = TbName;
     query->ExecSQL();
    } catch (Exception &E) {
     ShowMessage(" Error ka + ");
    }
                                      
 }

@Vid_012 · 30.11.2024, 08:03 **[ТС]**

Когда выполняется этот запрос в отдельном юните, который создал, при запуске программы выскакивает каждый цикл

C++
1
ShowMessage("Error Read Pos  From Tabl " + newkl );

на форме откуда я его перенес в юнит, такого не было

@D1973 · 30.11.2024, 08:15

Значит, возникает исключение, надо смотреть текст этого исключения, а не Ваше сообщение "Error Read Pos From Tabl "

@Vid_012 · 30.11.2024, 08:20 **[ТС]**

Сообщение от D1973

надо смотреть текст этого исключения

где и как его смотреть?

@D1973 · 30.11.2024, 09:28

Сообщение от Vid_012

где и как его смотреть?

Вот так попробуйте:

C++
1
2
3
4
5
6
try {
      //...
}
catch (Exception &E) {
     ShowMessage(" Error " + E.Message);
}

@Vid_012 · 30.11.2024, 10:35 **[ТС]**

Появляется такая мессага:

@Vid_012 · 30.11.2024, 10:37 **[ТС]**

Перевел что соединение не определено, попробовал как раньше

C++
1
2
3
4
5
6
TFDConnection* Connect2 = new TFDConnection(NULL);
TFDQuery*   query2 = new TFDQuery(NULL);
Connect2->DriverName = "SQLite";
String PatchFire = PathDB;           
Connect2->Params->Values["DataBase"] = PatchFire;
Connect2->Open();

но такая же мессага

@D1973 · 30.11.2024, 11:19

Ну а компоненты TFDConnection и ТFDQuery кто связывать между собой будет?

Я, честно говоря, не понимаю, в чем прикол динамического создания подключения, запросов и т.д. Почему нельзя сложить эти компоненты в отдельный DataModule и пользоваться нормально?

@Vid_012 · 30.11.2024, 11:40 **[ТС]**

Сообщение от D1973

Ну а компоненты TFDConnection и ТFDQuery кто связывать между собой будет?

Упустил... исправил и заработало!

Сообщение от D1973

отдельный DataModele

не знаю о чем речь, хотя интересно в чем его плюсы, делаю как знаю, главное что бы работало
Спасибо!!

@D1973 · 30.11.2024, 11:48

Сообщение от Vid_012

не знаю о чем речь

DataModule - это, по сути, как раз то же самое, что Вы пытаетесь сделать при помощи отдельного модуля - специальная невизуальная форма для размещения на ней компонентов для доступа к базам данных, которая подключается к остальным формам и модулям проекта, тем, из которых планируется обращение к БД.

@Vid_012 · 30.11.2024, 11:54 **[ТС]**

Сообщение от D1973

DataModule - это, по сути, как раз то же самое, что Вы пытаетесь сделать при помощи отдельного модуля - специальная невизуальная форма для размещения на ней компонентов для доступа к базам данных, которая подключается к остальным формам и модулям проекта, тем, из которых планируется обращение к БД.

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

@Vid_012 · 01.12.2024, 19:25 **[ТС]**

D1973, Напомнили вы про DataModule и я удалил юнит, а добавил 4 DataModule разбив запросы по блокам. Стало намного читабельнее и удобнее что править. Удобная штука!
Спасибо!

Новые блоги и статьи Все статьи Все блоги /
Часы с термометром и праздничным календарем yariko 12.11.2026 Сегодня мы рассмотрим как можно сделать отличные многофункциональные часы. Итак, поставим конкретную задачу: разработать часы с календарем, двумя термодатчиками, выводом поздравительных сообщений. . .	Транслитерация текста с кириллицы на латиницу (вариант №1) Maks 11.11.2026 Решил облегчить жизнь себе и коллегам админам при создании электронных почтовых ящиков для пользователей, в результате написал обработку "Транслитерация текста" с кириллицы на латиницу, а в ней. . .	Книги по геймдизайну, левел-дизайну, игровым механикам и проектированию игрового опыта 8Observer8 08.11.2026 Содержание блога \| English Version 1. 2003 - 06 - Designing Virtual Worlds (1st Edition) Автор: Richard A. Bartle \| Объем: 768 стр. Ссылки: Amazon . . .	Родители токсичные абьюзеры по отношению к своим детям ругают их оскорбляют не любят zorxor 08.11.2026 Жить в атмосфере постоянных оскорблений, критики и холодности со стороны родителей — это тяжелое и болезненное испытание, которое оставляет глубокие эмоциональные раны. Токсичное и абьюзивное. . .
Как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Ответ от Джемени ИИ. zorxor 08.11.2026 Джемени, как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Многие люди, возвращаясь домой, сразу переодеваются в максимально свободную одежду или вовсе предпочитают. . .	Паттерн очереди действий/команд (Action / Command Queue). Система очереди действий и кат-сцен с SDL3 Callbacks, cglm и OpenGL 8Observer8 07.11.2026 Содержание блога \| English Version Руководство для начинающих по реализации паттерна очереди действий/ команд (Action / Command Queue) на C++ (C++20) с использованием официального SDL3 Callbacks. . .	Проверка полного ФИО в типовом справочнике Maks 07.11.2026 Решение реализовано в конфигурации КА2, на примере справочника "КонтактныеЛицаПартнеров". Задача: Запрет инициалов. Не допускаеть использование сокращений вида "И. И. ", "И. И. ", "И И" и. . .	Про "Windows must die!" kumehtar 04.11.2026 Знаете, чет накатило. . . . Когда-то это было почти боевым кличем: мол, нормальный человек сидит на DOS, OS/ 2 или Linux, а вот это вот - Must Die. А теперь человек произносит «мастдай» с усмешкой - и. . .

@D1973 Модератор 9966 / 6500 / 2464 Регистрация: 21.01.2014 Сообщений: 27,513 Записей в блоге: 3
	30.11.2024, 08:15
	Значит, возникает исключение, надо смотреть текст этого исключения, а не Ваше сообщение "Error Read Pos From Tabl " 0

@Vid_012 0 / 0 / 0 Регистрация: 29.10.2024 Сообщений: 29
	30.11.2024, 10:35 [ТС]
	Появляется такая мессага: Миниатюры 0

@D1973 Модератор 9966 / 6500 / 2464 Регистрация: 21.01.2014 Сообщений: 27,513 Записей в блоге: 3
	30.11.2024, 11:19
	Сообщение было отмечено Vid_012 как решение Решение Ну а компоненты TFDConnection и ТFDQuery кто связывать между собой будет? Я, честно говоря, не понимаю, в чем прикол динамического создания подключения, запросов и т.д. Почему нельзя сложить эти компоненты в отдельный DataModule и пользоваться нормально? 1

@Vid_012 0 / 0 / 0 Регистрация: 29.10.2024 Сообщений: 29
	01.12.2024, 19:25 [ТС]
	D1973, Напомнили вы про DataModule и я удалил юнит, а добавил 4 DataModule разбив запросы по блокам. Стало намного читабельнее и удобнее что править. Удобная штука! Спасибо! 0

Запросы в цикле, можно ли так?

Решение