[RISOLTO] registrare con mencoder

[vuott]

Per quanto riguarda il conteggio del video, con il tasto destro man mano che registra  aggiorna i mb, pensavo che si potesse vedere il tutto in una label, cmq va bene ugualmente.

Potresti - appunto - mostrare il risultato in una Label ! Che ci vuole ?

Codice: gambas [Seleziona]

   Label.Text = Stat("percorso_del_file").Size

Inoltre, poiché tu hai attivato ogni secondo il Timer, puoi inserire questa riga proprio all'interno della routine dell'evento Timer (cioè quella: ....Timer1_Timer()  ). In tal modo avresti una visualizzazione dell'incremento della dimensione del file temporaneo, e dunque della registrazione, secondo dopo secondo !

[fernando]

Ciao
Scusa... l'ho cambiata come mi hai suggerito in ss , ma porta l'errore :
Out of Bounds.
Cordiali saluti

[vuott]

... l'ho cambiata come mi hai suggerito in ss , ma porta l'errore :
Out of Bounds.

Nel ciclo del FOR metti:

Codice: gambas [Seleziona]

  For j = 0 to ss.Max

se c'è più di 1 riga (quindi due o più emittenti).
Se, invece, fai il test con una riga sola il ciclo FOR ovviamente non serve.

[fernando]

Considera che le righe sono tante , non le ho contate , ma pensa a tutte le emittenti del digitale terrestre...
saranno 80, 100 boh non lo so,
quindi ho sostituito    For j = 0 To 2    con   For j = 0 To ss.Max    giusto ?
mi porta ancora l'errore : Out of Bounds
Cordiali saluti

[vuott]

Considera che le righe sono tante , non le ho contate , ma pensa a tutte le emittenti del digitale terrestre...
saranno 80, 100 boh non lo so,
quindi ho sostituito    For j = 0 To 2    con   For j = 0 To ss.Max    giusto ?
mi porta ancora l'errore : Out of Bounds

Scusa, metti questa istruzione appena prima del ciclo FOR:

Codice: gambas [Seleziona]

Print ss.count

e fammi sapere il risultato.

[fernando]

Per spiegarmi ..... in runtime (F5), mi porta sempre l'errore : Out of bounds, nella console di gambas il numero 132, forse tu vorresti dare il numero esatto delle emittenti ? Però aggiornando di tanto in tanto con W_scan possono aumentare , mi spiego ? Scusa se sono precipitoso, cmq fai tu. Il codice che io sto usando è questo:

Public Sub Button5_Click()
 Dim ss As String[]   
 Dim j As Byte 
ss = Split(File.Load("/home/nando/channels.conf"), "\n")
Print ss.count
     For j = 0 To ss.Max 
      ListBox1.add(Split(ss[j], ":")[0]) 
   Next 
End
Volevo anche aggiungere che ho provato ho   :   Label1.Text = Stat("/home/nando/").Size inserendolo nel timer1, ma viene fuori sempre lo stesso numero (20480) appena parte mencoder qualunque siano i minuti di rec , quindi senza incremento.

[vuott]

Per non allungare eccessivamente questa discussione, ti ho inviato qualche messaggio privato.




Aggiorniamo la discussione semplicemente dicendo che per eliminare quell'errore di "Out of Bound" si è dovuto eliminare ogni possibile eventuale elemento vuoto.
Inoltre si è aggiunta una nuova linea di comando nella routine per evitare di assegnare più di una volta il nome delle emittenti televisive alla ListBox.
Pertanto il nuovo codice ora è:

Codice: gambas [Seleziona]

Public Sub Button5_Click()

  Dim ss As String[]   
  Dim j As Short

    If ListBox1[0].Text <> Null Then Return

    ss = Split(File.Load("/home/nando/channels.conf"), "\n", "", True)


     For j = 0 To ss.Max 
        ListBox1.add(Split(ss[j], ":")[0]) 
     Next 

End

Volevo anche aggiungere che ho provato ho   :   Label1.Text = Stat("/home/nando/").Size inserendolo nel timer1,......

Ovviamente quando ho scritto Label.Text = Stat("percorso_del_file").Size, mi riferivo non solo al "percorso" in sé, ma anche al file. Quindi va riletta così:

Codice: gambas [Seleziona]

   Label1.Text = Stat("/home/nando/nome_File_temporaneo").Size