Основы VB Советы          Формы, окна
Задержка формы на экране
Форма с рамкой, но без заголовка
Активное окно в MDI-форме

  Арташес Сейланян      Задержка формы на экране.

При загрузке стартовой формы, когда нужно ее некоторое время задержать на экране, я делаю это при помощи API - функции, а не при помощи пустого цикла For ... Next. На сколько я знаю, где-то вычитал, этот цикл  загружает процессор , что мешает работать в многозадачной среде, а функция API - нет.
Делается это так :


В модуле программы описываем  
API - функцию

Declare Sub Sleep Lib "kernel32" (ByVal milliseconds As Long)
 
В
Form_Load стартовой формы пишем следующий код, где  Form1 является стартовой.

Private Sub Form_Load()
  Form1.Show
  DoEvents
  Sleep 2000
  Unload Form01
  MDIForm1.Show
End Sub

Sleep 2000 - дает задержку приблизительно на 3-4 секунды.

 Назад   
Чтобы сделать форму с рамками, но без заголовка, нужно изменить следующие её свойства:
Caption = ""
ControlBox = False

 Назад


Работая с окном MDI, я сталкнулся со следующей проблемой: мне нужно было обратиться к активному окну, а так как создавал я их из ондого и того же, то и были они всего лишь элементами массивов. Приходилось вести индекс и считать их, присваевать тэгам их индексы и т.д. Вобщем СВЕРХнеудобно! Эх... как я долго мучился пока не заглянул в Help. Сам совет: если Вам нужно обратиться к активному окну в окне-родителе MDI используйте ссылку на активную форму ActiveForm. Например:

ActiveForm.Caption = "Я активное окно!"

И тогда неважно что там за окно будет активным, ему будет присвоен заголовок "Я активное окно!". 

 Назад

 

Используются технологии uCoz