Автор | Сообщение |
Andrey
|
| постоянный участник
|
Пост N: 1929
Зарегистрирован: 12.09.06
|
|
Отправлено: 15.11.11 21:36. Заголовок: Примеры из Минигуи -ошибки, вопросы..... (продолжение)
Всем привет. Взялся смотреть примеры из МиниГуи, так не все работают. Может кто подскажет что там "допилить" нужно ? А заодно может и исправить и добавить новые.... Очень красочный пример: \MiniGUI\SAMPLES\Advanced\AVI_Animation - не работает под Win7 (наверно AVI-шки нет в ресурсах) Предложение Григорию: Можно ли добавить еще один пример с отдельным AVI-файлом в ресурсах проекта и показом такого же бегунка ? Пример: \MiniGUI\SAMPLES\Advanced\DisplayMode - не работает под ХР и далее.... Пример: \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: 4840
Зарегистрирован: 12.09.06
|
|
Отправлено: 12.04.16 17:04. Заголовок: C# public Color inve..
C# public Color invert(Color c) { return Color.FromArgb(c.A, 0xFF - c.R, 0xFF - c.G, 0xFF - c.B); } Блин, и как это переделать ?
|
|
|
Haz
|
| |
Пост N: 885
Зарегистрирован: 20.02.11
|
|
Отправлено: 12.04.16 17:09. Заголовок: Andrey пишет: Блин,..
Andrey пишет: цитата: | Блин, и как это переделать ? |
| а что тут сложного ? 1 разложить цвет на компоненты R,G,B 2 получить новые компоненты R1 := oxFF - R , G1 := 0XFF -G и B1 := 0xFF - B 3 собрать цвет nColor := RGB( R1, G1, B1 )
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4841
Зарегистрирован: 12.09.06
|
|
Отправлено: 13.04.16 00:02. Заголовок: Haz пишет: 2 получи..
Haz пишет: цитата: | 2 получить новые компоненты R1 := oxFF - R , G1 := 0XFF -G и B1 := 0xFF - B |
| Вот так понятней ! Спасибо !
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4842
Зарегистрирован: 12.09.06
|
|
Отправлено: 13.04.16 00:04. Заголовок: Ещё вопрос возник по..
Ещё вопрос возник по кнопке. Надписи не всегда в кнопке помещаются.... Обрезает кнопка. Как определить - поместиться надпись в кнопке или нет (чтобы шрифт потом уменьшить) ?
|
|
|
SergKis
|
| постоянный участник
|
Пост N: 943
Зарегистрирован: 17.02.12
|
|
Отправлено: 13.04.16 00:09. Заголовок: Andrey ты в своем п..
Andrey ты в своем примере уже проделывал такое клиент.width и подбираешь размер фонта под width
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4843
Зарегистрирован: 12.09.06
|
|
Отправлено: 13.04.16 00:39. Заголовок: SergKis пишет: ты в..
SergKis пишет: цитата: | ты в своем примере уже проделывал такое клиент.width и подбираешь размер фонта под width |
| Под Tsbrowse делал. А под кнопку нет. Кнопка же с картинкой, слева или справа. Т.е. какая ширина картинки в кнопке ? Отступы разные в кнопке. Какая ширина между картинкой и надписью ? Можно коеффицент ввести, но на разных разрешениях экрана использую разную ширину кнопок, вот и проблема... 1) Как подсчитать разрешённый максимальный размер ширины надписи на кнопке ???? 2) Кол-во строк в кнопке тоже бывает не видно. Значит нужно подсчитать кол-во видимых строк в кнопке. Как ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4844
Зарегистрирован: 12.09.06
|
|
Отправлено: 13.04.16 09:49. Заголовок: Вот так получается: ..
Вот так получается: Нужно уменьшать шрифт. А как ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4856
Зарегистрирован: 12.09.06
|
|
Отправлено: 19.04.16 16:00. Заголовок: Не работают клавиши ..
Не работают клавиши PgUp и PgDw на форме. Код примерно такой: Скрытый текст DEFINE WINDOW Form_1 ; WINDOWTYPE STANDARD TOPMOST ; NOMAXIMIZE NOSIZE NOSYSMENU ; ......... DEFINE WINDOW Win_2 ; VIRTUAL HEIGHT nHeight*2 ; WINDOWTYPE PANEL ......... END WINDOW ON KEY PRIOR ACTION SendMessage( Application.Handle, WM_VSCROLL, SB_PAGEUP, 0 ) ON KEY NEXT ACTION SendMessage( Application.Handle, WM_VSCROLL, SB_PAGEDOWN, 0 ) ON KEY UP ACTION SendMessage( Application.Handle, WM_VSCROLL, SB_LINEUP, 0 ) ON KEY DOWN ACTION SendMessage( Application.Handle, WM_VSCROLL, SB_LINEDOWN, 0 ) END WINDOW
| Что не так делаю ?
|
|
|
gfilatov2002
|
| moderator
|
Пост N: 932
Зарегистрирован: 11.02.10
|
|
Отправлено: 20.04.16 10:33. Заголовок: Andrey пишет: Что н..
Andrey пишет: Поскольку эти клавиши определяются для окна типа STANDARD (а не для основного окна приложения) надо заменить на
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4857
Зарегистрирован: 12.09.06
|
|
Отправлено: 20.04.16 14:48. Заголовок: Спасибо БОЛЬШОЕ, Гри..
Спасибо БОЛЬШОЕ, Григорий !
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4858
Зарегистрирован: 12.09.06
|
|
Отправлено: 20.04.16 19:07. Заголовок: gfilatov2002 пишет: ..
gfilatov2002 пишет: Не заработало... Поставил GetFormHandle("Win_2") - только тогда заработало !
|
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4870
Зарегистрирован: 12.09.06
|
|
Отправлено: 25.04.16 21:00. Заголовок: Всем привет ! Опять..
Всем привет ! Опять непонятка с окнами... С окна WINDOWTYPE STANDARD c Tsbrowe вызываю первое окно MODAL (тоже c Tsbrowe). Далее вызываю прелодер с ожиданием (тоже MODAL), строю другое (второе) MODAL окно с шестью Tab+Tsbrowse, заполняю данными, закрываю прелодер и вуаля - НЕТ этого MODAL окно с шестью Tab+Tsbrowse. Это окно под ПЕРВЫМ MODAL. Переключиться не могу. Только после закрытия ПЕРВОГО MODAL могу переключиться на второе окно. Как сделать активным второй MODAL ? Пробовал на второе окно ставить SetProperty("Form_2", "Topmost", .T.) - окно на переднем плане, но нажать на нём ничего нельзя..., только после закрытия первого MODAL можно работать со вторым окном.
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4873
Зарегистрирован: 12.09.06
|
|
Отправлено: 26.04.16 12:49. Заголовок: Andrey пишет: Далее..
Andrey пишет: цитата: | Далее вызываю прелодер с ожиданием (тоже MODAL) |
| Убрал это прелодер. Второе модал окно заработало ! Т.е. нормально работает, фокус на втором окне сразу. Вывод: В прелодере (\SAMPLES\BASIC\WAIT_WINDOW_2\demo2.prg) что-то портит вывод MODAL окон ! Подскажите пожалуйста, что-там нужно исправить ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4875
Зарегистрирован: 12.09.06
|
|
Отправлено: 28.04.16 13:46. Заголовок: Подскажите пожалуйст..
Подскажите пожалуйста, как курсор мышки программно убрать с окна или передвинуть на нужные координаты ?
|
|
|
Dima
|
| |
Пост N: 5632
Зарегистрирован: 17.05.05
|
|
Отправлено: 28.04.16 14:05. Заголовок: Andrey пишет: Подск..
Andrey пишет: цитата: | Подскажите пожалуйста, как курсор мышки программно убрать с окна или передвинуть на нужные координаты ? |
| Смотри пост Григория намбер 597
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4876
Зарегистрирован: 12.09.06
|
|
Отправлено: 28.04.16 19:38. Заголовок: Dima пишет: Смотри ..
Dima пишет: цитата: | Смотри пост Григория намбер 597 |
| Подскажи как смотреть/искать посты по номерам ?
|
|
|
Dima
|
| |
Пост N: 5634
Зарегистрирован: 17.05.05
|
|
Отправлено: 28.04.16 19:48. Заголовок: Andrey http://clipp..
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4877
Зарегистрирован: 12.09.06
|
|
Отправлено: 28.04.16 19:55. Заголовок: Dima , спасибо ! :s..
Dima , спасибо !
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 4878
Зарегистрирован: 12.09.06
|
|
Отправлено: 28.04.16 20:35. Заголовок: Не совсем то получае..
Не совсем то получается. Создаю форму: cFormName, на форму ставлю картинку, форму центрирую. В процедуре делаю следующее: ON INIT {|| SetProperty( cFormName, "Image_0","Setfocus"), SetCursorPos( nImgRow, nImgCol ) } Как узнать координаты окна cFormName относительно начала окна 0,0 ?
|
|
|
Haz
|
| |
Пост N: 910
Зарегистрирован: 20.02.11
|
|
Отправлено: 28.04.16 21:14. Заголовок: Andrey пишет: Как у..
Andrey пишет: цитата: | Как узнать координаты окна cFormName относительно начала окна 0,0 |
| Гусары молчать Свои примеры глянь getclientrect как то так
|
|
|
Ответов - 300
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
All
[только новые]
|
|