Hilfe mit DLL
Verfasst: 05.10.2006 16:12
Hiho,
ich habe hier ja sone blöde X10-fernbedienung und wollte mal nen
kleines Prog schreiben.
Die Fernbedienung kann über ne dll abgefragt werden dazu gibbet
auch schon passenden vb-code im i-net.
(ich kenn mich mit vb keinen deut aus)
guck hier:
Die Frage ist nun wie setzt ich sowas in PB um und
was muss man in pb machen damit die DLL auch angesprochen
werden kann?
ich habe hier ja sone blöde X10-fernbedienung und wollte mal nen
kleines Prog schreiben.
Die Fernbedienung kann über ne dll abgefragt werden dazu gibbet
auch schon passenden vb-code im i-net.
(ich kenn mich mit vb keinen deut aus)
guck hier:
Code: Alles auswählen
Private Sub X10Control1_X10Command( _
ByVal bszCommand As String, _
ByVal eCommand As X10Ctl.EX10Command, _
ByVal lAddress As Long, _
ByVal EKeyState As X10Ctl.EX10Key, _
ByVal lSequence As Long, _
ByVal eCommandType As X10Ctl.EX10Comm, _
ByVal varTimestamp As Variant)
Label1(0).Caption = bszCommand
Label1(1).Caption = eCommand
Label1(2).Caption = lAddress
Label1(3).Caption = EKeyState
Label1(4).Caption = lSequence
Label1(5).Caption = eCommandType
Label1(6).Caption = varTimestamp
If EKeyState = 1 Or EKeyState = 3 Then
If bszCommand = "Record" Then Shell "shutdown.exe -s -f -t 01"
Select Case bszCommand
Case "One": SendKeys "1"
Case "Two": SendKeys "2"
' hier weitere Befehle eingeben
End Select
End If
End Sub
was muss man in pb machen damit die DLL auch angesprochen
werden kann?