Salvare file immagine da webcam

[akrobaticone]

Ciao
vorrei salvare una immagine catturata da una webcam
seguendo le inicazioni dalla wiki
https://www.gambas-it.org/wiki/index.php?title=Estrarre_e_salvare_singole_immagini_da_una_ripresa_video_mediante_WebCam_effettuata_con_il_Componente_gb.media
ho fatto dicersi tentativi, ma lla ripresa della cam non viene visualizzata nella drawingarea, ma in una finestra che appare a  pieno form
allego il progetto, per la cronaca ho provato anche le altre opzioni suggerite dalla wiki

 

[Gianluigi]

Ho apportato qualche modifica e qui funziona. 

[cogier]

Prova questa versione. È molto più semplice.

[vuott]

ho fatto dicersi tentativi, ma lla ripresa della cam non viene visualizzata nella drawingarea, ma in una finestra che appare a  pieno form

A me i codici della wiki funzionano perfettamente.
Hai provato ad eseguirli "così come sono" ?

Aggiungo che alla chiusura della finestra principale del tuo programma, ottengo in console questo avviso di errore grafico:

"The program 'test' received an X Window System error.
This probably reflects a bug in the program.
The error was 'BadDrawable (invalid Pixmap or Window parameter)'.
  (Details: serial 123 error_code 9 request_code 151 minor_code 9)
  (Note to programmers: normally, X errors are reported asynchronously;
   that is, you will receive the error a while after causing it.
   To debug your program, run it with the --sync command line
   option to change this behavior. You can then get a meaningful
   backtrace from your debugger if you break on the gdk_x_error() function.)"

[Gianluigi]

Il problema, almeno in Ubuntu, è che col programma di Akrobaticone e anche con quello di cogier non si vedono i pulsanti per fare la foto, i quali vengono nascosti dalla drawing e solo passandogli sopra col mause si intravedono a intermittenza per poi sparire una volta sopra.
Comunque cliccando nell'area del tasto si riescono ad ottenere le immagini.
Il progetto di Akrobaticone da questi errori:

(test:3068): GdkPixbuf-WARNING **: 17:35:06.031: Unreco
gnized parameter (quality) passed to PNG saver.
The program 'test' received an X Window System error.
This probably reflects a bug in the program.
The error was 'BadDrawable (invalid Pixmap or Window parameter)'.
  (Details: serial 619 error_code 9 request_code 151 minor_code 9)
  (Note to programmers: normally, X errors are reported asynchronously;
   that is, you will receive the error a while after causing it.
   To debug your program, run it with the --sync command line
   option to change this behavior. You can then get a meaningful
   backtrace from your debugger if you break on the gdk_x_error() function.)
Immagini catturate: 1

Nel progetto di cogier l'immagine della finestra è tutta tremolante e distorta e alla chiusura da l'errore:

gb.media: warning: could not catch end of stream.

Il mio funziona benissimo e non da nessun errore o avviso e lo può usare anche fido come dimostra il risultato.

P.S. Comunque anche variandola la qualità rimane la stessa, scadente anche con le qt.

[akrobaticone]

@Vuott
I codici della wiki li ho eseguiti così come sono, ma il risultato era il medesimo
L'errore l'ho visto e pensavo fosse un problema derivante dallla Drawingarea, ma non ci ho capito molto

@Gianluigi, Cogier
i vostri programmi li ho provati e in effetti funzionano, anche quello di Cogier non va male sul mio PC
non avevo pensato di usare i contenitori, sono controlli che non riesco ancora a fare miei.....
Nelle mie intenzioni volevo creare un form dove la drawing area è una finestra contornata di altri controlli e quindi solo una parte del tutto
in pratica nel mio gestione manifestazioni vorrei dare la possibilità di scattare una foto ai pilloti per visualizzarla nelle relative schede
A questo punto cambio solo le modalità di visualizzazione, così come mi avete suggerito

@Cagnolino di Gianluigi
nulla di strano..il programma non funziona ancora, quindi tutto normale :-))

@Tutti
Grazie per l'aiuto

[Gianluigi]

 
Un consiglio, aggiungi questo codice se non vuoi che in mancaza di webcam il progetto crashi:

Codice: [Seleziona]

  If Not Exist(pl.URL) Then
    Message.Info("Nessuna webcam presente")
    Me.Close
  Endif

[akrobaticone]

Un consiglio, aggiungi questo codice se non vuoi che in mancaza di webcam il progetto crashi:

Codice: [Seleziona]

  If Not Exist(pl.URL) Then
    Message.Info("Nessuna webcam presente")
    Me.Close
  Endif

Dovrei anche fare un controllo per fare una lista dei dispositivi collegati e scegliere quello corretto
sul portatile c'è quella integrata nel monitor e una eventuale collegata su USB
questa sera ci lavoro

[vuott]

@Vuott
I codici della wiki li ho eseguiti così come sono, ma il risultato era il medesimo

E' alquanto strano.
Forse c'è qualche problema di librerie o incompatibilità.

[akrobaticone]

Questa sera per sicurezza riprovo di nuovo
tra i vari tentativi non vorrei aver omesso qualche cosa

[Gianluigi]

@vuott
Dovresti specificare che occorre creare progetti QT Application, altrimenti i test con i desktop GTK non funzionano a dovere.

@Akrobaticone
Con Gnome occorre riprovare con progetti QT Application.

[akrobaticone]

@vuott
Dovresti specificare che occorre creare progetti QT Application, altrimenti i test con i desktop GTK non funzionano a dovere.

@Akrobaticone
Con Gnome occorre riprovare con progetti QT Application.

Hai ragione
farò tutte le prove anche con QT

[vuott]

Sì, è come dice Gianluigi: c'è questa incompatibilità con GTK.

[vuott]

@vuott
Dovresti specificare che occorre creare progetti QT Application, altrimenti i test con i desktop GTK non funzionano a dovere.

Ho provveduto, grazie.

[Gianluigi]

Un consiglio, aggiungi questo codice se non vuoi che in mancaza di webcam il progetto crashi:

Codice: [Seleziona]

  If Not Exist(pl.URL) Then
    Message.Info("Nessuna webcam presente")
    Me.Close
  Endif

Dovrei anche fare un controllo per fare una lista dei dispositivi collegati e scegliere quello corretto
sul portatile c'è quella integrata nel monitor e una eventuale collegata su USB
questa sera ci lavoro

Mi sono dimenticato un Return dopo Me.Close:
 

Codice: [Seleziona]

pl.URL = "v4l2:///dev/video0"
  If Not Exist(pl.URL) Then
    Message.Info("Nessuna webcam presente")
    Me.Close
    Return
  Endif

Altrimenti ottieni errore su Play.
Riguardo il controllo dei dispositivi, lascio magnanimamente a vuott il compito di risponderti