Reading Last Line – ChatRoomClass to ListBox Problems

[youtube]UzHI40ELVcY[/youtube]

OK, So I am trying to add the Idea bro Departure came with, to add an option in our Auto-Reply Program for Paltalk, so it can save the incoming Text. I have so far completed to get the username + text from the PM the same way Admin have done in his Paltalk Bot Source, but he is using the RoomSelector and this problem is not accuring if I use the roomselector too, but I am not using the RoomSelector and this is why I get this problem with the program…. Please watch the Video for 41. seconds, I have created for the problem!

The product should grab the incoming or typed text in the Pm WINDOW. But when I cover the “Text Area” in RichEdit20W window with another Program or another Window, then the text added in the LISTBOX until I uncover the text area again, Plus It adds an EXTRA LINE for each time I remove the cover..

These are the Codes that are accuring this type of a problem (If can be called problem)

Private Function SendTxtHnd() As IntPtr
' Get connected chat room handle
Dim hWndMain As IntPtr = FindWindow(ChatRoomClass, vbNullString)
' Get Control handle
Return ControlSearchBottomUp(hWndMain, SendTextClass, SendTextIndex, SendTextSearchQuadrant)
End Function

Private Function ReadTxtHnd() As IntPtr
' Get connected chat room handle
Dim hWndMain As IntPtr = FindWindow(ChatRoomClass, vbNullString)
' Get Control handle
Return ControlSearchBottomUp(hWndMain, ReadTextClass, ReadTextIndex, ReadTextSearchQuadrant)
End Function

I was wondering if there is another way to add the ChatRoomClass code in the ReadTxtHnd and SendTxtHnd Code functions…? Thanks a lot in advance

Ps, I am already using a code for Duplicated words and text for the Listbox, plus that its also adding an EMPTY line, but I managed to cover the EMPTY lines too. The code with Duplicate Word is working OK, but in this case its not helping me… I think its creating a complete new session for each time I remove the cover of the Text-Area…..