Автор | Сообщение |
|
| |
Пост N: 64
Зарегистрирован: 12.11.06
|
|
Отправлено: 03.04.10 20:51. Заголовок: Помогите протестировать первую xHarbour систему
Уважаемые профи! Наконец перевёл систему на xHarbour (терминальный режим). Если не сложно помогите найти ошибки в её работе (сам уже тестил). Если есть желание, то с удовольствием приму критику в любом виде и отвечу на все вопросы. Система содержит исходный код (+ база очень крупной оптовки за 4 месяца) и варианты Clipper (нужна настройка ОС) и xHarbour (Win32) программ. Для установки скачать в любой каталог и распаковать архив. Все виды паролей - 11. Для создания индексов clipper (s_repair.bat), harbour (srepharb.bat). Справка F1 в любом режиме, инструкции в каталоге document. Для принудительного запуска st.bat (clip)/sth.bat (harb). По системе печати, если интересно - отдельно. Состав комплекса: 1. Оперативная программа. ls.exe (clip)/hls.exe (harb) 2. Администратор и бухгалтерия. la.exe (clip)/hla.exe (harb) 3. Аналитический контур. ldust.exe (clip)/hld.exe (harb) Буду очень благодарен за найденные ошибки и критику в любой форме! Скачка с учётом исправлений всех замечаний на 04.04.2010 (5.92) http://get.freesoft.ru/?id=108083
|
|
|
Новых ответов нет
, стр:
1
2
3
4
5
6
7
8
9
10
All
[см. все]
|
|
|
| |
Пост N: 80
Зарегистрирован: 23.06.08
|
|
Отправлено: 03.04.10 22:46. Заголовок: При попытке запуска ..
При попытке запуска любого clipper варианта выдаёт ошибку всех баз (после индексации и перезапуска): Скрытый текст Окно на полном экране занимает меньше половины экрана: Скрытый текст Один раз полностью упала программа, вот отчёт: error.logerror.log
|
|
|
|
| постоянный участник
|
Пост N: 1198
Зарегистрирован: 12.09.06
|
|
Отправлено: 03.04.10 22:56. Заголовок: SkyNET пишет: Окно ..
SkyNET пишет: цитата: | Окно на полном экране занимает меньше половины экрана: |
| Наверно нужно было бы ограничить экран программы ! Оператором SETMODE(25,80) или другими координатами, которые используете...
|
|
|
|
| постоянный участник
|
Пост N: 1199
Зарегистрирован: 12.09.06
|
|
Отправлено: 03.04.10 23:07. Заголовок: Для терминала GTWVT-..
Для терминала GTWVT- можно подбирать различные шрифты под различное расширение экрана 800х600, 1024х768 и т.д. ! Он лучше GTWIN ! Делал себе настройку шрифтов в программу, но так и не доделал... Если интересно, то исходники здесь : http://slil.ru/28903762
|
|
|
|
| |
Пост N: 1522
Зарегистрирован: 17.05.05
|
|
Отправлено: 04.04.10 10:26. Заголовок: AndreyZh Что бы не ..
AndreyZh Что бы не падало с Dos Error 4 , пробни такой трюк SetHandleCount(200)
|
|
|
|
| постоянный участник
|
Пост N: 367
Зарегистрирован: 27.01.07
|
|
Отправлено: 04.04.10 10:37. Заголовок: 1. DOS Error 4. 2. В..
1. DOS Error 4. 2. Выполнение программы легко прерывается нажатием Alt-C (в своих прогах я эту возможность отключаю).
|
|
|
|
| |
Пост N: 66
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 11:35. Заголовок: Огромное спасибо все..
Огромное спасибо всем за реакцию! Хотя часть замечаний не является ошибками. SkyNET цитата: | При попытке запуска любого clipper варианта выдаёт ошибку всех баз (после индексации и перезапуска): |
| Одним из "плюсов" Harbour, как обратил внимание - не нужно настраивать ОС. В случает Clipper есть небольшой геморойчик. В данном случае нужно прописать в файлы: 1. win/system32/autoexec.nt (set clipper=f:220) 2. win/system32/config.nt (files=220) Но есть и другие настройки для Clipper - подробнее можно посмотреть учебник http://www.zhsoft.nm.ru/hand_set/hand_set.htm (если у Вас FireFox, то лучше через главную страницу - не любит он NewMail.ru)/ цитата: | Окно на полном экране занимает меньше половины экрана: |
| А это уже Harbour... Вызываете свойства окна Windows/вкладка расположение/ставите высоту строки 25.... Far до версии 2.0 тоже имел данный глюк. Остальные вопросы изучу и обязательно отвечу!
|
|
|
|
| |
Пост N: 1523
Зарегистрирован: 17.05.05
|
|
Отправлено: 04.04.10 11:46. Заголовок: AndreyZh пишет: 1. ..
AndreyZh пишет: цитата: | 1. win/system32/autoexec.nt (set clipper=f:220) |
| Не помню как в Clipper 5.1 , но в 5.2e этого делать не нужно , достаточно править config.nt
|
|
|
|
| |
Пост N: 67
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 12:08. Заголовок: Andrey Спасибо! Нав..
Andrey Спасибо! цитата: | Наверно нужно было бы ограничить экран программы ! Оператором SETMODE(25,80) или другими координатами, которые используете... |
| В принципе ответил - win настройка терминального окна. цитата: | Для терминала GTWVT- можно подбирать различные шрифты под различное расширение экрана 800х600, 1024х768 и т.д. ! Он лучше GTWIN ! Делал себе настройку шрифтов в программу, но так и не доделал... |
| Обязательно буду разбираться с данными терминальными библиотеками, т.к. они позволяют сделать мышинный интерфейс. Что по размеру окон, то в дистрибутиве (не который привёл здесь) имеются шрифты, позволяющие раскрывать окна практически на полный экран при всех разрешениях экрана. В принципе в дистрибутиве есть "система печати" и его можно скачать (9 mb) http://www.zhsoft.nm.ru/demo/distrib.exe SkyNET цитата: | Один раз полностью упала программа, вот отчёт: |
| В принципе это была самая сложная проблема "брошенные рабочие области", приводил пример: sele 0 DbSetOrder(1) // Сделует вылет по 9001 ошибке. Но "Called from : PLOADROUND(791)" вылезал - видно не до конца.... Спасибо. Сейчас проверю!
|
|
|
|
| |
Пост N: 68
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 12:27. Заголовок: Что бы не падало с D..
цитата: | Что бы не падало с Dos Error 4 , пробни такой трюк SetHandleCount(200) |
| В xHarbour нет такого гемора - это чисто шутки Clipper. цитата: | Не помню как в Clipper 5.1 , но в 5.2e этого делать не нужно , достаточно править config.nt |
| У меня есть програмки под 5.2, такая же штука. Кроме правки autoexec.nt можно проблему обойти настройкой батника, т.е. делать вызовы программы, например: ls //f:220 Но об этом всегда забывали админы.... Еще одна "любимая" dos ошибка 5 - не дают полного доступа к сетевому диску... PSP цитата: | 2. Выполнение программы легко прерывается нажатием Alt-C (в своих прогах я эту возможность отключаю). |
| Есть такая возможность, но преднамеренно оставляю эту возможность и даже говорю об этом пользователям, т.к. при этом не рушатся индексы. Иначе будут закрывать "крестиком", что порождает море проблем.
|
|
|
|
| |
Пост N: 69
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 12:35. Заголовок: Исправил "отчетн..
|
|
|
|
| постоянный участник
|
Пост N: 368
Зарегистрирован: 27.01.07
|
|
Отправлено: 04.04.10 12:47. Заголовок: AndreyZh пишет: Ина..
AndreyZh пишет: цитата: | Иначе будут закрывать "крестиком", что порождает море проблем. |
| Крест можно отключить. Поищите по форуму.
|
|
|
|
|
| |
Пост N: 70
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 12:48. Заголовок: Andrey Делал себе ..
Andrey цитата: | Делал себе настройку шрифтов в программу, но так и не доделал... Если интересно, то исходники здесь : |
| Занятные возможности (некоторым надоело однообразие) - решается настройками Tame версии от 5.0... Но интересно - какое еще практическое применение Вашей программы/библиотеки? Мне кажется, что это может усложнить жизнь (мне) Попытался "погонять" тестовый пример, но мне не удалось поменять ни одной из настроек.
|
|
|
|
| постоянный участник
|
Пост N: 369
Зарегистрирован: 27.01.07
|
|
Отправлено: 04.04.10 12:52. Заголовок: AndreyZh пишет: но ..
AndreyZh пишет: цитата: | но преднамеренно оставляю эту возможность и даже говорю об этом пользователям, т.к. при этом не рушатся индексы |
| Еще как рушатся... :) Только что прервал работу hls.exe в момент сосздания индекса. При следующем запуске:
|
|
|
|
| |
Пост N: 71
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 13:30. Заголовок: PSP Еще как рушатся..
PSP цитата: | Еще как рушатся... :) Только что прервал работу hls.exe в момент сосздания индекса. При следующем запуске: |
| С этим вопросом хотелось бы сильно разобраться!!! Clipper... Лишь после 8 попытки мне удалось получить "визуально" испорченый файл! При этом вход в программу происходил без сообщений об ошибках, прога работала нормально... Ситуация порчи индекса (информации) проявилась при проверки логики la/проверки/логика, после операции ремонта всё восстановилось. xHarbour... Все попытки прервать работы (4 шт) сразу приводили к порче индексного файла и выдачей приведённого Вами сообщения. После ремонта srepharb всё восстанавливалось, в т.ч. не было ошибок! Гуру Harbour пожалуйста проясните данный вопрос - в чём проблема? В принципе программа должна обрабатывать ошибки открытия файлов не допуская системных сообщений???? ++++ В принципе породил данное разрушение, запустив ремонт при параллельно, работающей программе!!! - Это ЖП
|
|
|
|
| |
Пост N: 72
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 13:49. Заголовок: ++++ В принципе поро..
цитата: | ++++ В принципе породил данное разрушение, запустив ремонт при параллельно, работающей программе!!! - Это ЖП |
| "Мёртвому - припарка". Использовав обработчик ошибок даю соощение о разрушении файлов и рекомендацию произвести ремонт (переиндексацию). Вопрос - насколько надёжны индексы *.NTX в xHarbour?
|
|
|
|
| постоянный участник
|
Пост N: 371
Зарегистрирован: 27.01.07
|
|
Отправлено: 04.04.10 14:15. Заголовок: AndreyZh пишет: уда..
AndreyZh пишет: цитата: | удалось получить "визуально" испорченый файл! При этом вход в программу происходил без сообщений об ошибках, прога работала нормально... |
| Имхо, это - не есть хорошо. Индекс испорчен, но никто об этом не знает... Я думаю, что правильнее так: цитата: | выдачей приведённого Вами сообщения. |
| По-крайней мере, пользователь будет сразу знать, что с базой что-то не то... И я все-таки думаю, что нельзя пользователям разрешать внезапное прервание работы программы.
|
|
|
|
| |
Пост N: 73
Зарегистрирован: 12.11.06
|
|
Отправлено: 04.04.10 15:37. Заголовок: И я все-таки думаю, ..
цитата: | И я все-таки думаю, что нельзя пользователям разрешать внезапное прервание работы программы. |
| Есть ли в xHarbour средство блокирования закрытия окна Windows (блок крестика)?
|
|
|
|
| |
Пост N: 1524
Зарегистрирован: 17.05.05
|
|
Отправлено: 04.04.10 15:53. Заголовок: AndreyZh пишет: Ест..
AndreyZh пишет: цитата: | Есть ли в xHarbour средство блокирования закрытия окна Windows (блок крестика)? |
| PSP пишет: цитата: | Крест можно отключить. Поищите по форуму. |
|
|
|
|
|
| постоянный участник
|
Пост N: 372
Зарегистрирован: 27.01.07
|
|
Отправлено: 04.04.10 16:04. Заголовок: AndreyZh пишет: Ест..
AndreyZh пишет: цитата: | Есть ли в xHarbour средство блокирования закрытия окна Windows (блок крестика)? |
| При использовании терминала gtwin можно пользоваться WinAPI: цитата: | SetConsoleTitle( cTitle ) hWnd := FindWindow( cTitle ) DeleteCloseButton( hWnd ) #PRAGMA BEGINDUMP #include "hbapi.h" #include "windows.h" HB_FUNC( SETCONSOLETITLE ) { hb_retl( SetConsoleTitle( hb_parc( 1 ) ) ) ; } HB_FUNC( FINDWINDOW ) { hb_retnl( (LONG)FindWindow( NULL, hb_parc( 1 ) ) ) ; } HB_FUNC( DELETECLOSEBUTTON ) { DeleteMenu(GetSystemMenu( (HWND)hb_parnl( 1 ), FALSE), SC_CLOSE, MF_BYCOMMAND ) ; DrawMenuBar( (HWND)hb_parnl( 1 ) ) ; } #pragma ENDDUMP |
| для терминала gtWVT есть функция GTInfo(). Она в том числе умеет и "крест гасить". ЗЫ: я пользуюсь Harbour-ом. Про xHarbour точно не подскажу, надеюсь, что на этом уровне все также.
|
|
|
|
| постоянный участник
|
Пост N: 857
Зарегистрирован: 09.10.06
|
|
Отправлено: 04.04.10 16:55. Заголовок: PSP пишет: При испо..
PSP пишет: цитата: | При использовании терминала gtwin можно пользоваться WinAPI |
|
цитата: | ЗЫ: я пользуюсь Harbour-ом |
| В Harbour можно использовать стандартный вызов hb_gtInfo( HB_GTI_CLOSABLE, .f. ) и для gtWIN если его пересобрать с HB_GTWIN_USE_UNDOC_WINAPI set HB_USER_CFLAGS=%HB_USER_CFLAGS% -DHB_GTWIN_USE_UNDOC_WINAPI
|
|
|
Новых ответов нет
, стр:
1
2
3
4
5
6
7
8
9
10
All
[см. все]
|
|