API Progammierung

[mike_shiva_]

Hallo,
kennt jmd eine Anlaufstelle, wenn es um API Programmierung geht. Ich versuche grade ein Programm zum senden und empfangen von System-Exclusive (SYSEX) Dateien und VB 2005 zu schreiben. Das senden klappt auch, ich schaffe es nicht Daten zu empfangen.

Dies habe ich bei msdn dazu gefunden

http://msdn.microsoft.com/en-us/library/ms709430(VS.85).aspx

Danke

 

[Nico Graichen]

Hi und willkommen

API-Programmierung ist ein weit umfassendes Thema. Prinzipiell ist es nur eine Schnittstelle einer Anwendung.

Welche API nutzt du denn?
Wie sendest du die Daten?
Und wohin?

 

[mike_shiva_]

Hallo,
ich muss erst mal sagen, dass ich Anfänger bin. Darum weiß ich nicht was für einen API ich nutze. Also die Daten werden über eine Midi-Schnittstelle zu meinem Drumsampler (EMU SP-12) geschickt.

Mein Problem ist schon, dass ich beim empfangen von den Daten nicht weiß, wie ich sie darstellen kann, weil es sich um Hexadezimal zahlen handelt. Des Weiteren kenn ich nicht die Größe der zu empfangenen Dateien, was ich beim senden ja weiß.

Wenn du oder jmd anderes eine Idee hat, wäre es echt super, weil ich auch keine richtigen Beispiele finden.

Danke schon mal.


Hier mein Code zum senden:

Dim hmidiout As Integer
Console.WriteLine("SYSEX starten")
Console.ReadLine()

Dim SysEx As String
Dim MyHdr As MIDIHDR

SysEx = Chr(&HF0) & Chr(&H18) & Chr(&H1) & Chr(&H41) & Chr(&HF7)

MyHdr.dwBufferLength = Len(SysEx)
MyHdr.dwBytesRecorded = Len(SysEx)
MyHdr.lpData = SysEx
MyHdr.dwFlags = 0


'Nur zur Info wieviel Bytes die Sysex hat
Console.WriteLine("Len(SysEx): " & Len(SysEx))

Do


midiOutPrepareHeader(hmidiout, MyHdr, Len(MyHdr))
midiOutLongMsg(hmidiout, MyHdr, Len(MyHdr))
'midiOutUnprepareHeader(hMidiOut, MyHdr, Len(MyHdr))

Loop