Отправлено: 06.10.09 01:25. Заголовок: ? Оконная система из Clipper Tools

Кто нибудь юзал под Харбором?
Я попробовал старую Clipper5.2-программу с юзер-интерфейсом на основе CT-окон перевести под Harbour -
косячит при исполнении - ломает изображение на экране.

Подробно с картинками (скриншотами) - эдесь
http://ssmessages.by.ru/problem_02.html

Может кто знает как бороться чтобы работала как в Клипере?

P.S. Харбор брал из дистрибутива MiniGUI66

 Отправлено: 06.10.09 02:53. Заголовок: А под хХарбор не про..

А под хХарбор не пробовал перевести ?
Он как бы считается пока более совместимым с Клипером....
Я из-за этого и перешел на него...
А вообще лучше выкинуть эту функцию: ShowTime(0, 70, .f., 'w+/n')

Я ее у себя удалил сразу !

 Отправлено: 06.10.09 10:04. Заголовок: Да ShowTime можно и ..

Да ShowTime можно и отключить
Более важная беда - Alert() ломает оконную систему.
А без нее трудно.

 Отправлено: 06.10.09 10:52. Заголовок: SADSTAR2 пишет: Хар..

SADSTAR2 пишет:

цитата:

Харбор брал из дистрибутива MiniGUI66

Значит, это еще апрельская версия Harbour Compiler 1.1.0dev (SVN 2009-04-27 19:17)
Рекомендую обновить его до текущей версии Harbour Compiler 2.0.0beta3, в которой эту бяку могли уже поправить (см. протокол изменений Харбора)

 Отправлено: 07.10.09 00:16. Заголовок: пересобрал в "Ha..

пересобрал в "Harbour 2.0.0beta3 (Rev. 12493)"
все тоже самое

 Отправлено: 07.10.09 05:00. Заголовок: пересобрал в "xH..

пересобрал в "xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406)"

ShowTime() заработала как надо - выводит только в основное окно

Alert() - так же ломает существующие окна.

 Отправлено: 07.10.09 09:33. Заголовок: SADSTAR2 пишет: пер..

SADSTAR2 пишет:

цитата:

пересобрал в "xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406)"

В хХарборе, только 1.0.0 я тоже использую ALERT(). У меня он не "ломает" экран ....
Что предшествует вызову Alert() ?

 Отправлено: 07.10.09 10:05. Заголовок: Сделал тестовый прим..

Сделал тестовый пример у себя в программе - ничего не ломает.....

 Отправлено: 08.10.09 06:13. Заголовок: Может и не Alert() д..

Может и не в Alert() дело.
Почистил код - вроде работает.
А удалил переключение на нулевое окно oldWin:=wSelect(0) и потом возврат на текущее wSelect(oldWin).

В отдельном тесте тоже косячит при переключении с окна второго уровня на нулевой и обратно.

Проверь у себя. Может у меня глаз замылился - очевидного не вижу.

 Отправлено: 08.10.09 11:17. Заголовок: А я ОКНА выбросил у ..

А я ОКНА выбросил у себя из проекта....
Фигня с ними получается... Работаю просто с текущим экраном и все....
А выбросил еще в Клипере под Windows, тогда еще достали все эти косяки....

