Процесс выполнения выбивает базу 8-(((

← →
ЮРИЙ_К © (2002-12-02 16:34) [0]

Коллеги, в чем дело , не пойму в одной форме работает в другой - говорит не могу выполнить , т.к. база закрыта, как так, она-же открыта вот что я имею
SplashFrm := TSplashFrm.Create(Application);
SplashFrm.Lab1.Caption := "Выполняется формирование, ожидайте...";
SplashFrm.Show;
SplashFrm.Update;
Case TMenuItem(Sender).Tag of
1 : begin
P_StrTbl.First; <- в этом месте выбивает

Бызы открваются на onCreate формы
.....

← →
FreeLancer © (2002-12-02 16:37) [1]

Во-первых: эха не та.

> Бызы открваются на onCreate формы

Во-вторых: какой формы? Наверняка Splash показывается раньше, чем происходит Create той самой формы.

← →
@andrew © (2002-12-02 16:40) [2]

а ты всегда делай проверку, работаешь с базой не поленись напиши if P_StrTbl.Active then ..... else P_StrTbl.Open и тоже ........
Может и проблем таких не будет :-)

>>FreeLancer
Да нет, Splash вызывается процедурой, ну формирование документа для печати внутри открытой уже форы

>> @andrew

В пошаговом отлавливаю... на этом месте "SplashFrm.Update;" база из Browse вылетает. Так самое смешное, в другой форме такая-же ситуация и все работает. Правда там базы открываются на onShow

Процесс выполнения выбивает базу 8-((( Найти похожие ветки