Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 22.02.2014, 17:35
govorun govorun вне форума
Новичок
 
Регистрация: 30.10.2013
Сообщения: 60
Версия Delphi: delphi 7
Репутация: 10
По умолчанию медленный отклик запроса

С формы 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 запрос отрабатывает правильно.
Как поправить это дело?
Ответить с цитированием
  #2  
Старый 22.02.2014, 19:10
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Ваш вопрос содержит и ответ
Код:
ADOQUERY6.Close;
ADOQUERY6.Open;
в OnShow формы
Ответить с цитированием
  #3  
Старый 22.02.2014, 20:33
govorun govorun вне форума
Новичок
 
Регистрация: 30.10.2013
Сообщения: 60
Версия Delphi: delphi 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от Alegun
Ваш вопрос содержит и ответ
Код:
ADOQUERY6.Close;
ADOQUERY6.Open;
в OnShow формы
Тормоза были из-за наличия нескольких adoconnect....
Всем спасибо. Тема закрыта
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 12:58.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025