Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

midiInOpen
Autor: jura
Datum: 06.02.06 23:14
Hallo zusammen? Bin kurz vorm verzweifeln, kann mir irgendjemand helfen? Wie funktioniert das mit der midiInOpen-Function und der CALLBACK_FUNCTION? Okay, ich glaube ich habs schon so einigermaßen am laufen, aber ich bekomme nur feedback vom Programm wenn midiIn geöffnet oder midiOut geschlossen wird. Wenn ich aber einen midi-befehl (zB. eine Midi-Note) von meinem midi-keyboard an mein Programm schicke, bekomme ich keine Rückmeldung von VB. Was mach ich falsch??? Mein Code: Public Delegate Function test(ByVal hmidiIn As Integer, ByVal wMsg As Integer, ByVal dwInstance As Integer, ByVal dwParam1 As Integer, ByVal dwParam2 As Integer) As Boolean Declare Function midiInOpen Lib "winmm.dll" (ByRef lphMidiIn As Integer, ByVal devIDIn As Integer, ByVal cbfuncIn As test, ByVal cbdataIn As Integer, ByVal cboptionsIn As Integer) As Integer Public Const CALLBACK_FUNCTION = &H30000 Public Const MM_MIM_OPEN = &H3C1 Public Const MM_MIM_CLOSE = &H3C2 Public Const MM_MIM_DATA = &H3C3 Private Sub AuswahlMidiIn_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AuswahlMidiIn.SelectedIndexChanged rcIn = midiInClose(hmidiIn) rcIn = midiInOpen(hmidiIn, midi2in.SelectedIndex, AddressOf MidiInProc, 0, CALLBACK_FUNCTION) End Sub Public Function MidiInProc(ByVal hmidiIn As Integer, ByVal wMsg As Integer, ByVal dwInstance As Integer, ByVal dwParam1 As Integer, ByVal dwParam2 As Integer) As Boolean MessageBox.Show("Midi-Test") End Function Danke für eure Hilfe!!

midiInOpen	3.682	jura	06.02.06 23:14
Re: midiInOpen	3.174	Martoeng	18.02.06 19:58
Re: midiInOpen	3.291	jura	28.02.06 10:35
Re: midiInOpen	2.912	Martoeng	28.02.06 12:28
Re: midiInOpen	2.885	jura	28.02.06 12:55

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen