Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.30;
Скачать: CL | DM;

Вниз

Без темы.   Найти похожие ветки 

 
RDA ©   (2003-01-10 16:30) [0]

К примеру: главная форма - размещены компоненты DBEdit, в другом модуле DM (TDataModule) содержаться TTable, TDataSource. Как реагировать компонентам главной формы на измениие набора данных. Если запись изменилась и определенное поле равно False то как запретить ввод данных путем установления для DBEdit свойства ReadOnly равным True. На главной форме расположен грид, и изменения записей обрабатіваются через него.
Немного короче. Если расположить компоненты доступа (TTable, TdataSource) в главном модуле то все просто - обрабатываем событие OnDataChange там же, а если компоненты в отдельном модуле?


 
Val ©   (2003-01-10 16:35) [1]

что-то я не понял проблемы :(
в главном модуле пишем: uses DM;
и обращаемся DM.MyTable...


 
TTCustomDelphiMaster ©   (2003-01-10 16:38) [2]

OnDataChange


 
Соловьев   (2003-01-10 16:39) [3]

Даже если в DM расположены - принцып не меняется.


 
MsGuns ©   (2003-01-10 16:50) [4]

Ну вот у меня стакан на столе, а бутылка на подоконнике. Так что, я не могу выпить, что ли ?
А если без шуток, надо просто понять основные принципы ООП ;))


 
ЮЮ ©   (2003-01-11 07:42) [5]

>то как запретить ввод данных путем установления для DBEdit свойства ReadOnly равным True

1) Можно, конечно, главный модуль включит в uses (в implementation) модуля DM и, тем самым, получить доступ к компонентам главного модуля, но это не есть хороший стиль.

2) Достаточно поставить ReadOnly для поля набора данных (а не для DBControla) и ни в каком DBControle ни на одной форме уже не сможешь исправить его значение


 
RDA ©   (2003-01-11 09:44) [6]

>>ЮЮ по первому пункту - в этом все и дело было. Я тоже читал что это не есть хороший стиль, когда модули взаимно используют друг друга, а насчет второго пункта, спасибо - как-то не подумал.



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

Текущий архив: 2003.01.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
14-97020
Temp
2003-01-13 10:18
2003.01.30
free proxy


14-97040
Dimedrol
2003-01-08 20:57
2003.01.30
Win2000 не


14-96947
_vitek_
2003-01-11 23:24
2003.01.30
Help


4-97077
с - - + + -
2002-12-15 11:56
2003.01.30
popup menu не на delphi, а на API


14-96993
Vox
2003-01-12 15:19
2003.01.30
ОС на паскале!