powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Splash screen, Заставка
12 сообщений из 12, страница 1 из 1
Splash screen, Заставка
    #33381746
Бек
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подскажите плиз как установить время "висения" на экране заставки (сплэшскрин). Все его проперти облазил, не нашел. Может метод какой есть или что. Когда запускаю приложение свое, заствка появляется на доли секунды и буквально и исчезает.
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33381826
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А таймер на что?
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33381831
Бек
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
хм... ща попробую
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33381865
Бек
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
и где мне указать время? в пропертис Интервал? так он чето все равно не работает. не висит сколько указал (5000 мсек)...

Не судите меня строго, если что, бейсик изучаю только неделю
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33381879
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Свойство Interval - это интервал выполнения события Timer1_Timer.
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33381917
Бек
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
вообщем, я поместил контрол таймер на форму и задал в свойстве интервал время (5000 мсек). я все правильно сделал?
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33381943
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В событии Timer1_Timer пишешь код.
Если нужно через 5 сек. выгрузить заставку, то просто End.
Если наоборот, то впиши код самой заставки, ее выполнения.

Кстати, какой контрол используешь? Может, смогу поэкспериментировать с ним.
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33382009
Бек
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
контрол Timer

в процедуре Timer1_Timer() формы я ввел такой код:

Private Sub Timer1_Timer()
Unload Me
End Sub

он срабатывает когда я вызываю заставку по кнопке (из меню приложения).
но чета не могу сообразить чтобы это работало при запуске :-(

в модуле у меня след код:

Public fMainForm As Main_window

Sub Main()
frmSplash.Show
frmSplash.Refresh
Set fMainForm = New Main_window
Load fMainForm
Unload frmSplash
fMainForm.Show
End Sub
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33382067
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По умолчанию интервал таймера=0. В Timer1.Timer пишешь Unload Me.
В Form_Load пишешь в нужной строке Timer1.Interval=5000. Событие таймера сработает через 5 сек.

Лучше всего пришли пример.
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33382134
Бек
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
вообщем у меня получилось, правда по момему как-то чуть коряво :)
короче,
в код формы-заставки я добавил
Private Sub TimerSplash_Timer()
Unload Me
End Sub
интервал настроил на 3 сек

в код главной формы добавил
Private Sub TimerMain_Timer()
Load Me
Me.Show
End Sub
на саму форму тоже сунул таймер с интервалом 3 сек
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33382145
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если пришлешь пример, может, подскажу, как сделать не так коряво.
...
Рейтинг: 0 / 0
Splash screen, Заставка
    #33382327
Бек
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
млин вот что значит поломать голову лишние 5 мин

после Unload Me надо был добавить MainForm.Show и все!

тем не менее спа за ассистэнс :)
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Splash screen, Заставка
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]