Автор | Сообщение |
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.
|
|
|
Ответов - 301
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
All
[только новые]
|
|
Softlog86
|
| |
Пост N: 87
Зарегистрирован: 03.12.08
|
|
Отправлено: 13.04.13 16:34. Заголовок: А меня интересует ре..
А меня интересует регулировка прозрачности элемента управления "Slider" :) Хочу его запрятать за картинку
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2793
Зарегистрирован: 12.09.06
|
|
Отправлено: 13.04.13 18:13. Заголовок: Dima пишет: Где то ..
Dima пишет: цитата: | Где то выкладывали уже и тоже по твоей просьбе. |
| Да я просмотрел все свои программки на МиниГуи, так и не нашел. Индексация есть, а вот копирования файла нет. Пришлось псевдокопирование сделать - бегунок в цикле до 50%, потом копирование, потом остаток бегунка.
|
|
|
Haz
|
| |
Пост N: 69
Зарегистрирован: 20.02.11
|
|
Отправлено: 13.04.13 22:02. Заголовок: не втех примерах иск..
не втех примерах искал MiniGUI\SAMPLES\BASIC\Filecopy\
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2796
Зарегистрирован: 12.09.06
|
|
Отправлено: 14.04.13 00:58. Заголовок: Haz пишет: не втех ..
Haz пишет: цитата: | не втех примерах искал MiniGUI\SAMPLES\BASIC\Filecopy\ |
| Это точно не в тех... Спасибо большое !
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2804
Зарегистрирован: 12.09.06
|
|
Отправлено: 18.04.13 22:09. Заголовок: Как сделать, чтобы п..
Как сделать, чтобы при аварийном сваливании программы на МиниГуи, она не оставалась в памяти ? А то потом правишь ехе-ник, а он не собирается, пока из памяти свалившуюся прогу не снимешь...
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2843
Зарегистрирован: 12.09.06
|
|
Отправлено: 10.06.13 13:03. Заголовок: Как можно получить р..
Как можно получить размеры AVI-файла, показываемый на форме из ресурсов EXE ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2862
Зарегистрирован: 12.09.06
|
|
Отправлено: 19.06.13 12:00. Заголовок: Как узнать запущена ..
Как узнать запущена ли чужая программа или нет ?
|
|
|
Dima
|
| |
Пост N: 3236
Зарегистрирован: 17.05.05
|
|
Отправлено: 19.06.13 12:17. Заголовок: Andrey пишет: Как у..
Andrey пишет: цитата: | Как узнать запущена ли чужая программа или нет ? |
| Запущенные процессы надо анализировать
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2869
Зарегистрирован: 12.09.06
|
|
Отправлено: 23.06.13 16:14. Заголовок: Можно ли вывести в ф..
Можно ли вывести в функциях BrowseForFolder() или GetFolder() ТОЛЬКО подключенные флешки к компьютеру ? Или нужно писать самому такую функцию ? Может у кого есть уже такая функция ?
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2874
Зарегистрирован: 12.09.06
|
|
Отправлено: 24.06.13 18:44. Заголовок: Haz пишет: не втех ..
Haz пишет: цитата: | не втех примерах искал MiniGUI\SAMPLES\BASIC\Filecopy\ |
| Посмотрел этот пример и не понял, ошибка или в новой версии БЕГУНОК не работает ? Собирал с помощью MiniGUI 2.2.3 - 2013.06.12 Кто подскажет как исправить ошибку ?
|
|
|
gfilatov2002
|
| moderator
|
Пост N: 489
Зарегистрирован: 11.02.10
|
|
Отправлено: 24.06.13 21:05. Заголовок: Andrey пишет: Кто п..
Andrey пишет: цитата: | Кто подскажет как исправить ошибку ? |
| Надо заменить вызов команды DO EVENTS на вызов функции inkey(.1) или InkeyGUI() в этом месте ************************************ Function SHOW_IT(nDl) ************************************ Local nPos := int(nDl*100) if nPos % _SHOW_PERCENT == 0 Form_1.Label_3.Value := ltrim(str(nPos))+" % complete" Form_1.ProgressBar_1.Value := nPos // DO EVENTS inkey(.1) endif return NIL
|
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2876
Зарегистрирован: 12.09.06
|
|
Отправлено: 24.06.13 21:22. Заголовок: gfilatov2002 пишет: ..
gfilatov2002 пишет: цитата: | Надо заменить вызов команды DO EVENTS на вызов функции inkey(.1) или InkeyGUI() в этом мест |
| Спасибо БОЛЬШОЕ !!!
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2881
Зарегистрирован: 12.09.06
|
|
Отправлено: 27.06.13 18:48. Заголовок: Пример MiniGUI\S..
Пример MiniGUI\SAMPLES\BASIC\Filecopy\ - заработал... Для теста пробую копировать файл размером 160 Мб на флешку... Идет копирование медленно даже при #define _LARGE_BLOCK 16384*10 (при 20 прога вешается...) Если еще при этом сделать копирование другого файла на эту же флешку, то труба... Программа "подвисает" вот с таким сообщением: Стандартная харборовская функция FILECOPY( cSource, cDestination ) - работает в разы лучше... Вопрос: как увеличить скорость записи и убрать подвисание программы ?
|
|
|
Dima
|
| |
Пост N: 3253
Зарегистрирован: 17.05.05
|
|
Отправлено: 27.06.13 20:54. Заголовок: Andrey пишет: Станд..
Andrey пишет: цитата: | Стандартная харборовская функция FILECOPY( cSource, cDestination ) - работает в разы лучше... Вопрос: как увеличить скорость записи и убрать подвисание программы ? |
| Переработать этот пример на Filecopy , Hb_fcopy ....и тд и тп А вообще если шибко надо можно и свою функцию по копированию сваять.
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2900
Зарегистрирован: 12.09.06
|
|
Отправлено: 08.07.13 02:58. Заголовок: На форме использую о..
На форме использую объект ANIMATEBOX: @ 10,80 ANIMATEBOX Avi_1 ; WIDTH 340 HEIGHT 60 ; FILE 'AVI1' AUTOPLAY TRANSPARENT NOBORDER Работает отлично. Закончилась одна обработка, перехожу к другой обработке. Как сменить AVI1 на другой, допустим AVI2 ? В примерах и доке не нашел ничего.... Все AVI-файлы уже загружены в ресурсы программы....
|
|
|
a_sidorov
|
| |
Пост N: 41
Зарегистрирован: 07.06.08
|
|
Отправлено: 08.07.13 11:08. Заголовок: Попробуй так: Fo..
Попробуй так: Form_Main.Avi_1.Stop() Form_Main.Avi_1.Open('Avi2') Form_Main.Avi_1.Play()
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2901
Зарегистрирован: 12.09.06
|
|
Отправлено: 08.07.13 12:30. Заголовок: Спасибо, получилось ..
Спасибо, получилось !
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2907
Зарегистрирован: 12.09.06
|
|
Отправлено: 13.07.13 18:48. Заголовок: Как изменить цвета б..
Как изменить цвета букв после вывода на форму ? Т.е. я не хочу выводить слово побуквенно, а вывести надпись целиком, а потом изменить цвет у некоторых букв. Например: @ 10,120 LABEL Label_1 VALUE "Test color label" ; WIDTH 500 HEIGHT 60 FONT "Times Roman" SIZE 24 BOLD и выборочно изменить цвет нескольких букв "e" и "o".
|
|
|
Andrey
|
| постоянный участник
|
Пост N: 2915
Зарегистрирован: 12.09.06
|
|
Отправлено: 22.07.13 22:59. Заголовок: Работаю с базой, чер..
Работаю с базой, через объект GRID. После обновления базы обновляю GRID, так: aList := LoadLogZaiv() // загрузка базы (маленькая) в массив Form_9.Grid_Log.DeleteAllItems Form_9.Grid_Log.DisableUpdate FOR nI := 1 to LEN(aList) Form_9.Grid_Log.AddItem( aList[nI] ) NEXT Form_9.Grid_Log.EnableUpdate Вопрос: а как сделать чтобы в окне GRID отображались самые нижние записи ? Может метод какой то есть ? Заранее спасибо за ответ !
|
|
|
Haz
|
| |
Пост N: 80
Зарегистрирован: 20.02.11
|
|
Отправлено: 22.07.13 23:16. Заголовок: это то что надо ?
Andrey пишет: цитата: | а как сделать чтобы в окне GRID отображались самые нижние записи ? |
| Это так ? Form_9.Grid_log.Value := Len(aList)
|
|
|
Ответов - 301
, стр:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
All
[только новые]
|
|