Differenze tra le versioni di "Individuare in GNOME il percorso contenente i file delle tracce di un CD-audio"

Da Gambas-it.org - Wikipedia.
 
(4 versioni intermedie di uno stesso utente non sono mostrate)
Riga 4: Riga 4:
 
Risultando così visibili nella cartella finale di detto percorso, come file audio (per esempio in formato wav), le tracce potranno essere caricate nelle modalità consuete.
 
Risultando così visibili nella cartella finale di detto percorso, come file audio (per esempio in formato wav), le tracce potranno essere caricate nelle modalità consuete.
  
−
 
+
Mostriamo un semplice esempio di applicazione in ambiente grafico con attivazione del Componente ''gb.sdl2.audio'' per l'esecuzione delle tracce del CD-audio (che - come già detto - saranno caricate come fossero dei file audio), nonché con preimpostazione dell'apertura della finestra dell'oggetto DialogBox in prossimità della cartella finale (solitamente cdda:host=sr0) contenente i file audio delle tracce del CD-audio.
−
Mostriamo un semplice esempio di applicazione in ambiente grafico con attivazione del Componente gb.sdl2.audio per l'esecuzione delle tracce del CD-audio (che - come già detto - saranno caricate come fossero dei file audio), nonché con preimpostazione dell'apertura della finestra dell'oggetto DialogBox in prossimità della cartella finale (solitamente cdda:host=sr0) contenente i file audio delle tracce del CD-audio.
+
  Public Sub Button1_Click()
−
  '''Public''' Sub Button1_Click()
+
−
 
 
 
   With Dialog
 
   With Dialog
 
  <FONT Color=gray>' ''Preimpostiamo l'apertura della finestra del DialogBox in prossimità della cartella contenente i file delle tracce audio:''</font>
 
  <FONT Color=gray>' ''Preimpostiamo l'apertura della finestra del DialogBox in prossimità della cartella contenente i file delle tracce audio:''</font>
 
     .Path = "/run/user/1000/gvfs"
 
     .Path = "/run/user/1000/gvfs"
 
     If .OpenFile() Then Return
 
     If .OpenFile() Then Return
−
  <FONT Color=gray>' ''La finestra di dialogo consente la sceta della traccia audio da eseguire:''</font>
+
  <FONT Color=gray>' ''La finestra di dialogo consente la scelta della traccia audio da eseguire:''</font>
 
     Music.Load(.Path)
 
     Music.Load(.Path)
 
   End With
 
   End With
−
 
+
−
  '''End'''
+
  End
−
 
+
−
  '''Public''' Sub Button2_Click()
+
 +
  Public Sub Button2_Click()
 
    
 
    
 
   Music.Play()
 
   Music.Play()
 
    
 
    
−
  '''End'''
+
  End
 
   
 
   
−
  '''Public''' Sub Button3_Click()
+
   
 +
Public Sub Button3_Click()
 
   
 
   
 
   Music.Stop()
 
   Music.Stop()
−
 
 
−
'''End'''
 
 
   
 
   
−
  '''Public''' Sub Button4_Click()
+
  End
 +
 +
 +
Public Sub Button4_Click()
 
   
 
   
 
   Music.Pause()
 
   Music.Pause()
 
   
 
   
−
  '''End'''
+
  End
 
Poiché il Componente ''gb.sdl2.audio'' non possiede una specifica Classe (come invece era per il precedente Componente ''gb.sdl.sound'', ora eliminato) per la gestione dei CDROM, senza l'individuazione del punto di montaggio del CD-audio mediante l'escamotage dell'individuazione del percorso con ''gvfs'' non sarebbe possibile caricare e quindi eseguire le tracce audio del CD.
 
Poiché il Componente ''gb.sdl2.audio'' non possiede una specifica Classe (come invece era per il precedente Componente ''gb.sdl.sound'', ora eliminato) per la gestione dei CDROM, senza l'individuazione del punto di montaggio del CD-audio mediante l'escamotage dell'individuazione del percorso con ''gvfs'' non sarebbe possibile caricare e quindi eseguire le tracce audio del CD.
  
  
 
