have anyone made programs for inspeak can they share the code I interested in knowing how to send text for starters

i've tried but with no sucess .. inSpeak is weird ...

but can be done though ... if I put more time on it ... then i'll figure it out!

I was trying to, wtf is this tmemo lol I cant send no text to that shit but I keep on trying when I have time

Trying to figure it out ...

1. Use different method instead of finding the class like Paltalk.

2. Think of another way ......

3. See if you can solves the problem ....


I'll post my method next time ..... share with me what have you come up.

The Send Text Does Work , But For Some Reasons API Can't Find The Right Child ClassName Look At This:

Dim tchatroom As Long, tspanel As Long, tmemo As Long
tchatroom = FindWindow("tchatroom", vbNullString)
tspanel = FindWindowEx(tchatroom, 0&, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, tspanel, "tspanel", vbNullString)
MsgBox (tspanel) ' lost Focus Here
tspanel = FindWindowEx(tspanel, tspanel, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, tspanel, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, tspanel, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
tspanel = FindWindowEx(tspanel, 0&, "tspanel", vbNullString)
tmemo = FindWindowEx(tspanel, 0&, "tmemo", vbNullString)
Call SendMessageByString(tmemo, WM_SETTEXT, 0&, "This Is Only A Test")


Try This :
tmemo = FindWindowEx(tspanel, 0&, "tmemo", vbNullString)
Call SendMessageByString(tmemo, WM_SETTEXT, 0&, "This Is Only A Test")
replace the tspanel = temporary handle that you see in API Spy . Ex: 856574