Автор | Сообщение |
Pasha
|
| Администратор
|
Пост N: 2561
Зарегистрирован: 23.05.05
|
|
Отправлено: 27.11.12 19:48. Заголовок: hwgui
Что-то я совсем запутался Сделал svn commit по адресу: https://hwgui.svn.sourceforge.net/svnroot/hwgui Последний коммит был 2012-09-25 19:30 UTC-0300 Luis Fernando Basso <lfbasso at via-rs.net> На сайте проекта и в майл-листе вижу, что коммиты были и после этой даты. Но что-то не найду новый адрес А ветвь, куда я сбросил изменения, заморожена и не развивается ?
|
|
|
Ответов - 300
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
All
[только новые]
|
|
Vlad04
|
| постоянный участник
|
Пост N: 367
Зарегистрирован: 13.10.05
|
|
Отправлено: 22.07.13 17:40. Заголовок: Да, виноват. Как ни ..
Да, виноват. Как ни странно, оказывается я его смотрел, раньше и подзабыл( большие перерывы в обновлении системы hwg). Т.е. файл, как я понял, не имеет прямого отношения к GUI интерфейсу. А в чем он создается ? Ручками в редакторе?
|
|
|
AlexMyr
|
| |
Пост N: 905
Зарегистрирован: 11.06.10
|
|
Отправлено: 22.07.13 23:37. Заголовок: Vlad04 пишет: Т.е. ..
Vlad04 пишет: цитата: | Т.е. файл, как я понял, не имеет прямого отношения к GUI интерфейсу. А в чем он создается ? Ручками в редакторе? |
| напоминаю, на стр. 7 alkresin пишет: цитата: | AlexMyr пишет: цитата: А конфигурационные файлы Вы просто в редакторе набираете или есть утилита для этого? |
| В редакторе.
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 368
Зарегистрирован: 13.10.05
|
|
Отправлено: 24.07.13 08:01. Заголовок: Пример demomaximiz..
Пример demomaximize.prg из папки samples пытаюсь повторить в Дизайнере. Только вместо меню кнопочки сделал ( но это , думаЮ не принципиально) . Кнопка MaximiZe На событие onClick написал действие oForm:Maximize(). Получаю ошибку цитата: | Error BASE/1004 Message not found: HFORMTMPL:MAXIMIZE Called from ->__ERRRT_SBASE(0) Called from ../../../tobject.prg->HFORMTMPL:ERROR(0) Called from ../../../tobject.prg->(b)HBOBJECT(0) Called from ../../../tobject.prg->HFORMTMPL:MSGNOTFOUND(0) Called from ../../../tobject.prg->HFORMTMPL:MAXIMIZE(0) Called from source\winapi\hfrmtmpl.prg->(b)COMPILEMETHOD(495) Called from source\winapi\hwindow.prg->ONCOMMAND(516) Called from source\winapi\hwindow.prg->(b)HMAINWINDOW(231) Called from source\winapi\hwindow.prg->HMAINWINDOW:ONEVENT(317) Called from ->HWG_ACTIVATEMAINWINDOW(0) Called from source\winapi\hwindow.prg->HMAINWINDOW:ACTIVATE(306) Called from source\winapi\hfrmtmpl.prg->HFORMTMPL:SHOW(392) Called from source\winapi\hfrmtmpl.prg->(b)HFORMTMPL(135) Called from source\winapi\hfrmtmpl.prg->HFORMTMPL:SHOWMAIN(0) Called from MaxMin.prg->MAIN(6) HWGUI 2.18 Build 1 Date:07/24/13 Time:10:25:31 |
| Все режимы работы с окном не работают, кроме последнего - ОКНО закрывается.
|
|
|
AlexMyr
|
| |
Пост N: 906
Зарегистрирован: 11.06.10
|
|
Отправлено: 24.07.13 08:29. Заголовок: Vlad04 пишет: Приме..
Vlad04 пишет: цитата: | Пример demomaximize.prg из папки samples пытаюсь повторить в Дизайнере. |
|
пробуйте <?xml version="1.0" encoding="UTF-8"?> <part class="form"> <style> <property name="Geometry">{417,204,421,140}</property> <property name="Name">[odlg]</property> <property name="Caption">[Form1]</property> <property name="FormType">[dlgModal]</property> <property name="lClipper">.F.</property> <property name="lExitOnEnter">.F.</property> <property name="lDebug">.F.</property> <property name="FromStyle">[Popup]</property> <property name="Icon">[]</property> <property name="Modal">.F.</property> <property name="SystemMenu">.T.</property> <property name="Minimizebox">.F.</property> <property name="Maximizebox">.F.</property> <property name="AbsAlignent">.T.</property> <property name="SizeBox">.T.</property> <property name="Visible">.T.</property> <property name="3DLook">.F.</property> <property name="Clipsiblings">.F.</property> <property name="Clipchildren">.F.</property> </style> <part class="ownerbutton"> <style> <property name="Geometry">{70,35,109,28}</property> <property name="Name">[oOwnerbutton1]</property> <property name="Caption">[maximize]</property> </style> <method name="onClick"> <![CDATA[odlg:maximize() ]]> </method> </part> <part class="ownerbutton"> <style> <property name="Geometry">{180,35,109,28}</property> <property name="Name">[oOwnerbutton2]</property> <property name="Caption">[exit]</property> </style> <method name="onClick"> <![CDATA[odlg:close() ]]> </method> </part> </part>
|
|
|
alkresin
|
| moderator
|
Пост N: 693
Зарегистрирован: 06.07.06
|
|
Отправлено: 24.07.13 09:28. Заголовок: Vlad04 пишет: На со..
Vlad04 пишет: цитата: | На событие onClick написал действие oForm:Maximize() |
| oForm - это не окно, а объект, содержащий описание созданной в дизайнере формы, у него нет метода Maximize() и т.п. Как написал выше Алексей, вам надо использовать oDlg, именно эта переменная указывает на созданное в форме окно.
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 369
Зарегистрирован: 13.10.05
|
|
Отправлено: 24.07.13 10:01. Заголовок: Все хорошо! Спасибо..
Все хорошо! Спасибо
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 374
Зарегистрирован: 13.10.05
|
|
Отправлено: 25.07.13 12:28. Заголовок: Пытаюсь построить b..
Пытаюсь построить brows . За основу беру пример - browse_4.prg. В дизайнере рисую место-положение brows, присваиваю имя. А дальше , я хотел бы , как в примере browse_4, описать brows в программнике. Пишу цитата: | #include "hwgui.ch" #include "dbstruct.ch" #include "windows.ch" #include "guilib.ch" #include "Directry.ch" #xcommand TRY => BEGIN SEQUENCE WITH s_bBreak #xcommand CATCH [<!oErr!>] => RECOVER [USING <oErr>] <-oErr-> #xcommand FINALLY => ALWAYS static s_bBreak := { |oErr| break( oErr ) } Function Main Local nAdd_Code:=0 lOCAL cCmb1,nCmb2 PUBLIC sPAR1:="" ,mMKB:={},mTarif_Type:={0,1},mLeveL:={1,2},mADD:={},mSpec:={} Private oDlg,oBrw1 Private sPar1:=DISKNAME() +':\'+CURDIR()+'\',oExcel REQUEST DBFCDX , DBFFPT REQUEST HB_CODEPAGE_RU1251 SET DELETED ON SET DATE BRITISH SET CENTURY ON SET EPOCH TO year(Date()) -90 //1925 Select 0 Use (sPar1+"Data\PRICE_S.DBF") Via "DBFCDX" alias Price_s *--------------- oBrw1:alias := "Price_s" oBrw1:aColumns := {} ADD COLUMN FieldBlock(Price_s->(Fieldname(1)) ) TO oBrw1 ; HEADER '№1'; LENGTH 6 ; EDITABLE ; JUSTIFY HEAD DT_CENTER ; JUSTIFY LINE DT_RIGHT .... oForm := HFormTmpl():Read(sPar1+ "Xml\Tarif.xml" ) oForm:ShowMain() Return Nil |
| Не работает, получаю сообщение об ошибке : - Alias, aColumns и т.д. Еще пробовал несколько подобных вариантов
|
|
|
AlexMyr
|
| |
Пост N: 908
Зарегистрирован: 11.06.10
|
|
Отправлено: 25.07.13 12:48. Заголовок: Vlad04 пишет: Пытаю..
Vlad04 пишет: бросьте сюда файлы, чтоб посмотреть что вы делаете.
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 375
Зарегистрирован: 13.10.05
|
|
Отправлено: 25.07.13 13:13. Заголовок: Brows..
|
|
|
AlexMyr
|
| |
Пост N: 909
Зарегистрирован: 11.06.10
|
|
Отправлено: 25.07.13 13:42. Заголовок: Proc Brws_Init() зам..
Proc Brws_Init() заменить на Proc Brws_Init(obrw1) в xml для browse init: Parameters oCtrl Brws_Init(oCtrl) //oBrw1:Refresh() пробуйте.
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 376
Зарегистрирован: 13.10.05
|
|
Отправлено: 26.07.13 11:55. Заголовок: Brows отображается...
Brows отображается.!!! Это что за параметр, вроде нигде не объявлял. И еще как получить значение элемента комбобокса?
|
|
|
|
AlexMyr
|
| |
Пост N: 910
Зарегистрирован: 11.06.10
|
|
Отправлено: 26.07.13 12:05. Заголовок: Vlad04 пишет: Это ч..
Vlad04 пишет: цитата: | Это что за параметр, вроде нигде не объявлял. |
|
В окне редактора есть пункт Parameters, при выборе которого вставляется строка "Parameters oCtrl" там где можно, и дальше можна манипулировать oCtrl вместо имени объекта. Vlad04 пишет: цитата: | И еще как получить значение элемента комбобокса? |
|
В object inspector установите параметер для varName, вот его и смотрите.
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 377
Зарегистрирован: 13.10.05
|
|
Отправлено: 26.07.13 13:02. Заголовок: В object inspector ..
цитата: | В object inspector установите параметер для varName |
| Установлено , переменная -cCmb1. Элементы комбокса я заполняю присваивая значения массива - cCmb1:aItems:=mMkb. Далее.. Пользователь выбрал элемент комбокса. Как получить: - позицию , которую выбрали - значение выбранной позиции Вроде GetValue() что-то должна возвращать. Но получаю ошибку
|
|
|
AlexMyr
|
| |
Пост N: 911
Зарегистрирован: 11.06.10
|
|
Отправлено: 26.07.13 14:45. Заголовок: Vlad04 пишет: Польз..
Vlad04 пишет: цитата: | Пользователь выбрал элемент комбокса. Как получить: - позицию , которую выбрали - значение выбранной позиции |
| посмотрите пример hwgui\utils\designer\samples\testget1.xml
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 378
Зарегистрирован: 13.10.05
|
|
Отправлено: 28.07.13 09:55. Заголовок: Вообщем, модефициров..
Вообщем, модефицировал пример - samples , под мои условия , все работает. Значение Varname - это индекс в массиве, oCombo:aItems[cm] - это значение выбранной позиции. Но повторить на моем примере не удается. Может это то же связано с формами - у меня главная , здесь подчиненная? Samples измененный
|
|
|
AlexMyr
|
| |
Пост N: 912
Зарегистрирован: 11.06.10
|
|
Отправлено: 29.07.13 09:13. Заголовок: Vlad04 пишет: Но по..
Vlad04 пишет: цитата: | Но повторить на моем примере не удается. |
|
Если вы про Tarif, то у вас там есть объект oCombobox1 и переменная cCmb1 и этой cCmb1 вы присваиваете массив cCmb1:aItems:=mMkb, а свойство aItems есть у oCombobox1 и поэтому лучше в методе onInit для комбобокса написать след. Parameters oCtrl cCtrl:aItems:=mMkb Еще раз внимательно посмотрите на Name и VarName в samples и у себя в примере.
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 379
Зарегистрирован: 13.10.05
|
|
Отправлено: 29.07.13 13:03. Заголовок: Да , программка Tar..
Да , программка Tarif Привел наименование переменных , как в samples .: т.е. Name - oCombo, VarName - cm. Прогграмма получилась почти рабочей при следующих назначениях Комбобокс получает значения следующим образом цитата: | Parameters cm cm:aItems:=mMkb |
| Выбраное значение (по событию чек Фильтр) я получаю , как цитата: | Local sStr:='' sStr:="cCmb1 MKB - "+ cm hwg_Msginfo('sStr = '+sStr) |
| Что совсем не так как в основном Примере- samples. Осталось проверить в моей программе открытие подчиненной формы. Tarif_130729
|
|
|
AlexMyr
|
| |
Пост N: 913
Зарегистрирован: 11.06.10
|
|
Отправлено: 29.07.13 17:06. Заголовок: Vlad04 пишет: Tarif..
Vlad04 пишет: в oCombo cсвойство lText поставить false, затем в Proc StazFiltr() надо не cm а str(cm), т.к. cm в данном случае числовой тип, и return NIL заменить на return .T.
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 381
Зарегистрирован: 13.10.05
|
|
Отправлено: 30.07.13 06:05. Заголовок: Заключение. Поэкспер..
Заключение. Поэксперементировал еще раз с samples. Разместил на главной форме Комбобокс. Если данные загружены а Дизайнере , то разницы нет, где находится Комбобокс - на главной форме или подчиненной. Если данные подгружаются из массива, то почему то нужно загрузку делать через VarName для главной формы с передачай параметров ,а для подчинееной формы через имя объекта Name ,без передачи параметров.Вряд ли это так задумывалось(т.е. разное поведение в зависомости от вида формы).
|
|
|
Vlad04
|
| постоянный участник
|
Пост N: 382
Зарегистрирован: 13.10.05
|
|
Отправлено: 30.07.13 06:08. Заголовок: samples Здесь нескол..
samples Здесь несколько переименованных файлов example.xml, example2.xml,example3.xml с вариантами анализа
|
|
|
Ответов - 300
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
All
[только новые]
|
|