Выкидывай тоже и проблем будет меньше... Вся это псевдооконность (((( !

 Отправлено: 29.10.09 16:20. Заголовок: Добрый день! Подскаж..

Добрый день!
Подскажите пожалуйста, есть ли совместимость (или аналоги) в оконных ф-циях CT2, т.к. wopen, waclose, wselect и т.д.?

И как Ваше мнение реально ли перевести программку примерно 4mb исходников Clipper 5.01R + CT2 на Harbour с Win интерфейсом или проще создать заново на чём нибудь типа C#?

 Отправлено: 30.10.09 00:40. Заголовок: AndreyZh пишет: И к..

AndreyZh пишет:

цитата:

И как Ваше мнение реально ли перевести программку примерно 4mb исходников Clipper 5.01R + CT2 на Harbour с Win

На Win тоже можно, но для начала "перекинь" под терминалку, займет мало времени, а потом уж окошки можно рисовать на MiniGui, а алгоритмы работы с базами остается один в один рабочими (т.е. без переделок)
Все равно по времени будет быстрее чем на C#.....

 Отправлено: 30.10.09 12:12. Заголовок: AndreyZh пишет: И к..

AndreyZh пишет:

цитата:

И как Ваше мнение реально ли перевести программку примерно 4mb исходников Clipper 5.01R + CT2 на Harbour с Win интерфейсом или проще создать заново на чём нибудь типа C#?

Именно это и является главной целью проекта Harbour - портирование клиппер-приложений
Конечно, возможно все: и перенести свой проект на какой-нибудь xBase-компилятор, и переписать все на совершенно другом языке.
Речь идет о трудозатратах. Если использовать Harbour, то, конечно, прийдется разрабатывать графический интерфейс почти с нуля, к примеру, используя minigui или fivewin. Но бизнес-логика при этом сохраняется.
В сравнении с другими компиляторами семейства xBase обеспечивается большая совместимость с клиппером
Ну а насчет 4М исходников - и не такие проекты переносили.

 Отправлено: 30.10.09 15:25. Заголовок: Спасибо за ответы! ..

Спасибо за ответы!

Но конкретно:

1. есть ли в Harbour приведенные оконные ф-ции (wopen, waclose, wselect) CT2 или хотя-бы их аналоги, т.к. весь интерфейс построин на них.
2. вопрос о переводе, подразумевает Win интерфейс, т.к. в терминалке и dos нормально работает.
3. правильно ли я понимаю, что использование аппарата типа xmate освобождает от работы (скрывает) с c++ модулями, получаемыми после обработки компилятором Harbour.
4. почитав темы можно сделать вывод, что Harbour в связке dbf+ntx менее устойчив, чем Clipper в той же связке или ошибаюсь.
5. СКОРОСТЬ. В 2005 году сравнивал (серьёзный тест - чтение, добавление, изменение, удаление записей в 3 таблицах по 500 000 записей) быстродействие аналогичной (безинтерфейсной) Harbour (собирал BC 5.0) и Clipper программы на (а) отдельном ПК PIII-600/512mb, а так же в (б) сетевом режиме на 5 ПК. Программы были абсолютно идентичны. У меня получилось:

а. Harbour более, чем в 2 раза медленней
б. Harbour не потянул 5 ПК (макс 3) в смысле, что программы вылетали по ошибкам в таблицах (точно какие не помню), а на 3 ПК программы были медленнее в 5-10, чем клипперные.

Что нужно было использовать другие механизмы обслуживания файлов, другой компилятор или Harbour в то время был плохо доработан?

Извините за дилетанские вопросы! Когда писал про C#, то подразумевал связку с SQL и понятно, что изменение логики системы.

 Отправлено: 31.10.09 14:53. Заголовок: AndreyZh пишет: 3. ..

AndreyZh пишет:

цитата:

3. правильно ли я понимаю, что использование аппарата типа xmate освобождает от работы (скрывает) с c++ модулями, получаемыми после обработки компилятором Harbour.

Нет такого "аппарата типа xmate", есть просто "менеджер проекта" + мощный текстовый редактор + редактор баз данных
Нет там С++, есть просто ANSI С.

AndreyZh пишет:

цитата:

4. почитав темы можно сделать вывод, что Harbour в связке dbf+ntx менее устойчив, чем Clipper

Спорное утверждение. Учитывая мой опыт работы с Клипером с 1989 года, Клипер по Windows менее стабилен в сети, чем xHarbour !

AndreyZh пишет:

цитата:

5. СКОРОСТЬ

Я делал тесты 2 года назад, перед переходом на хХарбор. В то время я уже почти мигрировал на Аляску, но посмотрев на тесты и реализацию хХарбора - безоговорочно "ушел" на него. О чем сейчас совсем не жалею. Меня СОВСЕМ перестали "дергать" по моим программа, т.е.
1) ПОВЫСИЛОСЬ быстродействие программ в НЕСКОЛЬКО раз (см. здесь на форуме),
2) проги перестали "ВЫЛЕТАТЬ" из WINDOWS (клипер вылетал),
3) Сопровождать стало легче на разных платформах: 98 и ХР и 2000
4) Появились функции и доступ к ресурам Винды (не нужно писать типа "Выбор файла" или "Проводника" или вызов-формирование отчета в Ворде или Екселе)
5) Сетевые программы проще в настройке, чем Клиперные и самое главное - снято ограничение на ОТКРЫТИЕ БАЗ (клипер имел 255 файлов). Теперь не нужно на каждом компе делать настройки запуска программ.
И еще: у меня в сети работают 8-10 пользователей, и каждый запускает по 4-5 программ (каждая открывает по 100-150 файлов) + Ворд с десятком файлов и Екселем.... На клипере иногда просто нельзя было запустить 2 задачи, просто не хватала ресурсов...
Сейчас даже и не вспоминаю об этом !

