Форум » GUI » Примеры из Минигуи -ошибки, вопросы..... (продолжение) » Ответить
Примеры из Минигуи -ошибки, вопросы..... (продолжение)
Andrey: Всем привет. Взялся смотреть примеры из МиниГуи, так не все работают. Может кто подскажет что там "допилить" нужно ? А заодно может и исправить и добавить новые.... Очень красочный пример: \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.
SergKis: Andrey а так ACTION { |hCB| Forma_1.ComboEx_1.Show , hCB := GetControlHandle( "ComboEx_1", "Forma_1" ), ; SetFocus(hCB), PostMessage( hCB, WM_KEYDOWN, VK_F4, 0) }
Andrey: SergKis пишет: а так Тоже не работает ...
gfilatov2002: Andrey Посмотри функцию ComboboxShowList() в примере samples\Advanced\FileMan
SergKis: Andrey пишет:Тоже не работае у меня просто combobox и msvc работает, твой вариант работает так: [pre2] ACTION { || Forma_1.ComboEx_1.Show, ; SetFocus(GetControlHandle( "ComboEx_1", "Forma_1" )), ; _PushKey ( VK_F4 ) } [/pre2]
Andrey: SergKis пишет: у меня просто combobox и msvc работает, твой вариант работает так: Ура ! Заработало ! Спасибо !
Andrey: gfilatov2002 пишет: Посмотри функцию ComboboxShowList() в примере samples\Advanced\FileMan Спасибо !
Andrey: Всем привет ! Возможно ли закрыть показ вывода объектов на форму ? А потом разрешить показ. А то забодало мельтешение объектов на форме при пересчете формы.
Vlad04: Создаем в дизайнере форму, добавляем Тоолбар и ... все вываливается с ошибкой.
gfilatov2002: Vlad04 пишет: вываливается с ошибкой Благодарю за сообщение! Поправил эту ошибку - обновить Ide можно через меню Help->Update C праздником!
Vlad04: Спасибо огромное за оперативность! Вас так же!
Vlad04: И еще просьба. Не могли бы повторить один из примеров c:\MiniGUI\SAMPLES\BASIC\mdi\** но с использованием Дизайнера. (Что поделаешь - нравится мне работать с Дизайнером, точнее - комбинированный метод)
Andrey: Почему криво работает функция ChangeFileExt() ? Делаю так cFileDbf := "Customer.dbf" cFileDbfNew := ChangeFileExt( cFileDbf, "_new.dbf" ) cFileDbfMemo := ChangeFileExt( cFileDbf, "_new.fpt" ) Возвращает спереди ещё дополнительный знак "\", т.е. "\Customer_new.dbf" и "\Customer_new.fpt" Или так задумано ? И чем тогда обрезать расширение файла, по старинке - как в Клипере SUBSTR(cFile,1,RAT(".",cFile)-1 ) ?
Dima: Andrey Живет она в i_pseudofunc.ch , переделай если надо. Andrey пишет: cFileDbfNew := ChangeFileExt( cFileDbf, "_new.dbf" ) Работает она я так понял с расширением (глубже не копал ) а ты указал часть имени + расширение
Haz: Andrey пишет: Или так задумано ? так задумано [pre2] #xtranslate ChangeFileExt( <cFile>, <cExt> ) ; => ; cFilePath( <cFile> ) + "\" + cFileNoExt( <cFile> ) + <cExt> [/pre2] И чем тогда обрезать расширение файла, по старинке - как в Клипере SUBSTR(cFile,1,RAT(".",cFile)-1 ) ? по старинке или используй [pre2] hb_FNameSplit( cFileSpec, @cPath, @cFile, @cExt ) [/pre2]
Andrey: Haz пишет: или используй Спасибо БОЛЬШОЕ !
Andrey: Dima пишет: а ты указал часть имени + расширение Понял. Если бы полный путь указал, не было бы ошибки.
Andrey: Вопрос по окнам созрел. Делаю MAIN окно. Из него вызываю WINDOWTYPE STANDARD , а из этого окна вызываю карточку, окно: MODAL NOSYSMENU ; После переключения программы, мне нужно переключаться на MAIN окно, там оказывается сидит эта карточка. Но иконка и надпись в MAIN окна - свои. Юзера путаются. Что делать ? 1) менять тип окна карточки ? 2) менять иконку и надпись MAIN окна на карточку, а потом возвращать ?
Andrey: Всем привет ! А как сделать в объекте TEXTBOX не показывался ноль ? INPUTMASK '@Z 99999' - не прокатывает... FORMAT '@Z 99999' - тоже не прокатывает... @ 20, 80 TEXTBOX TextBox_Dolg VALUE 0 WIDTH 175 HEIGHT nFontSize*2 ; BACKCOLOR WHITE NUMERIC INPUTMASK '99999' RIGHTALIGN ; ON CHANGE {|| nDolg := Form_1.TextBox_Dolg.Value }
Andrey: Подскажите люди добрые, как получить инвертный цвет из любого цвета ? Может функция есть для этого ?
Haz: Andrey пишет: Подскажите люди добрые, как получить инвертный цвет из любого цвета ? Может функция есть для этого ? Гуглить http://www.cyberforum.ru/csharp-net/thread302302.html
полная версия страницы