Форум » GUI » Форма, BtnTextBox, TextBox и DatePicker » Ответить

Форма, BtnTextBox, TextBox и DatePicker

Vlad04: На форме есть объекты разные, речь идет о BtnTextBox, TextBox и DatePicker, т.е объектах , имеющих свойство Field. 1)Действительно, если это поле заполнить ссылкой на символьное поле, к примеру - dogovor->NR_DOG, то при открытии формы НОМЕР договора отображается. Если поле числовое, к примеру - dogovor->SUMM , то при попытке открыть форму программа вываливается. 2) При закрытии формы, внесенные изменения никак в базе не сохраняются. Commit не помогает. Или нужно Replace выполнять ? Форма строится в Дизайнере.

Ответов - 38, стр: 1 2 All

gfilatov2002: Vlad04 пишет: А примеры с xForm ? Добавил небольшой пример для тестирования xForm Vlad04 пишет: Формат сохранения данных формы не совсем удобный - вручную его редактировать сложно Этот недостаток иногда может быть достоинством, поскольку редактирование формы будет осуществляться только средствами этой утилиты

Vlad04: Как правильно выражение Win_1.Text_1.Save записать через проперти SetProperty( "Win_1", "Text_1",.....

SergKis: Vlad04 пишет:Как правильно ... записать DoMethod("Win_1", "Text_1", "Save")


Vlad04: Ок Не понимаю я ещё это. Когда , что и почему

SergKis: Vlad04 см. MiniGui.chm в конце каждого описания есть PROPERTIES, EVENTS, METHOD

Vlad04: gfilatov2002 Добавил небольшой пример для тестирования xForm С созданием формы в утилите проблем нет. А как встроить эту форму в программу ?

fokinal21: Ткните, пожалуйста носом в вышеупомянутую утилиту xForm!!! Где она обитает? И в пример тоже...

Dima: fokinal21 Лезем в C:\MiniGUI\Doc\ChangeLog.txt там поиск по XFORM и далее видим дорогу типа C:\MiniGUI\UTILS\xForm\

SergKis: Vlad04 пишет:С созданием формы в утилите проблем нет. А как встроить эту форму в программу ? есть кнопочка 010101, которая создает myform.prg - из набранных контролов формы

Vlad04: Пример тот же. Контрол DATEPICKER подключен к базе. И если в базе поле не заполнено, он все равно кукую-то дату отображает(или текущую или предыдущей записи) . Так же нельзя почистить дату , т.е просто сделать пустой. Есть ли какие решения?

Haz: Vlad04 пишет: ак же нельзя почистить дату , т.е просто сделать пустой. Есть ли какие решения? [pre2] DEFINE DATEPICKER <ControlName> [ ID <nId> ] [ PARENT <ParentWindowName> ] COL <nCol> ROW <nRow> [ VALUE <dValue> ] [ FIELD <FieldName> ] [ WIDTH <nWidth> ] [ FONTNAME <cFontName> ] [ FONTSIZE <nFontSize> ] [ FONTBOLD < .T. | .F.> ] [ FONTITALIC < .T. | .F.> ] [ FONTUNDERLINE < .T. | .F.> ] [ FONTSTRIKEOUT < .T. | .F.> ] [ TOOLTIP <cToolTipText> ] [ BACKCOLOR <anBackColor> ] [ FONTCOLOR <anFontColor> ] [ TITLEBACKCOLOR <anTitleBackColor> ] [ TITLEFONTCOLOR <anTitleFontColor> ] [ TRAILINGFONTCOLOR <trlFontColor> ] [ RANGEMIN <dRangeMin> ] [ RANGEMAX <dRangeMax> ] [ SHOWNONE < .T. | .F.> ] [ UPDOWN < .T. | .F.> ] [ RIGHTALIGN < .T. | .F.> ] [ DATEFORMAT <cDateFormat> ] [ ONGOTFOCUS <OnGotFocusProcedure> | <bBlock> ] [ ONCHANGE <OnChangeProcedure> | <bBlock> ] [ ONLOSTFOCUS <OnLostFocusProcedure> | <bBlock> ] [ ONENTER <OnEnterProcedure> | <bBlock> ] [ HELPID <nHelpId> ] [ INVISIBLE < .T. | .F.> ] [ NOTABSTOP < .T. | .F.> ] END DATEPICKER [/pre2]

Vlad04: Понятно, но не превычно как-то

Vlad04: ComboBox Работает с Базой. DEFINE COMBOBOX Combo_OSNOVANIE ROW 400 COL 140 WIDTH 150 HEIGHT 100 ITEMS {" Устава"," от себя лично "} FONTNAME 'Arial' TOOLTIP "Основание, на котором руководит Организацией" END COMBOBOX Хотелось бы в базе сохранять значение ITEMS ( а не Value) и из базы считывать при открытии. Свойства VALUESOURCE , ITEMSOURCE вроде бы не подходят

Vlad04: Домучил Combo. Может и не все правильно - но работает с базой. 2 варианта 1-й в базе сохраняется Value 2-й - DisPlayValue Combo

Vlad04: Menu Построено в дизайнере. При загрузке программы для некоторых пользователей надо скрыть некоторые строки основного меню. Но параметры, влияющие на меню, программа получает уже после загрузки. Как нибудь можно переопределить некоторые элементы уже созданного меню?

Andrey: Vlad04 пишет: Как нибудь можно переопределить некоторые элементы уже созданного меню? Поставь в ON INIT формы функцию, а в этой функции делай что хочешь: SetProperty( ThisWindow.Name, "ЭлементМеню", "Enabled" , .F.) // блокировать объект SetProperty( ThisWindow.Name, "ЭлементМеню", "Enabled" , .T.) // разблокировать объект

Vlad04: Немного не понятно как правильно писать? Элемент меню у меня такой DEFINE POPUP "Сервис" MENUITEM "Индексы" ACTION {|| dbSelect('DBLIST'),CreaTBrows('dbList.UKS',0)} MENUITEM "Пользователи" ACTION {|| dbSelect('USERLIST'),CreaTBrows('USERList.UKS',0)} END POPUP Я хочу заблокировать ВТОРУЮ строку - MENUITEM "Пользователи"

SergKis: Vlad04 Для управления меню надо использовать свойство NAME[pre2] DEFINE MAIN MENU [ OF<ParentWindowName> ] [ DEFINE ] [ MENU ] POPUP <cPopupCaption> [ NAME <cPopupName> ] [ IMAGE <cImage> ] [ FONT <cFont> ] MENUITEM <cItemCaption> ACTION <ActionProcedureName> | <bBlock> [ NAME <MenuItemName>] [ IMAGE <cImageName> ] [ CHECKMARK <cImage> ] [ FONT <cFont> ] [ CHECKED ] [ DISABLED ] [ MESSAGE <cMessage> ] [ BREAKMENU ] .... и управлять #command ENABLE MENUITEM <control> OF <form>; => ; _EnableMenuItem ( <"control"> , <"form"> ) #command DISABLE MENUITEM <control> OF <form>; => ; _DisableMenuItem ( <"control"> , <"form"> ) #command CHECK MENUITEM <control> OF <form>; => ; _CheckMenuItem ( <"control"> , <"form"> ) #command UNCHECK MENUITEM <control> OF <form>; => ; _UnCheckMenuItem ( <"control"> , <"form"> ) где <control> значение NAME [/pre2]



полная версия страницы