===Individuare da codice una determinata traccia del CD-audio avente nome contenente uno o più spazi===
 
===Individuare da codice una determinata traccia del CD-audio avente nome contenente uno o più spazi===
−
Se si deve individuare da codice una determinata traccia del CD-audio, perché essa possa essere caricata ed eseguita, mettendo il caso che il suo nome sia " ''Track 1'' " (ossia contenente uno o più spazi), nella stringa contenente l'intero percorso ed il nome del file audio, che rappresenta la traccia del CD-audio, potrà essere conservato lo spazio, oppure potrà essere inserito il carattere <FONT Size=4><B>+</b></font>, oppure una delle consuete soluzioni per definire il carattere dello spazio.
+
Se si deve individuare da codice una determinata traccia del CD-audio, affinché essa possa essere caricata ed eseguita, qualora il suo nome sia <FONT Color=darkgreen>''Track 1''</font> (ossia contenente uno o più spazi), nella stringa contenente l'intero percorso ed il nome del file audio - che rappresenta la traccia del CD-audio - potrà essere conservato lo spazio, oppure potrà essere inserito il carattere <FONT Size=4><B>+</b></font>, oppure una delle consuete soluzioni per definire il carattere dello spazio.
  
 
Mostriamo al riguardo un esempio, nel quale si utilizzerà il Componente ''gb.media'' e si eseguirà la prima traccia del CD-audio impostando al posto dello spazio il carattere "+":
 
Mostriamo al riguardo un esempio, nel quale si utilizzerà il Componente ''gb.media'' e si eseguirà la prima traccia del CD-audio impostando al posto dello spazio il carattere "+":
−
  '''Public''' Sub Main()
+
  Public Sub Main()
−
 
+
 
   Dim mp As MediaPlayer
 
   Dim mp As MediaPlayer
−
 
+
 
   With mp = New MediaPlayer
 
   With mp = New MediaPlayer
 
  <FONT Color=gray>' ''Impostiamo ad esempio la traccia audio num. 1 da far eseguire:''</font>
 
  <FONT Color=gray>' ''Impostiamo ad esempio la traccia audio num. 1 da far eseguire:''</font>
Riga 51: Riga 53:
 
     .Play
 
     .Play
 
   End With
 
   End With
−
 
+
 
  <FONT Color=gray>' ''Fa attribuire un valore superiore a zero alla proprietà ".Duration"  dell'Oggetto "MediaPlayer, per consentire l'esecuzione del ciclo successivo:''</font>
 
  <FONT Color=gray>' ''Fa attribuire un valore superiore a zero alla proprietà ".Duration"  dell'Oggetto "MediaPlayer, per consentire l'esecuzione del ciclo successivo:''</font>
−
   Do
+
   Repeat
 
     Wait 0.01
 
     Wait 0.01
−
   Loop Until mp.Duration > 0
+
   Until mp.Duration > 0
−
 
+
−
   Do
+
   Repeat
 
  <FONT Color=gray>' ''Mostra in console la posizione, espressa in secondi, all'interno dei dati processati:''</font>
 
  <FONT Color=gray>' ''Mostra in console la posizione, espressa in secondi, all'interno dei dati processati:''</font>
−
     Write "\rDurata del brano: " & CStr(Date(0, 0, 0, 0, 0, 0, mp.Duration * 1000)) & "  -  Tempo trascorso: " & CStr(Date(0, 0, 0, 0, 0, 0, mp.Position * 1000))
+
     Write "\rDurata del brano: " & CStr(Time(0, 0, 0, mp.Duration * 1000)) & "  -  Tempo trascorso: " & CStr(Time(0, 0, 0, mp.Position * 1000))
−
   Loop Until mp.Position >= mp.Duration
