VB6 API/Spy -Frage

Question

Ich versuche, einige Soulseek -Funktionen aus VB6 zu kontrollieren - das Problem ist das SystabControl32 - wie kann ich lesen, welche Registerkarte ausgewählt ist? Der API -Spyer gibt nur die SystabControl32 zurück, jedoch keine Registerkartenschaltfläche.

Danke

Answer 1

Ich schlage vor, es versuche das zu versuchen Tcm_getCurssel Botschaft. Es sollte den Index der aktuell ausgewählten Registerkarte zurückgeben.

Der Code ist ungefähr so ctabctrl aber habe es nicht getestet.

Private Const TCM_FIRST = &H1300 
Private Const TCM_GETCURSEL = (TCM_FIRST + 11)
Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" _
 (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As _
 Long) As Long

Public Function SelectedTab(ByVal hWnd As Long) As Long
    SelectedTab = SendMessageLong(hWnd, TCM_GETCURSEL, 0, 0) + 1
End Property