Помогите!

[VIIRUS]

Доброе время суток.

Подскажите плиз, как на панель состояния (statusbar) программно добавить картинку?
И как сделать, чтоб при загрузке формы в Listbox`е сразу выбиралась определенная строка?

Заранее спасибо за ответы.

[Vellan]

За это отвечает свойство ListIndex
Например:

Код: Выделить всё

Private Sub Form_Load()
List1.AddItem 1
List1.AddItem 2
List1.AddItem 3
List1.AddItem 4
List1.ListIndex = 2
End Sub

Лист бокс выделит третье значение, поскольку в программирование используется абсолютная система исчисления, и первое значение индексируется как 0.

[VIIRUS]

Спасибо огромное Vellan!
Остался первый вопрос

[RayShade]

Очень просто. У статусбара есть коллекция Panels. Она содержит все панели статусбара. У Panels.Item есть проперть Picture. Она содержит картинку, отображаемую на этой панели. Можно сделать так:

Код: Выделить всё

Set StausBar.Panels(1).Picture = LoadPicture ("c:\myfile.bmp")


[VIIRUS]

Спасибо RayShade!