Мои тесты быстродействия:
DBFCDX - 20 000 записей
Pentium 3/1.2Gg/512Gb/40Gb ATA
--------------------------------------------------------------------
Test programm for Clipper 5.3b

Первый тест - объединение баз в одну базу
Затрачено - 00 час. 00 мин. 09 сек.

Второй тест - условная индексация (создание 2-х индексных файлов)
Затрачено - 00 час. 00 мин. 01 сек.

Третий тест - подсчет по БД сумм по числовым полям
Затрачено - 00 час. 00 мин. 02 сек.

ВСЕГО ЗАТРАЧЕНО - 00 час. 00 мин. 13 сек.
--------------------------------------------------------------------
Test programm for xHarbourd 0.99.60

Первый тест - объединение баз в одну базу
Затрачено - 00 час. 00 мин. 06 сек.

Второй тест - условная индексация (создание 2-х индексных файлов)
Затрачено - 00 час. 00 мин. 02 сек.

Третий тест - подсчет по БД сумм по числовым полям
Затрачено - 00 час. 00 мин. 15 сек.

ВСЕГО ЗАТРАЧЕНО - 00 час. 00 мин. 24 сек.
--------------------------------------------------------------------
Test programm for Harbourd 0.44

Первый тест - объединение баз в одну базу
Затрачено - 0 час. 0 мин. 14 сек.

Второй тест - условная индексация (создание 2-х индексных файлов)
Затрачено - 0 час. 0 мин. 5 сек.

Третий тест - подсчет по БД сумм по числовым полям
Затрачено - 0 час. 0 мин. 28 сек.

ВСЕГО ЗАТРАЧЕНО - 0 час. 0 мин. 48 сек.


Еще добавление к этим тестам, когда я их начинал делать, то не знал об особенностях вывода на Терминальный экран GTWIN.
Вывод на него "ТОРМОЗИТ" работу программы, т.е. если убрать из тестов показ "бегунка" на каждую запись, то хХарбор будет БЫСТРЕЕ клипера в НЕСКОЛЬКО раз. Здесь на форуме ЭТО уже обсуждалось.
Если надо, могу выслать свои тесты и тексты программ...

 Отправлено: 31.10.09 19:04. Заголовок: Спасибо Андрей за об..

Спасибо Андрей за обстоятельный ответ!

Единственно я не проверял "элементарные" операции, а у меня было "массированное" изменение/добавление/изменение записей с болкировками + проверка целостности индексов.

Есть повод повторно провести "моё" тестирование! Какой компилятор С, формат индексов Вы используете?

 Отправлено: 01.11.09 00:49. Заголовок: xHarbour 1.0.0 + BCC..

xHarbour 1.0.0 + BCC 5.5 + DBFCDX, терминал GTWVT
На xHarbour 1.2 еще не успел перейти....

В качестве средств разработки xMate ! Освоение его много времени не займет, тем более с русской документацией !!!

 Отправлено: 02.11.09 09:35. Заголовок: Я сейчас использую x..

Я сейчас использую xHarbour 1.1.0. В июне этого года я сравнивал его скорость работы с текущими версиями xHarbour и Harbour (тест speedtst)
Результаты такие:

xHarbour 1.1.0 (сборка август 2008):

total application time: 78.94
total real time: 80.13

xHarbour (сборка июнь 2009)

total application time: 107.50
total real time: 109.66

Harbour (сборка июнь 2009)

total application time: 48.33
total real time: 49.31

Видно по тесту, что по сравнению с 2008 годом xHarbour стал работать намного медленнее
Harbour заметно (в разы !) быстрее, чем xHarbour
Так что я бы рекомендовал сейчас смотреть Harbour. И сам хочу на него "перепрыгнуть"

 Отправлено: 02.11.09 09:53. Заголовок: Еще по скорости рабо..

Еще по скорости работы. Для Windows надо не забывать про маленький трюк. Перед сборкой харбора в модуле source(src)\rtl\filesys.c в начале функции fsCommit надо вставить строки:

