String

@Chike wrote:

You gotta be cruel to be kind, in the right measure.

Just wanted to pop in and say, cool song reference there Chike!

@deeva2 wrote:

can we add more than one right answer?

I don’t believe the version you have has the ability to have two or more correct answers.

Nice clean layout.

I also agree with Chike on uploading it to the forum instead of using mediafire. Just remove old files as you update and upload new files.

@ChiNa-Man wrote:

1) Do I still have to use the find “Window” class method? And maybe attach your code into it… Or should woek on your code and simply delete the find “Window” by class method?

2) If I use the little peace of code you provided, how can I make it send the PM TITLE (ONLY) to a TEXTBOX?

Your still using FindWindow, only its FindwindowEx.

I modified Chikes code a bit and made it into a Sub. It Adds all open pm windows Title and Handle to a listbox titled Listbox1.

Just call the GetPMWindows sub and it will populate the listbox with any open pms

Public Sub GetPMWindows()
Dim sb As New StringBuilder(256)
Dim hWnd As IntPtr = IntPtr.Zero

While True
' find window on desktop after hwnd, sero mean first
hWnd = FindWindowEx(IntPtr.Zero, hWnd, "DlgGroupChat Window Class", vbNullString)
If hWnd = IntPtr.Zero Then Exit While ' no more windows
sb.Length = GetWindowText(hWnd, sb, sb.Capacity)
Dim str As String = sb.ToString()

If str.Length = 0 Or str.EndsWith(" Room") Then Continue While ' continue to next window if error or room window

If Not ListBox1.Items.Contains("WinTitle - " & str & " WinHandel - " & hWnd.ToString) Then
ListBox1.Items.Add("WinTitle - " & str & " WinHandel - " & hWnd.ToString)
End If

End While

End Sub

Here is a function that will get the title of any DlgGroupChat Window Class ( pm or chatroom )

 Public Function FindWindowsTitleText() As String
Dim strbuilder As New StringBuilder(1024)
Dim PalClass As String = "DlgGroupChat Window Class"
Dim hWndMain As IntPtr = FindWindow(PalClass, vbNullString)

GetWindowText(hWndMain, strbuilder, strbuilder.Capacity)
Return strbuilder.ToString

End Function

@Chike wrote:

Isn’t it more simple just to check the room title to tell if it’s IM window?

I don’t know if it is simpler, but yes that would certainly be another way to do it. The only problem I would foresee would be if there were other DlgGroupChat Window Class‘s that were present that had neither the “Voice Room” or “Private Room” in their title, but were not a PM window either.