Где отрисовываются такие элементы как label, shape, image? - VB
Формулировка задачи:
Где отрисосвываются такие элементы как label, shape, image?
И как получить скрин этого окна зная его hwnd, hdc?
Пробовал функцией BitBlt она эти элементы не видит, хотя если на Picture
их разместить и выводить в него изображение функцией BitBlt через таймер то становится
видно как прорисовка BitBlt и прорисовка label, shape, image перекрывают друг друга.
Значит они прорисовываются в одном устройстве.
В нэте ток функции подобных скринов через съёмку рабочего стола и последующего вырезания нужного куска
мне так не надо.
Решение задачи: «Где отрисовываются такие элементы как label, shape, image?»
textual
Листинг программы
Public Sub Hook(Form As Form) Dim Prev As Long, Ctl As Object, hwnd As Long For Each Ctl In Form.Controls If TypeOf Ctl Is CommandButton Or _ TypeOf Ctl Is PictureBox Or _ TypeOf Ctl Is TextBox Then hwnd = Ctl.hwnd Prev = SetWindowLong(hwnd, GWL_WNDPROC, AddressOf WindowProc) SetProp hwnd, "prev", Prev SetProp hwnd, "ptr", ObjPtr(Ctl) End If Next End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д