PRINCIPALE > LISTA DELLE AREE DI DISCUSSIONE > GRAFICA E AUDIO > MESSAGGIO

Eseguire una ricerca veloce nell' archivio delle risorse di Visual Basic Italia®: 

Preso dall'archivio...

Premere il pulsante sotto per accedere direttamente ad un articolo o ad un esempio preso in modo casuale dall'archivio.

Ultimo e-book pubblicato:

"INTRODUZIONE AI CSS"

Lo scopo del CSS language è quello di controllare lo stile dei vari elementi che concorrono a formare un
documento HTML.
Si può operare in tre modi collegamento ad un foglio di stile esterno;definizione degli stili all'inizio
del documento utilizzo della proprietà style all'interno di un Tag HTML (embedded style). Questo e-book introduttivo
servirà per apprendere tali nozioni fondametali dei fogli di stile.


Prezzo: € 0.0.

Presentazione:
REAL SOFTWARE RILASCIA LA VERSIONE 5.0 di REALbasic per Windows






Gorizia, 5 maggio 2003 - Active, distributore in esclusiva di REALSoftware, Austin, Tx, annuncia la disponibilità di REALbasic 5.0 per Windows, uno strumento per lo sviluppo semplice da usare che permette agli utenti Windows di tutti i livelli di creare applicazioni personalizzate e di compilarle sia per la piattaforma Windows che per quella Macintosh.
[>>]

http://www.active-software.com

Contatti. Utilizzare l'email generica per domande relative al sito:
Porre domande relative al sito
oppure scrivere ad un responsabile di area.
Responsabile del sito: >Andrea Martelli
Responsabile area "Corso di VB":
> Giorgio Abraini

Messaggio



File Mp3
Luigi 18/11/2003
Difficoltà: Medio

Sto scrivendo un programma in Visual Basic 6 per la lettura di file Mp3 (in definitiva una sorta di Winamp in versione ridotta).

La cosa per ora mi riesce abbastanza bene.

L'unico problema, è che non riesco ad intercettare quando un brano finisce (per quindi passare in automatico al successivo nella lista).

Per l'esecuzione dei file Mp3 utilizzo la funzione mciSendString ricavata da "winmm.dll".

Questa la Sub per attivare l'esecuzione del file Mp3:

Private Function Play_MM()

mciSendString "Close MM", 0, 0, 0
mciSendString "Open " & File & " Alias MM", 0, 0, 0
mciSendString("Play MM", 0, 0, 0)

End Function


Come posso fare per capire quando il brano finisce ?

Attualmente per interrompere l'esecuzione uso la seguente sub:


Private Function Stop_MM()

mciSendString "Stop MM", 0, 0, 0
mciSendString "Close MM", 0, 0, 0

End Function

Saluti.

Luigi T.