| Вопрос: ActiveX: Нужен прогрессбар с стиле WIndows XP | Добавлено: 03.08.06 15:45 |
Автор вопроса:  MYSTERIOR | Web-сайт: XXX | ICQ: 227369659 |
| Ответы | Всего ответов: 41 |
|
Номер ответа: 31 Автор ответа:  Серёга ICQ: 262809473 Вопросов: 17 Ответов: 561 |
Web-сайт: Профиль | | #31 | Добавлено: 04.08.06 02:02 |
|
АПИ:
Private Declare Sub ShowScrollBar Lib "user32" (ByVal hwnd As Long, ByVal wBar As Long, ByVal bShow As Long)
Private Sub Command2_Click() List1.AddItem "super" ShowScrollBar List1.hwnd, 1, 1 End Sub Private Sub Command3_Click() If List1.ListCount <> 0 Then List1.RemoveItem List1.ListCount - 1 ShowScrollBar List1.hwnd, 1, 1 End If End Sub Private Sub Form_Load() ShowScrollBar List1.hwnd, 1, 1 End Sub Private Sub List1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) ShowScrollBar List1.hwnd, 1, 1 ShowScrollBar List1.hwnd, 1, 1 End Sub |
||
|
Номер ответа: 32 Автор ответа: zeq Вопросов: 2 Ответов: 4 |
Web-сайт: Профиль | | #32 | Добавлено: 04.08.06 11:00 |
|
Здравствуйте, может я и упустил время, но хочу ответить в тему первого вопроса, про прогрес барв ХР
Самый лучший способ решения: Если вы не замечали, то помимо подключаемых Microsoft Windows Common Controls 6.0 (SP6)... Рядом присутствуют Microsoft Windows Common Controls 5.0 (SP2) Вот они при наличии манифеста, очень даже ХР стиля!, ... рекомендую их использовать, там все контролы пусчай и немнога урезаны в плане функционала, но зато 100% в тему ХР рисуются!! |
||
|
Номер ответа: 33 Автор ответа: Sacred PhoenixICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #33 | Добавлено: 04.08.06 20:21 |
| 2 zeq: мож будем читать всю тему перед тем, как отвечать? если уделишь (с мягким знаком на конце!) этому время, то поймёшь (тоже с мягким знаком!), что автору нужен прогрессбар, чей внешний вид НЕ БУДЕТ ЗАВИСЕТЬ от текущего стиля винды. | ||
|
Номер ответа: 34 Автор ответа: Sacred PhoenixICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #34 | Добавлено: 04.08.06 20:24 |
|
2 Серёга: а ладно, тогда. Твой пример с API чё-та глючит с одним элементом...
Я пытался изменять стиль листбокса, добавить LBS_DISABLENOSCROLL, но не "работаить"... Работает тока если создавать листбокс на API (через CreateWindow() ) 
|
||
|
Номер ответа: 35 Автор ответа: MYSTERIORICQ: 227369659 Вопросов: 31 Ответов: 96 |
Web-сайт: Профиль | | #35 | Добавлено: 04.08.06 21:10 |
|
Так, ребят, сорри что не отвечал - только что пришел с работы.
Сейчас все протестирую и отпишусть что работает, а что -нет. |
||
|
Номер ответа: 36 Автор ответа: MYSTERIORICQ: 227369659 Вопросов: 31 Ответов: 96 |
Web-сайт: Профиль | | #36 | Добавлено: 04.08.06 22:52 |
| сорри еще может кто подскажет, как запустить програму и не двигаться дальше пока та не закроется с скрытом/нескрытом режиме? | ||
|
Номер ответа: 37 Автор ответа: MYSTERIORICQ: 227369659 Вопросов: 31 Ответов: 96 |
Web-сайт: Профиль | | #37 | Добавлено: 05.08.06 00:23 |
|
БАНАЛЬНО не работает Shell "C:\my prog\hello.exe"
не запускается вообще ничего. с чем это может быть связано? |
||
|
Номер ответа: 38 Автор ответа: Sacred PhoenixICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #38 | Добавлено: 05.08.06 01:59 |
|
сорри еще может кто подскажет, как запустить програму и не двигаться дальше пока та не закроется с скрытом/нескрытом режиме? тема расжёвана настолько, что уже и жевать-то нечего. Поиск никто не отменял)))
БАНАЛЬНО не работает Shell "C:\my prog\hello.exe"
а ты так сделай
Call Shell("calc.exe", vbNormalFocus) |
||
|
Номер ответа: 39 Автор ответа: MYSTERIORICQ: 227369659 Вопросов: 31 Ответов: 96 |
Web-сайт: Профиль | | #39 | Добавлено: 05.08.06 02:01 |
|
тема расжёвана настолько, что уже и жевать-то нечего. Поиск никто не отменял)))
да, мне уже помог гугл 
а ты так сделай
Call Shell("calc.exe", vbNormalFocus) будешь удивлен, но заработало а в чем принципиальная разница? на просто Shell вб ведь не ругалс0! |
||
|
Номер ответа: 40 Автор ответа: Sacred PhoenixICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #40 | Добавлено: 05.08.06 03:00 |
|
да, мне уже помог гугл ну дык... это и есть хорошо!
будешь удивлен, но заработало
а в чем принципиальная разница? Ну, во-первых, я всегда вызываю процедуры и функции, возвращаемый рез-тат которых мне не нужен, с помощью Call. Хотя врядли это здесь что-то играет. Единственное, Shell в моём случае вызывается с константой vbNormalFocus, в то время как по умолчанию стоит vbMinimizeFocus. |
||
|
Номер ответа: 41 Автор ответа: MYSTERIORICQ: 227369659 Вопросов: 31 Ответов: 96 |
Web-сайт: Профиль | | #41 | Добавлено: 05.08.06 03:04 |
|
да я вызывал по всякому
в том числе и с vbHide и все равно никак а вот твой код заработал. вилимо, мистика какая
Тут еще такое дело, мало того что я VB успел позабыть, так у меня нынешний VB на испанском - такой вот дистрибутив скачал и теперь приходится только догадываться что хотели сказать загадочные amigos в сообщениях об ошибках )
|
||