Differenze tra le versioni di "Eseguire un file MIDI mediante il componente gb.sdl2.audio"

Da Gambas-it.org - Wikipedia.
Riga 30: Riga 30:
  
 
Esempio:
 
Esempio:
 
+
Music.Volume = 110
Music.Volume = 110
 

Versione delle 11:06, 31 dic 2014

Le risorse della libreria SDL2 per la gestione dell'audio e del Midi è stata implementata in Gambas attraverso il nuovo componente gb.sdl2.audio.

Il componente fornisce per l'esecuzione dei file Midi la Classe Music. E' possibile eseguire un file Midi per volta.

E' necessario impostare nella proprietà Music.SoundFontPath il percorso del file banco dei suoni (soundfont bank) di formato .SF2 per la riproduzione dei suoni con il Midi.


Mostriamo di seguito un semplice esempio per eseguire un file Midi con un'applicazione a riga di comando:

Public Sub Main()

' Impostiamo il percorso del file del banco di suoni ".sf2" che vogliamo utilizzare:
 Music.SoundFontPath = "/percorso/del/soundfont/bank/file.sf2"

 Music.Load("/percorso/del/file.mid")

 Music.Play

' Per l'esecuzione del file Midi in un'applicazione "a riga di comando" il ciclo è indispensabile:
 While Music.State = Music.Playing
' Mostra anche il tempo trascorso:
   Print CStr(Date(0, 0, 0, 0, 0, 0, Music.Pos * 1000))
 Wend

End


Modificare il volume

La Classe Music fornisce la proprietà .Volume per modificare appunto il volume audio dell'esecuzione. L'ambito dei valori possibili va da 0 a 128.

Esempio:

Music.Volume = 110