Skip to content

Paltalk 10.2 Programming Updates

Viewing 15 posts - 1 through 15 (of 52 total)
1 2 3 4
  • Author
    Posts
  • May 9, 2012 at 9:26 pm #186903
    Admin
    Administrator

    I gonna put the paltalk 10.2 codes here updates, I having an issue that programs wont work in color rooms at the first try, like you need to close and open the rooms again for them to work.

    Check the codes and any suggestions can be posted here 🙂

    Paltalk Greeter 2006 any pal 8 or 9vb102sc

    May 10, 2012 at 1:25 pm #186954
    NaLeT
    Member

    ty for share Loco.
    is not working turkish paltalk 10.2 build 438 🙁 sourcecode and greeter
    why ?

    May 11, 2012 at 9:41 am #186953
    light 2012
    Member

    Good work loco , thank you
    i need NickGet and GetListviewItem update code please

    May 11, 2012 at 1:37 pm #186952
    Admin
    Administrator

    nalet, did u try closing and opening the room again, cause im having an issue with that ❓
    Light the code to getnick is this now

    Function NickGet()
Dim dlggroupchatwindowclass As Long, splitterwindowex As Long, classcpanecontainerex As Long
Dim atlffdd As Long, syslistview As Long
dlggroupchatwindowclass = FindWindow("dlggroupchat window class", Form1.Combo1.Text)
splitterwindowex = FindWindowEx(dlggroupchatwindowclass, 0&, "splitterwindowex", vbNullString)
splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
splitterwindowex = FindWindowEx(splitterwindowex, 0&, "splitterwindowex", vbNullString)
classcpanecontainerex = FindWindowEx(splitterwindowex, 0&, "classcpanecontainerex", vbNullString)
If classcpanecontainerex = 0 Then
cwndmembertree = FindWindowEx(splitterwindowex, 0&, "cwndmembertree", vbNullString)
syslistview = FindWindowEx(cwndmembertree, 0&, "syslistview32", vbNullString)
Else
classcpanecontainerex = FindWindowEx(splitterwindowex, classcpanecontainerex, "classcpanecontainerex", vbNullString)
atlffdd = GetWindow(classcpanecontainerex, GW_CHILD)
syslistview = FindWindowEx(atlffdd, 0&, "syslistview32", vbNullString)
End If
Call GetListviewItem(syslistview)
End Function

    But we still having issues lol as u can see :dave:

    May 11, 2012 at 5:25 pm #186951
    NaLeT
    Member

    ty Loco , i am testing …
    image =
    i am incompetent :altay:

    May 11, 2012 at 5:42 pm #186950
    light 2012
    Member

    Thank you for your interest loco. 🙂
    What’s wrong with this code?
    please ❓

    Public Function MessageCrossProcess(ByVal hwnd As Long)
Dim lProcID As Long
Dim hProc As Long
Dim lxprocLVITEM As Long
Dim LVITEM As LV_ITEM
Dim lItemPos As Long

GetWindowThreadProcessId hwnd, lProcID ' Get the process ID in which the ListView is running
If lProcID 0 Then
hProc = OpenProcess(PROCESS_VM_OPERATION Or PROCESS_VM_READ Or PROCESS_VM_WRITE, False, lProcID) ' make sure we have read write permissions in the process space
If hProc 0 Then
lxprocLVITEM = VirtualAllocEx(hProc, 0, LenB(LVITEM), MEM_RESERVE Or MEM_COMMIT, PAGE_READWRITE) ' Grab enough memory in the other procedure's space to hold our LV_ITEM

' Set up our local LV_ITEM to change the selected item
LVITEM.mask = LVIF_STATE
LVITEM.state = True
LVITEM.stateMask = LVIS_SELECTED Or LVIS_FOCUSED ' Just enforcing the selection better than in original version by moving the focus as well
' Copy the local LV_ITEM into the space we reserved in the foreign process
WriteProcessMemory hProc, ByVal lxprocLVITEM, ByVal VarPtr(LVITEM), LenB(LVITEM), 0

' Now send the message, but pass the address of the copy of our LV_ITEM that now exists in the foreign process instead of our local version
' Aigh Peeps this wha you need to change in order to higlight the item you want :)
lItemPos = Form1.Text8.text ' first item
SendMessage hwnd, LVM_SETITEMSTATE, lItemPos, ByVal lxprocLVITEM

' Clean up
VirtualFreeEx hProc, ByVal lxprocLVITEM, LenB(LVITEM), MEM_RELEASE
CloseHandle hProc
End If
End If

End Function

     

    Doesnt work

    May 11, 2012 at 8:14 pm #186949
    light 2012
    Member

    :altay: i see now

    May 12, 2012 at 3:40 am #186948
    Admin
    Administrator

    light so ya got it working ❓

    nalet I gonna chek it more next week, cause Im still having the issue, it still works with the black room is the color ones thats having the issue 🙄

    May 12, 2012 at 6:23 pm #186947
    light 2012
    Member

    The program doesnt work the first time
    I need to close and open the rooms again to work

    May 12, 2012 at 9:25 pm #186946
    Friend4Life
    Member

    Thanks Loco it working but as you mentioned you have to close the room and reopen to work in colored room! ty

    May 13, 2012 at 6:15 pm #186945
    light 2012
    Member

    LOCO, STRING

    😀 😀

    May 15, 2012 at 5:42 pm #186944
    express01
    Member

    hi Admin,
    can you post the updated source for the admin bot?

    thanks alot!
    cheers!

    May 15, 2012 at 6:39 pm #186943
    Admin
    Administrator

    express here the code, but I updated the way to connect to the room, I use the combo box like the others program, so test it out I havent done much testing 😀

    May 15, 2012 at 7:04 pm #186942
    light 2012
    Member

    Thank you very much loco you are Genius 😀

    May 15, 2012 at 7:11 pm #186941
    Admin
    Administrator

    Lol why thank lol, and hey download it again cause I working on the room combo box connection and it had a bug, so get it again 🙂

  • Author
    Posts

Related

Viewing 15 posts - 1 through 15 (of 52 total)
1 2 3 4
  • You must be logged in to reply to this topic.