+
    Wait 0.01
 +
   Until mp.Position >= mp.Duration
 
    
 
    
 
   mp.Stop
 
   mp.Stop
 
    
 
    
−
  '''End'''
+
  End

Versione attuale delle 08:05, 30 lug 2023

Sovente , volendo vedere i file delle tracce di un CD-audio mediante l'oggetto DialogBox, per poterli caricare e successivamente eseguire, non riusciamo ad individuare il punto di montaggio nel file-system che rappresenta il CD-audio. In GNOME il punto di montaggio, che rappresenta il CD-Audio, è solitamente il seguente percorso: 

/run/user/1000/gvfs/cdda:host=sr0

Risultando così visibili nella cartella finale di detto percorso, come file audio (per esempio in formato wav), le tracce potranno essere caricate nelle modalità consuete.

Mostriamo un semplice esempio di applicazione in ambiente grafico con attivazione del Componente gb.sdl2.audio per l'esecuzione delle tracce del CD-audio (che - come già detto - saranno caricate come fossero dei file audio), nonché con preimpostazione dell'apertura della finestra dell'oggetto DialogBox in prossimità della cartella finale (solitamente cdda:host=sr0) contenente i file audio delle tracce del CD-audio. 

Public Sub Button1_Click()

 With Dialog
' Preimpostiamo l'apertura della finestra del DialogBox in prossimità della cartella contenente i file delle tracce audio:
   .Path = "/run/user/1000/gvfs"
   If .OpenFile() Then Return
' La finestra di dialogo consente la scelta della traccia audio da eseguire:
   Music.Load(.Path)
 End With

End


Public Sub Button2_Click()
 
 Music.Play()
 
End


Public Sub Button3_Click()

 Music.Stop()

End


Public Sub Button4_Click()

 Music.Pause()

End

Poiché il Componente gb.sdl2.audio non possiede una specifica Classe (come invece era per il precedente Componente gb.sdl.sound, ora eliminato) per la gestione dei CDROM, senza l'individuazione del punto di montaggio del CD-audio mediante l'escamotage dell'individuazione del percorso con gvfs non sarebbe possibile caricare e quindi eseguire le tracce audio del CD.


Individuare da codice una determinata traccia del CD-audio avente nome contenente uno o più spazi

Se si deve individuare da codice una determinata traccia del CD-audio, affinché essa possa essere caricata ed eseguita, qualora il suo nome sia Track 1 (ossia contenente uno o più spazi), nella stringa contenente l'intero percorso ed il nome del file audio - che rappresenta la traccia del CD-audio - potrà essere conservato lo spazio, oppure potrà essere inserito il carattere +, oppure una delle consuete soluzioni per definire il carattere dello spazio.

Mostriamo al riguardo un esempio, nel quale si utilizzerà il Componente gb.media e si eseguirà la prima traccia del CD-audio impostando al posto dello spazio il carattere "+": 

Public Sub Main()

 Dim mp As MediaPlayer

 With mp = New MediaPlayer
' Impostiamo ad esempio la traccia audio num. 1 da far eseguire:
   .URL = Media.URL("/run/user/1000/gvfs/cdda:host=sr0/Track+1.wav")
   .Play
 End With

' Fa attribuire un valore superiore a zero alla proprietà ".Duration"  dell'Oggetto "MediaPlayer, per consentire l'esecuzione del ciclo successivo:
 Repeat
   Wait 0.01
 Until mp.Duration > 0

 Repeat
' Mostra in console la posizione, espressa in secondi, all'interno dei dati processati:
   Write "\rDurata del brano: " & CStr(Time(0, 0, 0, mp.Duration * 1000)) & "   -   Tempo trascorso: " & CStr(Time(0, 0, 0, mp.Position * 1000))
   Wait 0.01
 Until mp.Position >= mp.Duration
  
 mp.Stop
  
End
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Individuare_in_GNOME_il_percorso_contenente_i_file_delle_tracce_di_un_CD-audio&oldid=34615"