Hat jemand schonmal was mit dem Skype SDK gemacht? Ich wollte versuchen ein Programm zu schreiben, dass mit Skype zusammen arbeitet. Leider ist das Beispiel in C++ und weit mehr als dürftig kommentiert. Ich habe es versucht nach PB teilweise zu portieren aber aus irgend einem Grund will Skype das Add-On nicht anerkennen
Code: Alles auswählen
Enumeration
#SKYPECONTROLAPI_ATTACH_SUCCESS ; Wir haben eine Erlaubnis vom Benutzer
#SKYPECONTROLAPI_ATTACH_PENDING_AUTHORIZATION ; Wir warten auf das Grün des Benutzers
#SKYPECONTROLAPI_ATTACH_REFUSED ; Wir wurden vom Benutzer abgelehnt
#SKYPECONTROLAPI_ATTACH_NOT_AVAILABLE ; API zugriffe sind momentan nicht möglich
EndEnumeration
#SKYPECONTROLAPI_ATTACH_API_AVAILABLE = $8001 ; Verbindungsversuch
Global WM_Skype_Attach.l
Global WM_Skype_Discover.l
Procedure WndProc(lnghWnd.l, lngMSG.l, wParam.l, lParam.l)
DefType.l lngResult
lngResult = #PB_ProcessPureBasicEvents
Select lngMSG
Case #WM_Close
DestroyWindow_(lnghWnd)
Case #WM_DESTROY
PostQuitMessage_(0)
Case #WM_CopyData
Debug "O_o"
Case WM_Skype_Attach
Debug "o_O"
EndSelect
ProcedureReturn lngResult
EndProcedure
OpenWindow(0, 5, 5, 80, 60, 0, "Klingel")
SetWindowCallback(@WndProc())
WM_Skype_Attach = RegisterWindowMessage_("SkypeControlAPIAttach" )
WM_Skype_Discover = RegisterWindowMessage_("SkypeControlAPIDiscover")
Debug SendMessage_(#HWND_BROADCAST, WM_Skype_Discover, @WndProc(), 0)
Repeat
Select WindowEvent()
Case #PB_Event_CloseWindow
Break
Case 0
Delay(1)
EndSelect
ForEver