Отправлено: 13.12.10 18:13. Заголовок: Переход от xhabour консольной программы к gui-интерфейсу?
Прошу помощи. Успешно перевел достаточно большой проект из Клиппера в консольный xharbour.(3 мгб текста,1800 процедур). Пользовался замечательной методикой по HBMAKE от Верченко Андрея("Перенос проекта с Clipper на xHarbour"). Теперь собрался с силами переделать мои 207 окошек и всяких tbrowse на GUI-интерфейс, но обнаружил провал в методике. Какие нулевые шаги необходимо сделать? Неужели бросать все приятные наработки с hbmake и писать для компиляции грандиозный бат.файл из среды Григория Филатова. (Да, HBmake сильно расслабляет - никаких проблем ни с какими библиотеками - пишешь и пишешь в клиппере свои дела). Несколько смущающих меня аспектов GUI (хочется побрюзжать по стариковски, 25 лет в Клиппере дают себя знать): Если переходить на minigui, то будут ли работать функции из CT2(манипуляции с файлами и обработка строковых данных). и вообще там компилятор Harbour, а не xHarbour. А фиксация размера окошек в пикселях просто повергает в панику - у пользователя отнимают возможность легким телодвижением изменить размеры шрифта и окна - под свои препочтения. Я понимаю, что теперь на экран можно втиснуть не 25, а скажем, 80 строк. но одновременнно надо выдавать каждому пользователю по микроскопу. А изменять размеры шрифта в главном меню - это целая тема на форуме. Все, брюзжания закончил. Очень надеюсь на ответ Верченко Андрея.
Спасибо за лестный отзыв. Увы, порадовать нечем, т.к. перевод на GUI очень трудозатратная вешь.... Уже год сижу и пытаюсь придумать куда податься и как сделать. У меня самого 8 мб текстов нужно переводить. Ждал от Sergey Spirin решения на Дельфи (уж больно заманчиво было получить такую красоту), но время идет, а решения нет. Хотя я понимаю, что тяжело делать ему одному такой проект. Может скинемся все кому нужно ? Еще что меня больше смущает, так это переход под Linux. Если переделать свои программы под MiniGui, то останешься тогда на Винде. Уж лучше тратить время на освоение QT http://clipper.borda.ru/?1-3-0-00000134-000-0-0-1268324616<\/u><\/a>
Т.е. хотелось бы схитрить, например подставив под меню не просто фон, а какую-нибудь фотку с удачным цветовым решением. Где-то тут, на форму я уже видел фрагмент арма продаж, с потрясающим батоном колбасы на подложке. Вот позавидовал.
Отправлено: 14.12.10 14:05. Заголовок: Все до боли знакомо!
Согласен о всеми замечаниями. Да и с проблемами уважаемого товарища знаком не по наслышке. Боролся с этим долго и сейчас борюсь. Что то действительно пришлось переписать под MiniGui. что-то совсем не на Нarbour а на CAVO28(были наработки), но это не обсуждается. С более " тяжелыми" случаями поступил поэтапно. Все это особенно напрягает, когда это надо быстро и правильно, а главное избавиться от дурацких вопросов пользователя-"... и это что Windows?!" . Так вот. 1) Этап перевел на терминал Harbour gtwin (кто- то не воспинял - нет мыши) 2) переписал процедуры menu, аchoice,getsys Tbrowse отчасти. для подключения мыши.(кое-где она подключается автоматом) . Нортоновский стиль подсказок по клавишам внизу экрана сделал типа button, чтоб нажимать можно было двойным кликом, как будто нажал клавишу (для любителей мышей). 3) перешел на терминал gtwvt. " Экран стал "ширше" а шрифт "гипче". Сделал процедуру начальной установки экрана, настраиваемую посредством конфигурационного файла почти для любого типа монитора методом тыка , путем задания параметов моды экрана и(или) выбора терминального шрифта.Сделал попутно настройку палитры типа VGAPAllete в Clipper. После перехода с HB2.0 на НB2.1 ситуация улучшилась. отказался от консольного шрифта Terminal ([хотя бы Lucida console) и почти решил проблему "микроскопа для пользователя", привыкшего видеть полноэкранный режим. Буквы нормальные, да и строк со столбцами больше благодаря манипуляциям с размерами фонтов. Кое-то остался удовлетворен, замечу переделок минимально, алгоритм почти не тронут, выгоды на лицо. Теперь о тех кого хронически тошнит от сине-белого досовского экрана, кого меньше интересует правильность и эффективность работы приложения, которые привыкли только щелкать мышью и не имеют понятия о клавишах и с молоком матери впитали неограниченную любовь кWindows интерфейсу с его рюшечками и кнопочками. В одном из случаев возникла патовая ситуация. Не важна суть - давай обертку. Программа была сложной, писалась давно и другим человеком. Что - то нужно было предпринять. 4) попробовал одну из версий перевести на терминал gtWvW. Там своя система меню мышь подключается практически автоматом. Переписал меню. Все BOX заменил открытием окна, выделенные поля кнопками, GET/SAY все как было, но только нужно пересчитывать относительные координаты. Это что-то похожее на примочку к Clipper- Fast Pro, где рамки заменялись на псевдоокна и т.п. Повезло, что предыдущий автор все BOX -ы и выдачи "раскрывашеk" перенес в стандартные утилиты и пришлось препрограммировать втолько в некоторых местах. Начало получилось быстро, но до конца все же не довел. Мало примеров, есть несуразности и ошибки в терминале и неизвестно подерживается ли он кем-то. Пробовал также gtvwg. Там есть свои плюсы и минусы и вернулся к gtwvw - может доведу до ума, если текучка не заест. А так если по быстрому - gtwvt и другой альтернативы GUI я не вижу. Хотя... иногда с нуля проще, хотя и сильно не хочется.
3) перешел на терминал gtwvt. " Экран стал "ширше" а шрифт "гипче". Сделал процедуру начальной установки экрана, настраиваемую посредством конфигурационного файла почти для любого типа монитора методом тыка , путем задания параметов моды экрана и(или) выбора терминального шрифта.Сделал попутно настройку палитры типа VGAPAllete в Clipper. После перехода с HB2.0 на НB2.1 ситуация улучшилась. отказался от консольного шрифта Terminal ([хотя бы Lucida console) и почти решил проблему "микроскопа для пользователя", привыкшего видеть полноэкранный режим.
Может скинемся все кому нужно ? Еще что меня больше смущает, так это переход под Linux. Если переделать свои программы под MiniGui, то останешься тогда на Винде.
Извините Андрей , что-то я Вас не понял . Ну когда речь шла о MiniGui было понятно - халява :)) Но если говорить о "скинемся" , то возможно слышали о FW . (http://www.fivetechsoft.com) Там есть все , что Вам нужно . Посмотрите :)))
Отправлено: 16.12.10 10:47. Заголовок: ММК пишет: Если инт..
ММК пишет:
цитата:
Если интересуют какие-то подробности или вопросы,
Поделитесь опытом перехода и работы на FW ! Хотя бы кратко. Я думаю не только мне будет интересно. Допустим, как перенести небольшой проект ? Как решается там техподдержка ? Как потом впоследствии перейти на Linux ?
А можно посмотреть исходный текст или пример по: Сделал процедуру начальной установки экрана, настраиваемую посредством конфигурационного файла почти для любого типа монитора методом тыка , путем задания параметов моды экрана и(или) выбора терминального шрифта.Сделал попутно настройку палитры.
все настройки в mem-файле в виде строковых переменных, которые я методом тыка выставляю через определенную внешнюю прогу настройки, потом запускаем приложение и смотрим что получилось на экране (параметры колонки строки отображаются в титуле оосновного окна gtwvt
головной модуль ....... // Загрузка файла конфигурации для install restore from config additive
// Настройка экрана
SETMODE(250,80) // чтоб "передернуть" экран причем нереальным размером, по другому жо.. DispScreen(@x,@y) // растяжка максимально экрана для gtwvt IF x=0.AND.y=0 // x y параметры SETMODE ( беру из mem напр K_SCR="100,33") SETMODE(250,80) // в заголовке рисую что получилось X / Y b и для отладкиэкрана методом тыка хорошо ELSE SETMODE(x,y) ENDIF SETCOLOR("12/0") // так для понта CLEAR SCREEN // в заголовке рисую что получилось X / Y b и для отладкиэкрана методом тыка хорошо hb_gtInfo(HB_GTI_WINTITLE, HB_OEMTOANSI( ARM_NAME +" Терминал ")+; HB_OEMTOANSI( "- Клиент ")+; AllTrim(Str(MaxCol()))+"/"+Alltrim(Str(Maxrow()))) .......................... // окно для терминала gtwvt Procedure DispScreen(x,y) LOCAL h,w,n LOCAL cFontName := "Terminal" // рекомендую Lucida Console особенно в HB2.1 // K_SCR уже описал K_FONT типа того K_FONT="Lucida Console,22,11" // в настройке можно комбинировать задавать только размер экрана или фонта или и того и другого // лучше получается когда K_SCR не задаем а комбинируе только с фонтом 22,10 18.9 и т. п. Memvar K_SCR,K_FONT // из config.mem K_SCR := ALLTRIM(K_SCR) IF !(Left(K_FONT,1) $ "0123456789") проверка на цифру IF (n := AT(",",K_FONT)) >0 cFontName := Left(K_FONT,n-1) K_FONT := Substr(K_FONT,n+1) ENDIF ENDIF
n := AT(",",K_SCR)
IF n =0 x := 250 ; y := 80 ELSE x := VAL(Left(K_SCR,n-1)) y:= VAL(Substr(K_SCR,n+1)) ENDIF K_FONT := ALLTRIM(K_FONT)
n := AT(",",K_FONT)
IF n =0 h := 0 ; w := 0 ELSE h := VAL(Left(K_FONT,n-1)) w := VAL(Substr(K_FONT,n+1)) ENDIF
// раньше это работало Clipper но на этом я не акцентирую внимание Function Vpalette() Local i IF TYPE("VPalette")=="C" FOR i:=0 to 15 IF i*6+1>LEN(VPalette) .OR.; SUBSTR(VPalette,i*6+1,6)==" " //VgaPalette(i)
1. Вас не затруднит ответить - на каком инструменте реализовано?
Xharbour + FiveWin
AndreyZh пишет:
цитата:
2. Если на (x)Harbour + lib, то поделиться исходными текстами,
Примеры есть в Samples (Fivewin) , сам только начал это дело изучать ;) На самом деле не так все сложно , конечно порой возникают вопросы но они решаемы . По началу будет сложно..... Я уже начал потихонечку переводить WVT задачку на FW , красота получается (если надо могу пару тройку скринов для сравнения выложить).
Xharbour + FiveWin....Примеры есть в Samples (Fivewin) , сам только начал это дело изучать ;) На самом деле не так все сложно , конечно порой возникают вопросы но они решаемы . По началу будет сложно..... Я уже начал потихонечку переводить WVT задачку на FW , красота получается (если надо могу пару тройку скринов для сравнения выложить).
Доброе утро! Кто может - ответьте пожалуйста на ряд вопросов:
1. FW - платная библиотека, но как понимать "без денег" на некоторые библиотеки? Какие у них ограничения? Какие ограничения по использованию? 2. Как бы просто подключаются *.lib, т.е. нет "рисовалки формочек"? 3. Может быть есть документ типа "быстрый старт"?
Кроме того по xHarbour было "обвинение" в глючности среды разработки и графического интерфейса... Нельзя ли чуть подробнее по данной теме - вариант то же привлекательный, ведь поучиться можно на демо-поставке, а если покупать, то довольно недорого?
Здравствуйте! 1. Как уже говорил Pasha, fwh 6.12 (версия декабря 2006 г.) ПОЛНОСТЬЮ бесплатна. Никаких ограничений 2. «Рисовалки формочек» - каждому «на вкус и цвет». Начиная со старенького Borland Resource Workshop, до любого софта, кот. редактирует *.rc или *.dll. 3. В fwh конечно доки есть, но все-таки для быстрого старта и создана куча маленьких примеров в дире SAMPLES с демонстрацией множества возможностей. А вообще для самого начала – на сайте FWH http://www.fivetechsoft.com/english/fwh.html<\/u><\/a> как инсталировать и настраивать батники для сборки.
1. Вас не затруднит ответить - на каком инструменте реализовано? 2. Если на (x)Harbour + lib, то поделиться исходными текстами,
Да , это FWH + xHarbour. Поделиться можно , только это "картинка" одна из множества достаточно есмкой задачи "кадровый учет". Есть и друе задачи ( картинки)..... А Вам что нужно?
2. «Рисовалки формочек» - каждому «на вкус и цвет». Начиная со старенького Borland Resource Workshop, до любого софта, кот. редактирует *.rc или *.dll.
То есть, в отличии от Visual xHarbour инструмента нет?
Где взять "sample" - в скачанном варианте "без денег" их не увидел?
цитата:
По поводу глючности xHarbour, - кто без грешков? Я работаю уже лет 7 (именно xHb+FWH) Прямо уж особой глючности не видел…
По поводу "глючности" и то, что Вы "не увидели"... При желании посмотрите "мои темы" - лень их снова перечислять, но возможно сделаю справку, что бы "начинающим" типа меня проще было их обходить.
Но замечание было по среде Visual xHarbour и очень бы хотелось узнать некоторые "глюки" до начала пользования, а не воевать с ними, когда их "находят" пользователи.
Отправлено: 27.12.10 11:01. Заголовок: ММК пишет: Да , это..
ММК пишет:
цитата:
Да , это FWH + xHarbour. Поделиться можно , только это "картинка" одна из множества достаточно есмкой задачи "кадровый учет". Есть и друе задачи ( картинки)..... А Вам что нужно?
Спасибо! Если не сложно любой "законченный" пример с батниками, имеющий грид с подчинённой таблицей, типа список работников -> подчинённый список приказов по работнику. ИЛИ вообще любое "окошко" с *.bat и комментрированным исходником.
ИЛИ вообще любое "окошко" с *.bat и комментрированным исходником.
#include "FiveWin.ch" // комментарии вроде не нужны function Main() local oWnd DEFINE WINDOW oWnd FROM 0, 0 TO 300, 400 PIXEL ; TITLE "Hello" ACTIVATE WINDOW oWnd MAXIMIZED return nil
Батник
@ECHO OFF CLS if A%1 == A GOTO :SINTAX if NOT EXIST %1.prg GOTO :NOEXIST
ECHO Compiling...
if "%FWDIR%" == "" set FWDIR=d:\h\fw if "%XHDIR%" == "" set XHDIR=d:\h\x if "%2" == "/b" set GT=gtwin if not "%2" == "/b" set GT=gtgui
set hdir=%XHDIR% set hdirl=%hdir%\lib set bcdir=c:\bcc55 set fwh=%FWDIR%
rem uncomment this line to use the debugger and comment the following one if %GT% == gtwin %bcdir%\bin\ilink32 -Gn -Tpe -s -v @b32.bc IF ERRORLEVEL 1 GOTO LINKERROR if %GT% == gtgui %bcdir%\bin\ilink32 -Gn -aa -Tpe -s -v @b32.bc IF ERRORLEVEL 1 GOTO LINKERROR ECHO * Application successfully built * %1 GOTO EXIT ECHO
То есть, в отличии от Visual xHarbour инструмента нет?
Совершенно верно! Встроенного инструмента нет.
цитата:
Где взять "sample" - в скачанном варианте "без денег" их не увидел?
Извиняйте! Значит Линарес все-таки обрезал "свободный" вариант. В всех стандартных поставках примеры и исходники языка есть... :(
цитата:
Но замечание было по среде Visual xHarbour и очень бы хотелось узнать некоторые "глюки" до начала пользования, а не воевать с ними, когда их "находят" пользователи.
Где взять "sample" - в скачанном варианте "без денег" их не увидел?
Как это нет ? Я правда смотрел fwh612 давно, больше года назад, но тогда там были папки manual и sample.
Кстати, не забывайте, что библиотеку fiveh/fivehx желательно пересобрать используемым компилятором [x]harbour, поскольку в той, что есть в поставке, может использоваться другая версия пи-кода
Отправлено: 27.12.10 12:53. Заголовок: AndreyZh пишет: и п..
AndreyZh пишет:
цитата:
и по xHarbour более подробных объяснений:
Andrey пишет: цитата: Переходить на Visual xHarbour не советую. Я пробовал, глючный дизайнер, поддержка только на английском и даже не ответили, 3-раза писал.
Может я не понял вопроса, но причем тут Visual xHarbour? Visual xHarbour - это отдельный продукт, создаваемый разработчиками коммерческого xHb. Хороших отзывов о нем я лично нигде не видел. А Fwh - это Гуй для (x)Harbour как бесплатного, так и коммерческого.
Всем спасибо! Но хотелось пример сложнее "Hello World" и по xHarbour более подробных объяснений:
Самый простой и , наверное , информативный пройтись по форуму. Там и тексты и картинки...
Ну вот Вам примерчик посложнее ( с картинкой :) ) . Попутно здесь можно увидеть , как в исходник вставляются сишные модули ( при необходимости) Извините, не знаю как делать скрытый текст поэтому все подряд.... #include "FIVEWIN.ch" #include 'xbrowse.ch'
Отправлено: 28.12.10 17:30. Заголовок: inik296 Я давно раб..
inik296 Я давно работаю в связке xHarbour + miniGUI + xMate. Так, что говорить о том, что miniGUI заточена только под Harbour - это не так. Я использую последнюю версию miniGUI и xHarbour. Конечно от консольного варианта если отказываться, то не спеша и постепенно (переводя отдельные законченные блоки и т.д.)
Отправлено: 30.12.10 16:25. Заголовок: inik296 пишет: Уже ..
inik296 пишет:
цитата:
Уже 2 дня тюкаю эти 54 строки - немного паникую. Ощущение- как в болоте с завязанными глазами.
Вы молодец ! :) Напишите мне письмо , так будет проще. mkizev====mail.ru До Нового Года не обещаю , а после 1 го обязательно помогу. У Вас все получится - УДАЧИ Вам ! :))))
Уважаемые господа! Помня, что "тощая корова ещё на газель" можно услышать критические замечания по подходам/системам создания "современного" интерфейса:
1. Fivewin - в принципе мои пробы обнаружили те же грабли, что и у inik296? 2. Visual xHarbour - вроде удобно и всё есть, но Andrey бросил критическое замечание (без конкретизации), а конкретнее в чём глюкавость? 3. miniGui - даже бесплатно, но раннее не получилось "подружить" с xHarbour даже на многих приложенных примерах, да и интерфейс получался какой-то "пещерный".
Кроме того... очень хочется услышать мнение MMK от том насколько проще или сложнее создавать Gui в программах clipper стиля?
1. Fivewin - в принципе мои пробы обнаружили те же грабли, что и у inik296?
Простите, а разве есть какие-то грабли ? Что за проблемы у inik296 ? С hb_parnvi, что ли ? Так это не проблема fw, это связано с небольшим различием api Harbour и xHarbour. MMK дал пример для Harbour. а inik296 пытался собрать его с помощью xHarbour. Я подсказал, как решить этот маленький вопрос, а если бы этого не сделал - подсказал бы MMK. Это не проблема fw, а проблема со сборкой стороннего тестового примера, и не более того. Поблема с ace32 ? Так это тоже не касается fw никоим образом. Если ads не используется, то из батников сборки надо выбросить ace32 и rddads, и делов то. Перед тем, как вы беретесь использовать fw, прежде всего убедитесь, что Ваша версия [x]Harbour с ним совместима. Лучше всего вообще пересобрать библиотеку fiveh[x].lib. Это же все модули prg. Их исходники даются, и сборка этой библиотеки - довольно тривиальная задача. Напишите батник для сборки одного модуля, и вызывайте его для всех prg Что касается alert.prg, то что это такое ? В samples есть пример с таким именем, но строки 65 (на которой возникает ошибка) в нем нет. Там всего 23 строки. А, это наверное пример MMK. Тогда ошибка связана с тем, что MMK дал пример для fw старше 612, а inik296 собирал его с помощью fwh 612. Include у них отличаются, в более поздних версиях fwh у команд появились новые опции. Так попробуйте собрать примеры из папки samples именно той версии fwh, которая используется. Это все проблемы начального уровня. Было бы желание - они легко преодолеваются.
2. Visual xHarbour - вроде удобно и всё есть, но Andrey бросил критическое замечание (без конкретизации), а конкретнее в чём глюкавость?
Во первых нужно потратить время на освоение Visual xHarbour. Во вторых у меня были проблемы со сборкой картинок в ресурс и выводом их на форме. Я потратил много времени на тривиальную задачу - писал на форум, результата не было. В новой версии через полгода, это исправили. А мне что опять новую версию ПОКУПАТЬ ? Вот эти САМЫЕ грабли и есть !!!
AndreyZh пишет:
цитата:
3. miniGui - даже бесплатно, но раннее не получилось "подружить" с xHarbour даже на многих приложенных примерах,
Я пробовал. У меня работает. Почитай мою инструкцию по сборке.
AndreyZh пишет:
цитата:
да и интерфейс получался какой-то "пещерный".
Согласен. Но задачки нормальные получаются ! Надеюсь красоту сделают позже.... Правда еще не разобрался как делать задачи под различное разрешение экрана - 800х600, 1024х780 и т.д.
Рабочая сборка минигуи 90 + хХарбор 1.21 лежит на английском форуме по адресу:
Простите за наглость... Но нет ли ресурса для скачки без двух регистраций (в yahoo и для скачки)? Устал со спамом и присылаемыми вирусами воевать.
Andrey пишет:
цитата:
Я пробовал. У меня работает. Почитай мою инструкцию по сборке.
Читал, делал по ней, устанавливал tasm, правил батники и так далее... Добился сборки 70% тестовых примеров - поигрался на том, что можно было поменять. Pasha - пожалуйста на ругайся, но это "не моё"... Мне нужен инструмент решения бизнес задач по максимуму комфортный и простой для использования, а развлекаться со сборками/правками исходников/нахождении и обхождении глюков большой радости не доставляет.
Andrey пишет:
цитата:
В новой версии через полгода, это исправили. А мне что опять новую версию ПОКУПАТЬ ?
Это любопытно! Кто нибудь знает: 1. Правила поддержки покупателей системы xHarbour, когда и за что они хотят денег? В чём ограничения демо версии? 2. Фраза "без денег", но не freeware у Fivewin - что она означает?
Да разве же я ругаюсь ? Я это, того, пытаюсь подсказать направление. Помнится, Вы что-то подобное говорили по поводу Харбора. Но ведь преодолели себя ? Собрали свою систему ? Все то же самое касается переделки интерфеса под гуи. Выбирайте что угодно, к чему душа лежит, и не бойтесь трудностей. Трудности - это временное, они успешно преодолеваются, иначе и быть не может.
Все даты в формате GMT
3 час. Хитов сегодня: 310
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет
или делают апдейт текущей. 
- участник сейчас на форуме
- участник вне форума