медленный отклик запроса

[govorun1]

С формы 3 загружается форма 6 модально. На форме 3 запрос на подсчет сумм. На FormShow формы 3 стоит

    Label1.Caption := FloatToStrf(ADOQuery6.Fieldbyname('840').AsFloat,ffNumber,12,2);
    Label2.Caption := FloatToStrf(ADOQuery6.Fieldbyname('978').AsFloat,ffNumber,12,2);

На OnClose формы 6 стоит

    form3.ADOQUERY6.Close;
    form3.ADOQUERY6.Open;
    form3.Label1.Caption := FloatToStrf(form3.ADOQuery6.Fieldbyname('840').AsFloat,ffNumber,12,2);
    form3.Label2.Caption := FloatToStrf(form3.ADOQuery6.Fieldbyname('978').AsFloat,ffNumber,12,2);

Вопрос. Почему после первого запуска и закрытия формы 6 запрос на форме 3 не откликается, т.е. не изменяется сумма. После второго запуска и закрытия формы 6 сумма изменяется с учетом первого запуска.
Например запросом было посчитано 80
Запустили форму 6, ввели 10 и закрыли.
Запрос всеравно показывает 80.
Запустили форму 6 второй раз, ввели 10 и закрыли
Запрос показывает 100. При последующих запусках формы 6 запрос отрабатывает правильно.
Как поправить это дело?

[evg_m]

Acsses и каждый запрос со своим connect-ом к БД? для задания соединения каждый раз используется connectionString.

Использовать общее соединение.
AdoConnectionX.connectionString:=.. ..
form6.adoquery6.connect:=formMainX. ADOConnectionX;
form3.adoquery3.connect:=formMainX. ADOConnectionX;

[eval]

evg_m это одни и теже квери, тут весь код под снос а вы про мифические соединения

[govorun1]

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

evg_m это одни и теже квери...

И что ты этим хотел сказать?

[eval]

только то что сказал
сами не видите разницу?

эта, у вас код один но почемуто раздвоен, мало того еще и не там где надо, потому вердикт один - переделать.

[govorun1]

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

только то что сказал
сами не видите разницу?

эта, у вас код один но почемуто раздвоен, мало того еще и не там где надо, потому вердикт один - переделать.

Покажи, плиз где и что раздвоено...

[eval]

в вопросе ветки, 2 кода одинакового видите?

[evg_m]

Например запросом было посчитано 80

первый запрос (вычисление суммы). Есть упоминание в коде. form3.adoquery6 видимо это (select sum(...) ... )

Запустили форму 6, ввели 10 и закрыли.

А вот и второй запрос. Ведь для ввода использован другой запрос. form6.ado??? (insert ....)?

[govorun1]

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

первый запрос (вычисление суммы). Есть упоминание в коде. form3.adoquery6 видимо это (select sum(...) ... )

Совершенно верно

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

А вот и второй запрос. Ведь для ввода использован другой запрос. form6.ado??? (insert ....)?

Нет. Для ввода использованы dbedit-ы (но это не критично). Потом adotadle Post. А потом перерисовывем запрос form3.adoquery6

В принципе твой первый ответ помог... Спасибо.

Кто нибудь, покажите что у меня и где раздвоено (из-за чего поступают рекомендации выбросить код в ХЛАМ)?

[eval]

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