Gambas-it

Archivi (sola lettura) => Programmazione (Gambas 2) => Topic aperto da: skrokkio - 02 Novembre 2009, 18:25:17

Titolo: [risolto ]rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: skrokkio - 02 Novembre 2009, 18:25:17

ciao dovrei creare una routine che permetta di rilevare quando e' inserito un dvd vergine.
qualcuno sa aiutarmi ?
ciao

Titolo: Re: rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: fsurfing - 02 Novembre 2009, 19:07:36

purtroppo non so aiutarti, credo però che non ci sia una funzione simile già pronta in gambas, forse ti conviene cercare un comando da terminale che svolga questa incompenza e poi lo lanci/controlli tramite gambas

Titolo: Re: rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: skrokkio - 02 Novembre 2009, 20:34:48

purtroppo non riesco a trovare nulla. in rete ho trovato script per terminale che "aspettano" l'inserimento di un cd. Purtroppo non dunziona coi DVD vuoti.
Spero di trovare qualche aiuto qui.
ciao e grazie

Titolo: Re: [risolto ]rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: skrokkio - 05 Novembre 2009, 21:49:47

PUBLIC SUB mytimer_timer()
SHELL "hal-device | grep volume_empty_dvd_plus_r_dl" TO riga2
IF InStr(riga2, "/org/freedesktop/Hal/devices/volume_empty_dvd_plus_r_dl") AND IF InStr(riga2, "/org/freedesktop/Hal/devices/volume_empty_dvd_plus_r_dl") THEN
 'IF InStr(riga2, "/org/freedesktop/Hal/devices/volume_empty_dvd_plus_r_dl") AND IF InStr(riga2, "/org/freedesktop/Hal/devices/volume.disc.is_blank") THEN
PRINT "dvd dl inserito"
ELSE  
PRINT "nessun dvd inserito"
ENDIF
END

Titolo: Re: [risolto ]rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: fsurfing - 05 Novembre 2009, 22:53:47

ho provato ma a me non funziona,

ho provato a modificarlo e così mi funziona:

Codice: [Seleziona]

PUBLIC SUB mytimer_timer()
 SHELL "hal-device | grep volume_empty_dvd" TO riga2 
      
      
      IF Len(riga2) <> 0 THEN
      PRINT "dvd dl inserito"
      ELSE
      PRINT "nessun dvd inserito"
      ENDIF
  END
 

Titolo: Re: [risolto ]rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: fsurfing - 05 Novembre 2009, 23:07:09

az ho capito ora che dl sta per dual layer rw per rewitable e per recordable

quindi si potrebbe modificare cosi:

Codice: [Seleziona]

PUBLIC SUB Timer1_timer()

DIM RIGA2 AS String
      
      SHELL "hal-device | grep volume_empty_dvd" TO riga2 
      
      
      IF Len(riga2) <> 0 THEN
          IF InStr(riga2, "dvd_dl") <> 0 THEN 
                PRINT "dvd dual layer vuoto inserito"
          ELSE IF InStr(riga2, "dvd_rw") <> 0 THEN 
                PRINT "dvd rewritable vuoto inserito"
          ELSE IF InStr(riga2, "dvd_r") <> 0 THEN 
                PRINT "dvd recordable vuoto inserito"
          ENDIF 
      ELSE
          PRINT "nessun dvd vuoto inserito"
      ENDIF
      
      
END
 

Titolo: Re: [risolto ]rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: Ceskho - 05 Novembre 2009, 23:12:31

SELECT CASE non ti piace?

Titolo: Re: [risolto ]rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: fsurfing - 05 Novembre 2009, 23:21:41

no non mi piace affatto  :-)
a te non piace if else if?
il giorno che mi vedrai usare select case sarà perchè ho copiato un tuo software! :-P

Titolo: Re: [risolto ]rilevare il masterizzatore con un dvd vuoto dentro
Inserito da: vuott - 09 Ottobre 2013, 23:38:59

E' agevolmente verificabile mediante alcune risorse della libreria "libdvdread4":

http://www.gambas-it.org/wiki/index.php?title=Conoscere_il_numero_di_titoli_e_di_capitoli_presenti_in_un_DVD_con_l%27API_di_libdvdread4