![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Процесс выполнения выбивает базу 8-((( [D6]
ЮРИЙ_К © (2002-12-02 16:34:00)Коллеги, в чем дело , не пойму в одной форме работает в другой - говорит не могу выполнить , т.к. база закрыта, как так, она-же открыта вот что я имею
SplashFrm := TSplashFrm.Create(Application);
SplashFrm.Lab1.Caption := "Выполняется формирование, ожидайте...";
SplashFrm.Show;
SplashFrm.Update;
Case TMenuItem(Sender).Tag of
1 : begin
P_StrTbl.First; <- в этом месте выбивает
Бызы открваются на onCreate формы
.....
ЮРИЙ_К (2002-12-02 16:44:00) [1]>>FreeLancer
Да нет, Splash вызывается процедурой, ну формирование документа для печати внутри открытой уже форы
>> @andrew
В пошаговом отлавливаю... на этом месте "SplashFrm.Update;" база из Browse вылетает. Так самое смешное, в другой форме такая-же ситуация и все работает. Правда там базы открываются на onShow
@andrew (2002-12-02 16:40:00) [2]а ты всегда делай проверку, работаешь с базой не поленись напиши if P_StrTbl.Active then ..... else P_StrTbl.Open и тоже ........
Может и проблем таких не будет :-)
FreeLancer (2002-12-02 16:37:00) [3]Во-первых: эха не та.
> Бызы открваются на onCreate формы
Во-вторых: какой формы? Наверняка Splash показывается раньше, чем происходит Create той самой формы.