HB_EXPORT void hb_fsCommit( FHANDLE hFileHandle )
{
HB_THREAD_STUB
HB_TRACE(HB_TR_DEBUG, ("hb_fsCommit(%p)", hFileHandle));
/*
Working hb_fsCommit() on Windows.
Personally I'm not a fun of this because it deeply interact with
internal OS buffering scheme.
in source/rtl/filesys.c add at the beginning of function hb_fsCommit()
(line: 2467 just before HB_STACK_UNLOCK)
*/
#if defined(HB_OS_WIN_32)
hb_fsSetIOError( TRUE, 0 );
return;
#endif

 Отправлено: 02.11.09 09:57. Заголовок: AndreyZh пишет: 1. ..

AndreyZh пишет:

цитата:

1. есть ли в Harbour приведенные оконные ф-ции (wopen, waclose, wselect) CT2 или хотя-бы их аналоги, т.к. весь интерфейс построин на них.

Оконные функции tools реализованы в харборе. Если есть какие-то небольшие несовместимости, то надо писать о них разработчикам. Сам я не использую это семейство функций, так что не могу сказать о 100%-й совместимости с клиппером

 Отправлено: 02.11.09 11:50. Заголовок: Pasha пишет: Еще п..

Pasha пишет:

цитата:

Еще по скорости работы. Для Windows надо не забывать про маленький трюк

А пояснить по русски можно ?

 Отправлено: 02.11.09 12:37. Заголовок: Andrey пишет: А поя..

Andrey пишет:

цитата:

А пояснить по русски можно ?

А что непонятно ? Про этот трюк здесь неоднократно говорилось

 Отправлено: 03.11.09 22:47. Заголовок: AndreyZh пишет: 1. ..

AndreyZh пишет:

цитата:

1. есть ли в Harbour приведенные оконные ф-ции (wopen, waclose, wselect) CT2 или хотя-бы их аналоги, т.к. весь интерфейс построин на них.

В xHarbour они есть точно. По крайней мере, я при миграции своей системы складского учёта из Clipper'a на xHarbour в оконных функциях не менял АБСОЛЮТНО ничего.
Т.е. сам процесс перехода на xHarbour, собственно, теперь бы заключался в дописывании чисто xHarbour'ных кусков в соотв. директивах компилятору #ifdef __HARBOUR__ ..... #endif и линковке вместе со всем остальным кодом нескольких необходимых сишных функций (они в форуме упоминались). Тогда (полтора-два года назад) всё было несколько печальнее, т.к. не поддерживалось значительное число CT-функций и было жуткое количество багов, но опять-таки большинство оконных CT-функций (может и все - я просто не все использую, например WACLOSE() никогда не использовал) в xHarbour'е и тогда работали чётко.
Но главное - результат: одни и те же PRG-файлы используются и для клипперной компиляции, и для харборной!

 Отправлено: 04.11.09 17:56. Заголовок: Всем большое спасибо..

Всем большое спасибо!

Буду пробовать.

 Отправлено: 05.11.09 12:04. Заголовок: Pasha пишет: я срав..

Pasha пишет:

цитата:

я сравнивал его скорость работы с текущими версиями xHarbour и Harbour (тест speedtst)

Что за тест speedtst ?
Исходник можно посмотреть ?

 Отправлено: 05.11.09 13:03. Заголовок: Andrey пишет: Что з..

Andrey пишет:

цитата:

Что за тест speedtst ? Исходник можно посмотреть ?

Исходник находится в [x]Harbour\tests
Это тест всех возможных операций vm харбора, и операций rdd.
На выходе дается время выполнения каждой операции, и общее время выполнения всех тестов

 Отправлено: 08.04.10 00:21. Заголовок: Pasha пишет: Еще по..

Pasha пишет:

цитата:

Еще по скорости работы. Для Windows надо не забывать про маленький трюк. Перед сборкой харбора в модуле source(src)\rtl\filesys.c в начале функции fsCommit надо вставить строки: ........

Не совсем понял ? Харбора или хХарбора ?

А можно обойтись без сборки всего хХарбора ?
Т.е. если использую (пока) версию хХарбора 1.0.0 (из-за несовместимости пока библиотеки Prostoserdov'а с 1.2),
можно ли к себе в проект добавить отдельно исправленный этот модуль filesys.c ?

Как это скажется на работе моей системы ?

 Отправлено: 08.04.10 09:27. Заголовок: Это касается обоих х..

Это касается обоих харборов. Пересобирать их не обязательно, достаточно заменить модуль filesys в библиотеке rtl
Я неблагоприятных последствий не заметил.

 Отправлено: 08.04.10 10:06. Заголовок: Можно ли к себе в пр..

Можно ли к себе в проект просто добавить отдельно исправленный этот модуль filesys.c ?

Я же уже делал по вашей рекомендации вставку в хХарбор 1.0.0 модуля tget.prg - и ошибка пропала...

 Отправлено: 08.04.10 10:21. Заголовок: можно..

можно