|
Действия ...
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
04.12.2002, 20:06
|
|||
|---|---|---|---|
|
|||
помогите создать собственную заставку |
|||
|
#18+
Я только начинаю в MS Access. Создал базу , хотел бы чтобы она запускалась со своей заставкой. Рисунки сделаю. Надписи тоже. А как все это заставить появляться первой после запуска базы. Если кому не лень, обьясните неучу. Спасибо ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
05.12.2002, 08:46
|
|||
|---|---|---|---|
помогите создать собственную заставку |
|||
|
#18+
А как все это заставить появляться первой после запуска базы. Не понял... Рисунок типа BMP закинь в туже директорию от куда запускаешь MDB ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
05.12.2002, 09:57
|
|||
|---|---|---|---|
|
|||
помогите создать собственную заставку |
|||
|
#18+
делаешь форму вставляешь в нее большой контрол - изображение. назначаешь контролу твою картинку. по событию таймер делаешь выход из формы и если нужно загрузку другой формы. для свойства таймер указываешь ненулевое значения в милисекундах 5000 - 5 секунд в свойствах запуска аксесса выбираешь эту форму как стартовую ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
05.12.2002, 10:21
|
|||
|---|---|---|---|
помогите создать собственную заставку |
|||
|
#18+
в свойствах запуска аксесса выбираешь эту форму как стартовую Или напиши макрос с именем autoexec с командой открыть эту самую форму этот макрос автоматически запускается при каждом запуске базы ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
05.12.2002, 19:26
|
|||
|---|---|---|---|
|
|||
помогите создать собственную заставку |
|||
|
#18+
Большое всем спасибо. Особенно понравилась идея включить таймер... Может дадите информацию по-подробней как это сделать... и как застаивить после окончания демонстрации заставки показать Главную форму ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
06.12.2002, 09:05
|
|||
|---|---|---|---|
помогите создать собственную заставку |
|||
|
#18+
Private Sub Form_Open(Cancel As Integer) Me.TimerInterval = 5000 ' интервал 5 сек. End Sub Private Sub Form_Timer() If Me.TimerInterval <> 0 Then Me.TimerInterval = 0 End If DoCmd.OpenForm "abonent" ' твоя форма которую нужно открыть следующей DoCmd.Close acForm, "Заставка" ' закрывает форму заставка End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=45&mobile=1&tid=1682753]: |
0ms |
get settings: |
10ms |
get forum list: |
19ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
86ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
59ms |
get tp. blocked users: |
2ms |
| others: | 231ms |
| total: | 430ms |
| 0 / 0 |
