hi all
could any one show me the id (Do Not Disturb )
I tried this code and doesnt work
🙄
Dim window As Long
Dim x As Long, editx As Long
Dim Button As Long
Dim strPath As String
Dim dlggroupchatwindowclass As Long
dlggroupchatwindowclass = FindWindow("dlggroupchat window class", Form1.Text1.text)
PostMessage dlggroupchatwindowclass, WM_COMMAND, 32824, 0
hey I need help in here lol, I can’t think of how to get the owner name, i though about using like the last line thingy from the outogreeter lol but that shit dont work 🙂
i need it , please 🙄
what about “Show Room Statistics” POPUP room>> list>>> “File 😉
I think this is the way to get owner name to textbox? 🙁
@locohacker wrote:
I put an hour into this problem and it appears that the cTransparentTextOut control (the control that holds the room owner name and other info at the top of the room) doesn’t hold any retrievable text. It doesn’t even return a length. Haven’t tried anything that deals with the “Show Room Statistics” POPUP” that’s described above.
What do you have so far light? post your code.
🙂 lol crap I though u could know who the room owner was lol but now I see paltalk added that in the room hehehe, aigh let me see if i could put a quick code for ya 🙂
ThankS for your interest, grateful you
but where can I get the sample source code of loco?
If you upload me a simple example. please 😮
I dont have code
I mean it may help to get owner name
YW 🙂
thanks loco, Wonderful
work now 🙂
🙄 loco , winter
🙄 Where you are? 🙄
how Can I get the name of the Owner in paltalk room to Textbox in my project Topic disapproved
>> why loco?
Good work
You are really a genius man
I tried to make a new topic from the beginning, but “”Topic disapproved “”
thank you
getPalSubForm is a function written by AutoPilot and used in many examples throughout this forum. Search the forum for it. I’ll try to upload an example later tonight if you haven’t found it or figured it out by then.
thanks string
There is an error..>>….. getPalSubForm not defind? ❓
Example
My added attachment, is your example project with my code above added to it.
I noticed that you declared several variables as “Global” in your code… Global was deprecated with the end of vb5. You should use Public instead. I took the liberty of changing all the Globals in your code to Public.
If you have anymore questions concerning this, you should start a new topic, as we are way off the original topic of “id Do Not Disturb doesnt work”
Good Luck
@light 2012 wrote:
The volume of posts that need approval that are received daily to loco’s site is enormous. Some times valid topics are accidentally disapproved. You shouldn’t have any trouble now creating a new topic.
Example
This code will get the text from the Room Statistics window. You can parse out the owners name yourself.
This was tested on Pal version 10.2 build 435
Dim ihnd As Long 'find room window ihnd = FindWindow("dlggroupchat window class", "Room Name Here") 'click menu item PostMessage ihnd, WM_COMMAND, 33248, 0 'You might want to put the following bit of code into a timer rather than using a pause Pause(0.50) ihnd = getPalSubForm("#32770", "Room Statistics", "Static", 1) Dim TheText As String, TL As Long TL = SendMessageLong(ihnd, WM_GETTEXTLENGTH, 0&, 0&) TheText = String(TL + 1, " ") Call SendMessageByString(ihnd, WM_GETTEXT, TL + 1, TheText) TheText = Left(TheText, TL) Debug.Print TheText@light 2012 wrote:
use this code to find the handle of room Owner:
Dim dlggroupchatwindowclass As Long, splitterwindowex As Long, cwndvideobar As Long Dim cpngimagectrl As Long, ctransparenttextout As Long dlggroupchatwindowclass = FindWindow("dlggroupchat window class", "room To Connect- Voice Room") splitterwindowex = FindWindowEx(dlggroupchatwindowclass, 0&, "splitterwindowex", vbNullString) splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString) cwndvideobar = FindWindowEx(splitterwindowex, 0&, "cwndvideobar", vbNullString) cpngimagectrl = FindWindowEx(cwndvideobar, 0&, "cpngimagectrl", vbNullString) ctransparenttextout = FindWindowEx(cpngimagectrl, 0&, "ctransparenttextout", vbNullString) ctransparenttextout = FindWindowEx(cpngimagectrl, ctransparenttextout, "ctransparenttextout", vbNullString) ctransparenttextout = FindWindowEx(cpngimagectrl, ctransparenttextout, "ctransparenttextout", vbNullString)Then use the sample source code of loco to get text ( owner nick) to text box
umm maybe this one will work
Dim window As Long Dim x As Long, editx As Long Dim Button As Long Dim strPath As String Dim dlggroupchatwindowclass As Long dlggroupchatwindowclass = FindWindow("seinfeld_superman", vbNullString) PostMessage dlggroupchatwindowclass, WM_COMMAND, 32824, 0If doesnt I can take a looksy if u want 🙂