Вниз
Скачать: CL | DM;

Процесс выполнения выбивает базу 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 и тоже ........
Может и проблем таких не будет :-)


 
ЮРИЙ_К ©   (2002-12-02 16:44) [3]

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

>> @andrew

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c
4-36490
kuzmich
2002-10-20 16:45
2002.12.12
Меню


1-36088
SkyN
2002-12-02 11:14
2002.12.12
Как организавать паузу, чтобы небыло эффекта


1-36206
Sergy
2002-12-04 12:41
2002.12.12
Как изменить шрифт только у одного узла TTreeView?


6-36316
Vitaliy79
2002-10-17 14:47
2002.12.12
Чтение почты


3-36037
Pan
2002-11-25 12:53
2002.12.12
INIT -> LANGDRIVER как поменять?




   Наверх