Windows desktop screenshot
Quote from Gowtham on April 14, 2022, 9:36 amI have taken this from the Gambas Mailing List 20/05/20 by vuott: -
Public Sub Form_Open()
Dim i As Integer
Dim dw As DesktopWindow' Gets the ID of all the "windows" open on the desktop:
For Each i In Desktop.FindWindow(Null, Null, Null)With dw = New DesktopWindow(i)
' Shows the visible name and ID of the Window:
Print .VisibleName, Hex(i)
End WithNext
End
Note I used the 'gb' button to get the formatted code above not the '</>' button.
I have taken this from the Gambas Mailing List 20/05/20 by vuott: -
Public Sub Form_Open()
Dim i As Integer
Dim dw As DesktopWindow' Gets the ID of all the "windows" open on the desktop:
For Each i In Desktop.FindWindow(Null, Null, Null)With dw = New DesktopWindow(i)
' Shows the visible name and ID of the Window:
Print .VisibleName, Hex(i)
End WithNext
End
Note I used the 'gb' button to get the formatted code above not the '</>' button.