Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: Problem mit SysEx (MIDI)

   
    by Bääääär, 23. Mär 2011
  Kleines Update dazu:
  GetHandle ist wie folgt definiert:
  
  function TMidiDevices.GetHandle(const aDeviceIndex: integer): THandle;
  begin
  try
  if not InRange(aDeviceIndex, 0, fDevices.Count - 1) then
  raise EMidiDevices.CreateFmt('%s: Device index out of bounds! (%d)', );
  
  Result:= THandle(fDevices.Objects);
• Forum: Multimedia

  AW: Problem mit SysEx (MIDI)

   
    by Bääääär, 23. Mär 2011
  Ich muss gestehen, ich verstehe diesen Code eh nicht so recht. Er schien aber so mal funktioniert zu haben, sonst wöre er ja nicht als funktionierend veröffentlich wordern. Vielleicht hat er unter älteren Windows Versionen funktioniert (und in seiner Funktion sozusagen eine "gedultete Ungültigkeit" gehabt, die von Widnows 7 jetzt nicht mehr akzeptiert wird)
  
  aDeviceIndex ist ja ein Integer. Was...
• Forum: Multimedia

  AW: Problem mit SysEx (MIDI)

   
    by Bääääär, 21. Mär 2011
  Das habe ich bereits probiert, scheint aber nichts zu ändern...
  
  Mir ist eben aufgefallen: MIDI-Empfang geht auch nicht. (Ausnahmefehler, sobald das Programm was empfängt). Klingt für mich ein wenig so, als sei der MIDI-Header bei Lazarus irgendwo falsch definiert.
• Forum: Multimedia

  Problem mit SysEx (MIDI)

   
    by Bääääär, 21. Mär 2011
  Hallo Community!
  
  Hab schon lange nix mehr mit Delphi gemacht, jetzt bin ich aber wieder hier gelandet und zwar mit folgendem problem: Ich möchte mit der midi-bibliothek von hier SysEx Daten verschicken. Allerdings erhalte ich bei folgendem Aufrufif not MIDIOutput.IsOpen(MidiOutputDevices.ItemIndex) then
  begin
  showmessage('Device not opened!');
  exit;
  end;
  str :=...