Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Открыта ли форма? 
:(
    Опции темы
santilaas
Дата 31.3.2007, 09:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 322
Регистрация: 28.8.2005
Где: Блага

Репутация: нет
Всего: нет



Привет всем!!!
СУБД - Fireburd 1.5.3, язык - Delphi, средство доступа - FIBPlus

Вопрос такой: с помощью компонента pFIBErrorHandler в DataModule стараюсь обработать все ошибки БД и на некоторые из них вывести свои сообщения. 
НО!!! для 2-х форм (Form1, Form2) хочу сделать, чтобы для них выполнялся свой блок try ... except и выводились свои сообщения. Т.е., другими словами, перед тем, как выполнять проверку того, какая ошибка произошла, проверить, произошла она в Form1 или Form2 и, если ни в одной из них обработать её по-своему.
Примечание: Form1 - форма подключения, которая закрывается до загрузки главной формы,
Form2 - главная форма - не закрывается до окончания работы приложения. - притом здесь все гораздо сложнее - надо, чтобы свой блок try ... except выполнялся только при OnCreate главной формы, а на все остальные события выполнялся обработчик "onFIBErrorEvent".
Притом, где-то читал, что глобальные переменные вообще лучше не использовать. 
Хотя для Form1 я при её закрытии писал Form1:= nil, а в обработчике "onFIBErrorEvent" писал 
Код

if Form1 = nil then
 тут пошли проверки на разного рода ошибки и мои сообщения


Но как  в действительности правильно и особенно как быть с формой Form2 - подскажите, плз
Заранее спасибо!


--------------------
[
PM MAIL   Вверх
kobra
Дата 1.4.2007, 08:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 730
Регистрация: 15.6.2005
Где: Грузия, Тбилиси

Репутация: 1
Всего: 9



Код
if Form1 = nil then
верно только в том случае, если при закритии формы ползуешся камандой FreeAndNal(Form1). иначе некогда не будет выполнятся условие Form1 = nil. наверное будет правильнее проверять активна ли форма.
что касается Form2, наверное луще будет ввести паблик переменную формы и в начале процедуры OnCreate сделать его true, а в конце процедуры или блока try - false

PM MAIL   Вверх
SergeBS
Дата 2.4.2007, 09:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

Репутация: 11
Всего: 22



santilaas, 
А что, в каждой форме просто свой блок try-except-end написать нельзя?

Цитата
Притом, где-то читал, что глобальные переменные вообще лучше не использовать. 

А я например читал, что полезно иметь один модуль на все общие константы и переменные. Например чтобы хранить каталог запуска программы в одном месте и т.п. Аналогично 1 датамодулю для всех датаконтролов. А насчет полного отказа от goto там "где-то" случайно не написано ? smile
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »


 




[ Время генерации скрипта: 0.0424 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.