Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Кто может объяснить сей глюк? Добавлено: 01.05.05 03:03  

Автор вопроса:  Дилетант
Я работаю с разрешением 1280х1024. Когда я стал отлаживать прогу (заставка CD) для разных разрешений, обнаружилась странная вещь.
Заставка длится 35" под музыку. При разрешении 1024х768 И ТОЛЬКО ПРИ ЭТОМ РАЗРЕШЕНИИ главный таймер, который "дирижирует" событиями (появление/исчезновение картинки или текста, начало/конец верчения, увеличения/уменьшения и т.п.), ОСТАНАВЛИВАЕТСЯ НА 5-Й СЕКУНДЕ (это проверено по служебному лейблу, который показывает время таймера в секундах: его я делаю видимым при отладке), и из всего процесса остаётся только музыка. Код НИГДЕ не апеллирует к разрешению экрана. Глюк сохраняется и при запуске из VB, и при запуске проги.ехе.
И, повторяю, ТОЛЬКО ПРИ ЭТОМ РАЗРЕШЕНИИ.
ВО ВСЕХ ОСТАЛЬНЫХ работает нормально.

КАК ЭТА БУЗИНА СВЯЗАНА С ДЯДЬКОЙ?
КТО МОЖЕТ ОБЪЯСНИТЬ СЕЙ ГЛЮК?

Платформа - Windows XP.
На всякий случай привожу используемые ф-ии:

GetTickCount Lib "Kernel32"
GetPixel и SetPixel Lib "gdi32"
(создают эффект на картинке, которая запускается на 9-й секунде, а при глючном разрешении, естественно, не запускается)

Следующие функции вроде как работают нормально, а там чёрт их знает.

mciExecute Lib "winmm.dll"
CreateRoundRectRgn Lib "gdi32"
SetWindowRgn Lib "user32"

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 Morpheus



Вопросов: 224
Ответов: 3777
 Web-сайт: xury.zx6.ru
 Профиль | | #1
Добавлено: 01.05.05 04:39
Может где то есть строки задающе размер формы типа form.width = screen.width ? и в этом случае картинка появляется там, где её не видно?

Ответить

Номер ответа: 2
Автор ответа:
 HOOLIGAN



Вопросов: 0
Ответов: 1066
 Профиль | | #2 Добавлено: 01.05.05 10:27
Morpheus
Написано, что таймер останавливается. При чём тут ширина?

Дилетант
Попробуй сделать свой таймер.

Dim bTimer As Boolean
Do While Not bTimer
    DoEvents
    Sleep 100
    Beep
Loop

Private Sub Form_Unload(Cancel As Integer)
    bTimer = Not bTimer
End Sub

Ответить

Номер ответа: 3
Автор ответа:
 Fanis



Вопросов: 0
Ответов: 21
 Профиль | | #3 Добавлено: 10.05.05 16:50

Пацаны!!!
КТо может - помогите!!! срочно нужна самая простая (как можно проще) реалищация
игры Морской бой на Visual Basic 6.0.
Не успеваю с курсовой... понимаете ли...
Пожал-ста скиньте мне на ящик: может кто из вас уже писал эту игрушку.
Заранее благодарен. Только на VB 6.0. ХОРОШО?!
мой ящик: dancer@mail.ru

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам