Автор | Сообщение |
Andrey
|
| постоянный участник
|
Пост N: 1929
Зарегистрирован: 12.09.06
|
|
Отправлено: 15.11.11 21:36. Заголовок: Примеры из Минигуи -ошибки, вопросы..... (продолжение)
Всем привет. Взялся смотреть примеры из МиниГуи, так не все работают. Может кто подскажет что там "допилить" нужно ? А заодно может и исправить и добавить новые.... Очень красочный пример: \MiniGUI\SAMPLES\Advanced\AVI_Animation - не работает под Win7 (наверно AVI-шки нет в ресурсах) Предложение Григорию: Можно ли добавить еще один пример с отдельным AVI-файлом в ресурсах проекта и показом такого же бегунка ? Пример: \MiniGUI\SAMPLES\Advanced\Tsb_filter - вылетает на ХР -------------------------------------------------------------------------------- Harbour MiniGUI Errorlog File Harbour MiniGUI Extended Edition 2.0.1 - 2011.09.21 -------------------------------------------------------------------------------- Date: 11/15/2011 Time: 22:13:24 Error BASE/1124 Argument error: LEFT Called from LEFT(0) Called from SCANSOFT(195) Called from MAIN(84) Пример: \MiniGUI\SAMPLES\BASIC\MsgEdit - не собирается... Z:\MiniGUI\SAMPLES\BASIC\MsgEdit>call ..\..\..\batch\compile.bat demo /L shell32 Harbour 3.1.0dev (Rev. 17042) Copyright (c) 1999-2011, http://harbour-project.org/ Compiling 'demo.prg'... Lines 20133, Functions/Procedures 30 Generating C source output to 'demo.c'... Done. Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland demo.c: Error E2141 demo.prg 993: Declaration syntax error *** 1 errors in Compile *** C compile error.
|
|
|
Ответов - 300
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
All
[только новые]
|
|
Andrey
|
| постоянный участник
|
Пост N: 4288
Зарегистрирован: 12.09.06
|
|
Отправлено: 21.06.15 16:51. Заголовок: Dima пишет: Перечис..
Dima пишет: цитата: | Перечисление функций в скобках видимо не прокатит. |
| Прокатывает ! Если объём файлов в проекте 450Кб то собирается... Если большой проект: 2Мб - не собирается. Простое копирование файлов из одной паки в другую. 4 файла не компилируются после вставки в большой проект. Вот хоть тресни. Это 1-я беда, вторая беда - не может препроцессор найти в 3-х модулях функции GetWindowWidth и GetWindowHeight. Вручную поставил сам в начале модулей: #xtranslate GetWindowWidth ( <hWnd> ) => GetWindowRect( <hWnd>, 3 ) #xtranslate GetWindowHeight ( <hWnd> ) => GetWindowRect( <hWnd>, 4 ) Тогда заработало. Вот и спрашиваю, что за фигня, может у Харбора надо что-то подкрутить ? В Клипере раньше приходилось шаманить, не помню уже что. SergKis пишет: цитата: | Andrey глянь препроцессор и попробуй obj из тестового (работающего) проекта включить в большой. может проще не куски кода таскать, а формировать lib и ее включать в проекты |
| Попробую. Нет не особо удобно формировать и таскать lib. Не привык я к такому.
|
|
|
Dima
|
| |
Пост N: 4933
Зарегистрирован: 17.05.05
|
|
Отправлено: 21.06.15 17:17. Заголовок: Andrey пишет: втора..
Andrey пишет: цитата: | вторая беда - не может препроцессор найти в 3-х модулях функции GetWindowWidth и GetWindowHeight. Вручную поставил сам в начале модулей: |
| #include "minigui.ch" прописан в PRG ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4290
Зарегистрирован: 12.09.06
|
|
Отправлено: 21.06.15 17:35. Заголовок: Dima пишет: #includ..
Dima пишет: цитата: | #include "minigui.ch" прописан в PRG ? |
| Конечно ! Иначе бы вообще не собирал !
|
|
|
Dima
|
| |
Пост N: 4934
Зарегистрирован: 17.05.05
|
|
Отправлено: 21.06.15 17:42. Заголовок: Тогда фик знает. Мож..
Тогда фик знает. Может и есть какое ограничение. Максимум что у меня было для сборки (GTWVT) файл размером 320 кило и строк в нем 13000 , собирается нормально.
|
|
|
Haz
|
| |
Пост N: 582
Зарегистрирован: 20.02.11
|
|
Отправлено: 21.06.15 17:47. Заголовок: Dima пишет: Это 1-я..
Andrey пишет: цитата: | Это 1-я беда, вторая беда - |
| Андрей, думаю в твоей ситуации без "самодостаточного" примера - это пальцем в небо ... ЗЫ. у меня в проекте 133 файла и 1,5 МБ кода - все норм
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4291
Зарегистрирован: 12.09.06
|
|
Отправлено: 21.06.15 19:42. Заголовок: Haz пишет: Андрей, ..
Haz пишет: цитата: | Андрей, думаю в твоей ситуации без "самодостаточного" примера - это пальцем в небо ... ЗЫ. у меня в проекте 133 файла и 1,5 МБ кода - все норм |
| Давай я тебе пришлю модуль который не компилируется ? У меня в проекте 89 файлов и 1,9 Мб кода.
|
|
|
Haz
|
| |
Пост N: 583
Зарегистрирован: 20.02.11
|
|
Отправлено: 22.06.15 10:39. Заголовок: Andrey пишет: Давай..
Andrey пишет: цитата: | Давай я тебе пришлю модуль который не компилируется |
| шли
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4296
Зарегистрирован: 12.09.06
|
|
Отправлено: 22.06.15 14:17. Заголовок: Haz пишет: шли Выс..
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4301
Зарегистрирован: 12.09.06
|
|
Отправлено: 22.06.15 21:59. Заголовок: Трехдневная эпопея с..
Трехдневная эпопея со сборкой там работает, а здесь нет подола наконец то к завершению. Спасибо большое всем кто откликнулся. Убрал в своём большом проекте МойПроект.hbp строчку -incpath=z:\minigui\include и всё стало нормально компилироваться ... Блин, ну почему такие явные вещи мешают компиляции - загадка ! Как в той загадке - без окон и дверей полна горница:
|
|
|
Dima
|
| |
Пост N: 4947
Зарегистрирован: 17.05.05
|
|
Отправлено: 22.06.15 22:02. Заголовок: Andrey пишет: -incp..
Andrey пишет: цитата: | -incpath=z:\minigui\include |
| путь то есть такой ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4302
Зарегистрирован: 12.09.06
|
|
Отправлено: 22.06.15 22:20. Заголовок: Dima пишет: путь то..
Dima пишет: Да есть, у меня там МиниГуй установлен. Даже это теперь компилируется: ON MOUSEHOVER ( SetProperty(ThisWindow.Name, This.Name, "ICON", "iFloppy48x2") ,; SetProperty(ThisWindow.Name, This.Name, "fontcolor", aButtColor2 ) ) ; ON MOUSELEAVE ( SetProperty(ThisWindow.Name, This.Name, "ICON", "iFloppy48x1") ,; SetProperty(ThisWindow.Name, This.Name, "fontcolor", aButtColor ) ) ;
|
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4303
Зарегистрирован: 12.09.06
|
|
Отправлено: 23.06.15 09:52. Заголовок: Можно ли сделать/соз..
Можно ли сделать/создать окно - чтобы оно было отдельно на панели задач от MAIN окна ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4323
Зарегистрирован: 12.09.06
|
|
Отправлено: 30.06.15 13:44. Заголовок: Как сделать ввод чис..
Как сделать ввод числа по маске "999 999 999" ? Делаю так: @ 45,130 TEXTBOX TextBox_1 VALUE M->nPubMaxRecno WIDTH 120 HEIGHT 32 ; BACKCOLOR {255,255,255} SIZE 14 NUMERIC INPUTMASK '999 999 999' ; ON CHANGE {|| M->nPubMaxRecno := Form_6.TextBox_1.Value } а на экране всё равно слитно цифры отображаются...
|
|
|
Haz
|
| |
Пост N: 584
Зарегистрирован: 20.02.11
|
|
Отправлено: 30.06.15 14:41. Заголовок: Andrey пишет: Как с..
Andrey пишет: цитата: | Как сделать ввод числа по маске "999 999 999" |
| переделать через @ 45 ,130 GETBOX ... PICTURE "@R 999 999 999"
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4325
Зарегистрирован: 12.09.06
|
|
Отправлено: 30.06.15 15:28. Заголовок: Спасибо БОЛЬШОЕ ! :..
Спасибо БОЛЬШОЕ ! Отправил письмо на почту, посмотри пожалуйста. И еще в догонку к этому письму, не получается переместить фокус в ГРИД после расчёта. Делаю: @ 450,15 BUTTONEX Button_Start CAPTION 'Starting calculation'; WIDTH 380 HEIGHT 40 BACKCOLOR LGREEN FONTCOLOR WHITE BOLD ; NOXPSTYLE HANDCURSOR ACTION {|| Test_Calc_Dbf(), Form_1.Grid_1.Setfocus } а курсор в ГРИД не переходит...
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4328
Зарегистрирован: 12.09.06
|
|
Отправлено: 30.06.15 16:00. Заголовок: Смотрел пример \..
Смотрел пример \MiniGUI\SAMPLES\Advanced\GridColor Там строка 132: Form_1.Grid_1.SetFocus или я не то смотрю.... А, понял... Нужно сначала ставить: Form_1.Grid_1.Value := 1, а потом уже Form_1.Grid_1.SetFocus ! Тогда работает !
|
|
|
Dima
|
| |
Пост N: 4997
Зарегистрирован: 17.05.05
|
|
Отправлено: 30.06.15 16:02. Заголовок: Andrey пишет: Form_..
Andrey пишет: А если через Domethod
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4329
Зарегистрирован: 12.09.06
|
|
Отправлено: 30.06.15 16:04. Заголовок: Dima пишет: А если ..
Dima пишет: А не важно как, всеравно препроцессор поставит сам Domethod !
|
|
|
Haz
|
| |
Пост N: 585
Зарегистрирован: 20.02.11
|
|
Отправлено: 30.06.15 16:27. Заголовок: Andrey пишет: Делаю..
Andrey пишет: цитата: | Делаю: @ 450,15 BUTTONEX Button_Start CAPTION 'Starting calculation'; WIDTH 380 HEIGHT 40 BACKCOLOR LGREEN FONTCOLOR WHITE BOLD ; NOXPSTYLE HANDCURSOR ACTION {|| Test_Calc_Dbf(), Form_1.Grid_1.Setfocus } |
| Form_1.Grid_1.Setfocus , Form_1.Grid_1.Value := 1 }
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4330
Зарегистрирован: 12.09.06
|
|
Отправлено: 30.06.15 17:04. Заголовок: Haz пишет: Form_1.G..
Haz пишет: цитата: | Form_1.Grid_1.Setfocus , Form_1.Grid_1.Value := 1 } |
| Спасибо, понял !
|
|
|
Ответов - 300
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
All
[только новые]
|
|