Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > рисование в Form_Load

Автор: Wedi 11.3.2019, 07:55

добрый день друзья!
есть форма Form1
на ней картинка Picture1

почему точка Picture1.PSet (30, 30) не рисуется в Form_Load
и рисуется в Form_KeyDown?

мне нужно сделать прорисовку до нажатия кнопки
по загрузке программы
как это сделать?

Код


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   If KeyCode = 32 Then'если нажат "пробел"
      Picture1.PSet (30, 30)
   End If
End Sub

Private Sub Form_Load()
   Form1.KeyPreview = True
   Picture1.PSet (30, 30)
End Sub

Автор: Wedi 11.3.2019, 13:04

долго ковырялся сам решил вопрос

Код


Private Sub Picture1_Paint()
   Picture1.PSet (30, 30)
End Sub

не знаю правда правильно ли это
но работает

Автор: Akina 11.3.2019, 21:18

Цитата(Wedi @ 11.3.2019, 14:04

)

не знаю правда правильно ли это

В общем случае неправильно. Любые действия с объектом следует выполнять после полной инициализации объекта. Так что внимательно изучите последовательность событий для Picture.