sokol_с меню разобрался , а вот с модальными формами туго что то, не могли бы примерчик привести или ссылочку дать,
как всётаки организовать "вход и выход"? Как фильтровать данные из модального окна.
Пока модальное окно работает, другие окна стоят - это факт. Значит главное назначение модального окна - чего то запросить по требуемым данным и вернуть результат. В итоге например у нас модальное окно занимается построением строки фильтра для DataWindow. Ему нужно передать ссылку на DataWindow, на выходе вернуть код успешности выполнения операции. Делаем модальное окно w_Find, в нем прописываем локальные переменные dw_Find и str_Find:
1.
private DataWindow dw_Find
private string str_Find
на событие формы Open получаем переданный DataWindow и его текущий фильтр:
1.
2.
3.
4.
// Получаем DataWindow
dw_Find = Message.PowerObjectParm
// Получаем для него текущую строку фильтра
str_Find = dw_Find.Describe( 'DataWindow.Table.Filter' )
Далее идет собственно процесс построения фильтра с занесением его строки в str_Find. На событие кнопки Ok вешаем выполнение фильтра, закрытие формы с возвратом успешности выполнения:
1.
2.
3.
4.
5.
// Выходим, если не получилось установить фильтр
if dw_Find.SetFilter( str_Find ) = - 1 then return
if dw_Find.Filter() = - 1 then return
// Закрываем форму
CloseWithReturn( Parent, 1 )
На событие кнопки Cancel вешаем выход с возвратом отказа:
CloseWithReturn( Parent, - 1 )
Форма готова к использованию. Теперь вызовем ее с формы для построения фильтра:
1.
2.
3.
4.
// Вызываем форму построения фильтра
OpenWithParm( w_Find, dw_1 )
// Получаем результат
if Message.LongParm = 1 then MessageBox( 'Отлично', 'Фильтр выполнен', Information! )
Форма выбора фильтра получилась независимой. При желании можно сделать еще более красиво - наследуемся от базового контролса DataWindow и создаем собственный обьект u_dw. В нем создаем новый метод "
FilterFromDialog (): integer ", в который и переносим этот код. Теперь вместо базового DataWindow достаточно на форму шлепнуть собственный и в любой момент вызывать FilterFromDialog() :)
sokol_P.S. поверьте, ну заставили программиста на .Net изучить PB, книг нет , примеров тоже, просто жуть :)
Странно честно говоря - в ДотНете все что я описал вообще на первом месте стоит - главное там правильное проектирование приложения, с созданием наследуемых контролсов и форм, там фактически даже DataSet-ы генерятся в проект как классы и могут далее наследоваться для дальнейшего расширения. Видимо Вы недавно работаете с ним и пока занимаетесь киданием компонентов на формочки :) В этом плане на PB Вам придется учиться мыслить правильно, заодно и в .NET потом здорово пригодиться, для которого кстати есть возможность использовать PB DataWindow через специальный для него компонент DataWindow.NET .
