Ciao a tutti,
sarei interessato ad un artificio che mi permetta di implementare il multithreading su vb6. So che vb6 non è impostato per accettare più processi contemporaneamente ma mi chiedevo se esisteva uno stratagemma al problema.
Lo scopo della mia ricerca è riprodurre due suoni nello stesso momento con l' api playsound : ho pensato solo al multithreading ma se esiste qualche altra possibilità fatemelo sapere...preferirei non usare ocx, vorrei scrivere codice !
Ciao grazie
flussocontinuo :-)
leggi la pillola in rilievo con directsound puoi suonare contemporaneamente quanti brani vuoi
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
dove la trovo ?
flussocontinuo :-)
è evidente che non leggi i thread in rilievoOriginariamente inviato da flussocontinuo
dove la trovo ?
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
credo tu ti riferisca a questo :
dim Audio1 As IBasicAudio
dim MMCtrl1 As IMediaControl
Private Sub Form_Load()
Set MMCtrl1 = New QuartzTypeLib.FilgraphManager
MMCtrl1.RenderFile "percorso file da suonare"
Set Audio1 = MMCtrl1
Audio1.Balance = 0 ' da -10000 a + 10000
Audio1.Volume = 0 ' da -10000 a 0 in attenuanza di decibel non è lineare
MMCtrl1.Run
End Sub
ma se devo applicarlo a più di un file perchè suonino contemporaneamente come devo procedere ?
flussocontinuo :-)
altra cosa...per "aggiungere ad un progetto il riferimento ActiveMovie Control type library della quartz.dll
funziona con qualunque file audio che aprite con mediaplayer dal momento che anche mediaplayer usa quella dll " cosa intendi?
flussocontinuo :-)
dichiari un'altro oggetto IMediaControlOriginariamente inviato da flussocontinuo
credo tu ti riferisca a questo :
dim Audio1 As IBasicAudio
dim MMCtrl1 As IMediaControl
Private Sub Form_Load()
Set MMCtrl1 = New QuartzTypeLib.FilgraphManager
MMCtrl1.RenderFile "percorso file da suonare"
Set Audio1 = MMCtrl1
Audio1.Balance = 0 ' da -10000 a + 10000
Audio1.Volume = 0 ' da -10000 a 0 in attenuanza di decibel non è lineare
MMCtrl1.Run
End Sub
ma se devo applicarlo a più di un file perchè suonino contemporaneamente come devo procedere ?
fai il render, imposi volume e balance e chiami il metodo run
che legge qualsiasi file che legge mediaplayer, il player predefinito di windowsOriginariamente inviato da flussocontinuo
altra cosa...per "aggiungere ad un progetto il riferimento ActiveMovie Control type library della quartz.dll
funziona con qualunque file audio che aprite con mediaplayer dal momento che anche mediaplayer usa quella dll " cosa intendi?
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
è questa la parte che non capisco potresti postare eventuale codice o dirmi cosa devo fare ?aggiungere ad un progetto il riferimento ActiveMovie Control type library della quartz.dll
flussocontinuo :-)
dal menù di vb
progetto -> riferimenti ti si apre una finestra e spunti la voce
ActiveMovie Control type library
click su ok
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
grazie mille !
spero che così i due file suonino nello stesso momento..
ciao ciao
flussocontinuo :-)
Permessi di invio
Rispondi quotando