AutoIt Français

Bonjour,

J'ai revu à la baisse mes besoins , j'ai par hasard trouvé un script plus simple tjs avec 4 cams mais sans fioritures !

Mon seul problème est de créer commandes différentes ( 1 par caméra) qui au premier appui ouvre la caméra associée et au deuxième appuie la referme proprement.

Je porpose les touches F1 à F4 :

Multicam.au3

► Afficher le texte

Code : Tout sélectionner

$WM_CAP_START = 0x400
$WM_CAP_UNICODE_START = $WM_CAP_START + 100
$WM_CAP_PAL_SAVEA = $WM_CAP_START + 81
$WM_CAP_PAL_SAVEW = $WM_CAP_UNICODE_START + 81
$WM_CAP_UNICODE_END = $WM_CAP_PAL_SAVEW
$WM_CAP_ABORT = $WM_CAP_START + 69
$WM_CAP_DLG_VIDEOCOMPRESSION = $WM_CAP_START + 46
$WM_CAP_DLG_VIDEODISPLAY = $WM_CAP_START + 43
$WM_CAP_DLG_VIDEOFORMAT = $WM_CAP_START + 41
$WM_CAP_DLG_VIDEOSOURCE = $WM_CAP_START + 42
$WM_CAP_DRIVER_CONNECT = $WM_CAP_START + 10
$WM_CAP_DRIVER_DISCONNECT = $WM_CAP_START + 11
$WM_CAP_DRIVER_GET_CAPS = $WM_CAP_START + 14
$WM_CAP_DRIVER_GET_NAMEA = $WM_CAP_START + 12
$WM_CAP_DRIVER_GET_NAMEW = $WM_CAP_UNICODE_START + 12
$WM_CAP_DRIVER_GET_VERSIONA = $WM_CAP_START + 13
$WM_CAP_DRIVER_GET_VERSIONW = $WM_CAP_UNICODE_START + 13
$WM_CAP_EDIT_COPY = $WM_CAP_START + 30
$WM_CAP_END = $WM_CAP_UNICODE_END
$WM_CAP_FILE_ALLOCATE = $WM_CAP_START + 22
$WM_CAP_FILE_GET_CAPTURE_FILEA = $WM_CAP_START + 21
$WM_CAP_FILE_GET_CAPTURE_FILEW = $WM_CAP_UNICODE_START + 21
$WM_CAP_FILE_SAVEASA = $WM_CAP_START + 23
$WM_CAP_FILE_SAVEASW = $WM_CAP_UNICODE_START + 23
$WM_CAP_FILE_SAVEDIBA = $WM_CAP_START + 25
$WM_CAP_FILE_SAVEDIBW = $WM_CAP_UNICODE_START + 25
$WM_CAP_FILE_SET_CAPTURE_FILEA = $WM_CAP_START + 20
$WM_CAP_FILE_SET_CAPTURE_FILEW = $WM_CAP_UNICODE_START + 20
$WM_CAP_FILE_SET_INFOCHUNK = $WM_CAP_START + 24
$WM_CAP_GET_AUDIOFORMAT = $WM_CAP_START + 36
$WM_CAP_GET_CAPSTREAMPTR = $WM_CAP_START + 1
$WM_CAP_GET_MCI_DEVICEA = $WM_CAP_START + 67
$WM_CAP_GET_MCI_DEVICEW = $WM_CAP_UNICODE_START + 67
$WM_CAP_GET_SEQUENCE_SETUP = $WM_CAP_START + 65
$WM_CAP_GET_STATUS = $WM_CAP_START + 54
$WM_CAP_GET_USER_DATA = $WM_CAP_START + 8
$WM_CAP_GET_VIDEOFORMAT = $WM_CAP_START + 44
$WM_CAP_GRAB_FRAME = $WM_CAP_START + 60
$WM_CAP_GRAB_FRAME_NOSTOP = $WM_CAP_START + 61
$WM_CAP_PAL_AUTOCREATE = $WM_CAP_START + 83
$WM_CAP_PAL_MANUALCREATE = $WM_CAP_START + 84
$WM_CAP_PAL_OPENA = $WM_CAP_START + 80
$WM_CAP_PAL_OPENW = $WM_CAP_UNICODE_START + 80
$WM_CAP_PAL_PASTE = $WM_CAP_START + 82
$WM_CAP_SEQUENCE = $WM_CAP_START + 62
$WM_CAP_SEQUENCE_NOFILE = $WM_CAP_START + 63
$WM_CAP_SET_AUDIOFORMAT = $WM_CAP_START + 35
$WM_CAP_SET_CALLBACK_CAPCONTROL = $WM_CAP_START + 85
$WM_CAP_SET_CALLBACK_ERRORA = $WM_CAP_START + 2
$WM_CAP_SET_CALLBACK_ERRORW = $WM_CAP_UNICODE_START + 2
$WM_CAP_SET_CALLBACK_FRAME = $WM_CAP_START + 5
$WM_CAP_SET_CALLBACK_STATUSA = $WM_CAP_START + 3
$WM_CAP_SET_CALLBACK_STATUSW = $WM_CAP_UNICODE_START + 3
$WM_CAP_SET_CALLBACK_VIDEOSTREAM = $WM_CAP_START + 6
$WM_CAP_SET_CALLBACK_WAVESTREAM = $WM_CAP_START + 7
$WM_CAP_SET_CALLBACK_YIELD = $WM_CAP_START + 4
$WM_CAP_SET_MCI_DEVICEA = $WM_CAP_START + 66
$WM_CAP_SET_MCI_DEVICEW = $WM_CAP_UNICODE_START + 66
$WM_CAP_SET_OVERLAY = $WM_CAP_START + 51
$WM_CAP_SET_PREVIEW = $WM_CAP_START + 50
$WM_CAP_SET_PREVIEWRATE = $WM_CAP_START + 52
$WM_CAP_SET_SCALE = $WM_CAP_START + 53
$WM_CAP_SET_SCROLL = $WM_CAP_START + 55
$WM_CAP_SET_SEQUENCE_SETUP = $WM_CAP_START + 64
$WM_CAP_SET_USER_DATA = $WM_CAP_START + 9
$WM_CAP_SET_VIDEOFORMAT = $WM_CAP_START + 45
$WM_CAP_SINGLE_FRAME = $WM_CAP_START + 72
$WM_CAP_SINGLE_FRAME_CLOSE = $WM_CAP_START + 71
$WM_CAP_SINGLE_FRAME_OPEN = $WM_CAP_START + 70
$WM_CAP_STOP = $WM_CAP_START + 68


#include <WindowsConstants.au3>
#include <GUIConstants.au3>

;===============================================================================
;
; Description:      Main program
;
;===============================================================================

; Prepare the required Windows DLLs
$avi = DllOpen("avicap32.dll")
$user = DllOpen("user32.dll")

; Build the main window with the window title "RRMulti" to be used for embedding
$Main = GUICreate("MultiCam", 800, 600, -1, -1, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))

;===============================================================================
; Create 4 capture windows, one for each camera
; Notes: 1. Windows can be added or removed as needed.
;        2. The WDM Capture Device is indicated in the $WM_CAP_DRIVER_CONNECT message for each capture window
;        3. The size and location of the capture area is set in the "capCreateCaptureWindow" DLL call
;        4. The script will run without cameras connected and will show 4 black capture areas
;===============================================================================

$cap0 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 1, "int", 1, "int", 400, "int", 300, "hwnd", $Main, "int", 1)
DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 0, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

$cap1 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 402, "int", 1, "int", 400, "int", 300, "hwnd", $Main, "int", 1)
DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

$cap2 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 1, "int", 302, "int", 400, "int", 300, "hwnd", $Main, "int", 1)
DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 2, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

$cap3 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 402, "int", 302, "int", 400, "int", 300, "hwnd", $Main, "int", 1)
DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 3, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

; Start the display
GUISetState(@SW_SHOW)
;HotKeySet("{INSERT}", "SnapShot"); Press 'Insert' to make a SnapShot !

; Process Windows messages, we only look at the Close event so the cameras can be disconnected
; Note:  This routine can also handle messsages sent by other RR programs
While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then
        DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        
        DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        
        DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        
        DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        
        DllClose($user)
        Exit
    EndIf
    Sleep(1)
WEnd


;===============================================================================
;
; Description:      Takes a snapshot
; Syntax:           Snapshot($sFile, $sId)
; Parameter(s):     $sId       - Id  ($cap{0-3}[0])
;                   $sFile     - File to save the picture to (*.avi)
; Requirement(s):   A webcam
; Return Value(s):  On Success - Returns 1
;                   On Failure - Returns 0
; Author(s):        Ludocus
; Note(s):
;
;===============================================================================
Func SnapShot($sFile, $sId)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_GRAB_FRAME_NOSTOP, "int", 0, "int", 0)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_FILE_SAVEDIBA, "int", 0, "str", $sFile)
EndFunc   


;===============================================================================
;
; Description:      Starts recording the webcam to a file
; Syntax:           RecordStart($sFile, $sId)
; Parameter(s):     $sId       - Id  ($cap{0-3}[0])
;                   $sFile     - File to save the movie to (*.avi)
; Requirement(s):   A webcam
; Return Value(s):  On Success - Returns 1
;                   On Failure - Returns 0
; Author(s):        Ludocus
; Note(s):          Stop recording by: RecordStop($Id)
;
;===============================================================================
Func RecordStart($sFile, $sId)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_FILE_SET_CAPTURE_FILEA, "int", 0, "str", $sFile)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_SEQUENCE, "int", 0, "int", 0)
    If @error Then
        Return 0
    Else
        Return 1
    EndIf

EndFunc   

;===============================================================================
;
; Description:      Stops recording.
; Syntax:           RecordStop($sId)
; Parameter(s):     $sId       - Id ($cap{0-3}[0])
; Requirement(s):   A webcam
; Return Value(s):  On Success - Returns 1
;                   On Failure - Returns 0
; Author(s):        Ludocus
; Note(s):          None
;
;===============================================================================
Func RecordStop($sId)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_STOP, "int", 0, "int", 0)
    If @error Then
        Return 0
    Else
        Return 1
    EndIf
EndFunc

Merci de votre aide !

Bonjour,

J'ai un peu bossé et ai fini par arriver à quelque chose de fonctionnel, mais pour une seule caméra.
Si je rajoute les trois autres, le scripte devient trés long à charger !

Mais mon problème et que je n'ai pas de webcam pour tester. J'utilise pour mes test http://www.webcamsimulator.com/ qui comme son
nom l'indique simule une caméra à partir d'un fichier vidéo, et pour une raison que j'ignore, je dois aussi utiliser http://www.manycam.com/ et choisir la source vidéo dans manycam pour voir afin une vidéo dans ma GUI ! OOUUUFFF!!!

Donc , si quelqu'un a au moins deux webcam usb sur son PC, celui-ci pourrait-il me dire si déjà sans ces programmes mon script fonctionne ?

Utilisation:
-rester sur 4 écrans par défaut
-choisir 'Save Bmp' ou 'Save Avi'
-cliquer sur Cam1 sous le combo 'Save Type'
(si aucun préfix n'est défini dans le fichier ini , chaque nouveau fichier, bmp ou avi, est nommé à partir de la date et de l'heure du pc) .

Ce qu'il manque:
-pouvoir choisir une source différente pour chaque webcam
-mettre ON ou OFF chaque webcam séparément (les 4 boutons sous le combo 'Nbr of Cam').
-choisir écran 1 webcam ou 4 webcams(combo 'Nbr of Cam') tout en restant dans la même GUI .

J'ai mis à jour le script dans le premier post, mais je joinds tous les fichiers nécessaires .

Merci de votre aide.

56 lectures et pas un avis ?

bein non

Je n'ai pas posté au bon endroit ou quoi ?

J'ai un peu avancé .
Je pense avoir trouvé comment définir quatre webcams différentes:
J'ai modifié l'UDF webcam.au3 de telle sorte que l'on puisse gérer 4 devices différents:

ainsi, les lignes:

► Afficher le texte

deviennent:

► Afficher le texte

où $WebCamId peut donc prendre les valeurs 0 à 3 ; il semblerait que l'on puisse aller jusqu'à 9 !

Je n'arrive toujours pas à bien gérer le passage de 4 webcams à une webcam à l'écran, fonction _Gui1().
Si l'on peut me guider ?

J'ai modifié le fichier principal dans le post n°1.
J'ai besoin d'un testeur svp ! (une webcam nécessaire, deux idéal!)

le nouveau fichier UDF webcam.au3 serait donc:

Bonjour,
Je continue mon monologue

.

J'ai mis à jour le post un . Essentiellement du graphique.

Actuellement, je peut:
-sauver bmp ou avi pour chaque webcam mais uniquement si une seule webcam est ON
-definir leasource pour chaque webcam dans un fichier ini

Ce que je ne peux pas faire:
-fermer une webcam
-sortir du programme si plus d'une webcam est démarrée
-sauver un fichier bmp/avi si plus d'une webcam est démarrée
-ne peux pas effacer le fichier bmp aprés crétion du fichier jpg

Merci de votre aide !

Dommage que je n'ai pas les connaissances requises, le projet est intéressant j'espère que tu ne va pas l'abandonner.
J'ai testé avec la webcam de mon pc portable mais celle ci ne s'affiche pas. Cela dit tu destinais sa a des webcam usb je sais pas si sa fait une différence. En revanche ma cam virtuel fonctionne.
Sinon le script est effectivement long à charger et mange du cpu, si tu réussi à le boucler la case optimisation s'impose =p
Bon courage !

Il est tres difficile de s'imiscer dans un script aussi complet que celui la. On ne sait pas vraiment ou est le probleme, on ne peut pas tester bref c'est difficile de vous aider. Ceci dit un projet tel que celui ci devrait etre effectué avec un langage de bas niveau et non un langage de script comme Autoit, vous gagneriez alors le double de vitesse de chargement.

Merci de vos encouragements.

Effectivement autoit n'est peut être pas approprié, mais je ne connait, et trés mal, que lui.
Le titre n'est pas bien clair effectivement, car le script doit pouvoir marcher avec une webcam branchée autrement qu'en USB.

Mon script est un ajout de différent morceaux de scripts trouvés ci et là .

Tout est défini dans l'udf webcam.au3 .

Les devices (sources) vont ici de 0 à 3.
Les commandes dispo sont:

_WebcamOpen($sHwnd, $sLeft, $sTop, $sWidth, $sHeight,$WebCamId=0) ;démarrage de la caméra
_WebcamClose($sId) ; fermeture de la caméra
_WebcamSnap($sId, $sFile) ; création bmp selon n° caméra
_WebcamRecordStart($sFile, $sId) ; enregistrement avi selon n° caméra
_WebcamRecordStop($sId) ; arrêt enregistrement avi selon n° caméra

Aprés un peu de lecture , j'ai ajouté cette fonction Setting qui permet de régler , la compression, le format , la source.
Settings($sId,$Settings)

J'ai ajouté dans le post 1 l'udf webcam.au3 modifié !

Voilà pour une petite description .

Bonjour,

Je continue mon monologue

,
Je viens de mettre à jour le post 1 (multicam.au3)
Dans cette version , j'ai nettoyé le code, ajouté la possibilité d'envoyer l'image sauvegardée sur une page web (pour l'instant 192.168.0.1:6969) et l'envoie par mail d'un fichier bmp zipé .

J'ai un problème avec la fonction de sauvegarde bmp.
Je souhaite , aprés la création du bmp, convertir le bmp en jpg.
J'utilise donc GDIPlus, aucun problem.
Par contre , je n'arrive pas à effacer mon fichier bmp aprés création du jpg , comme si GDIplus me bloqait le "Filedelete".

Par contre si j'efface les lignes GDIPlus, j'arrive bien à effacer mon fichier bmp ?

Une idée SVP

voici ma fonction:

► Afficher le texte

Essaye de rajouter

Code : Tout sélectionner

_GDIPlus_ImageDispose ($img)

avant le shutdown

Merci timmalos,

C'était pas un problème donc de fermeture de GDIPlus.

Merci

Bonjour,

J'ai revu à la baisse mes besoins . J'ai donc reduit énormément le script d'origine , voir post 1 ,(plus lisible !).

Mon seul besoin est de pouvoir ouvrir et fermer à volonté chaque caméra séparément .
Par appui sur les touches F1 à F4 par exemple .
Un appuie sur F1 doit ouvrir la cam 1 , un autre appuie la refermer .

J'ai simplifier le script du post 1 ce qui devrait permettre de mieux comprendre mon problème !

Merci de votre aide

Bon je pense avoir trouvé tous mes problèmes .

Voici le script final avec l'ajout de 4 boutons on/off !

► Afficher le texte

Code : Tout sélectionner

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_outfile=4webcams.exe
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
$WM_CAP_START = 0x400
$WM_CAP_UNICODE_START = $WM_CAP_START + 100
$WM_CAP_PAL_SAVEA = $WM_CAP_START + 81
$WM_CAP_PAL_SAVEW = $WM_CAP_UNICODE_START + 81
$WM_CAP_UNICODE_END = $WM_CAP_PAL_SAVEW
$WM_CAP_ABORT = $WM_CAP_START + 69
$WM_CAP_DLG_VIDEOCOMPRESSION = $WM_CAP_START + 46
$WM_CAP_DLG_VIDEODISPLAY = $WM_CAP_START + 43
$WM_CAP_DLG_VIDEOFORMAT = $WM_CAP_START + 41
$WM_CAP_DLG_VIDEOSOURCE = $WM_CAP_START + 42
$WM_CAP_DRIVER_CONNECT = $WM_CAP_START + 10
$WM_CAP_DRIVER_DISCONNECT = $WM_CAP_START + 11
$WM_CAP_DRIVER_GET_CAPS = $WM_CAP_START + 14
$WM_CAP_DRIVER_GET_NAMEA = $WM_CAP_START + 12
$WM_CAP_DRIVER_GET_NAMEW = $WM_CAP_UNICODE_START + 12
$WM_CAP_DRIVER_GET_VERSIONA = $WM_CAP_START + 13
$WM_CAP_DRIVER_GET_VERSIONW = $WM_CAP_UNICODE_START + 13
$WM_CAP_EDIT_COPY = $WM_CAP_START + 30
$WM_CAP_END = $WM_CAP_UNICODE_END
$WM_CAP_FILE_ALLOCATE = $WM_CAP_START + 22
$WM_CAP_FILE_GET_CAPTURE_FILEA = $WM_CAP_START + 21
$WM_CAP_FILE_GET_CAPTURE_FILEW = $WM_CAP_UNICODE_START + 21
$WM_CAP_FILE_SAVEASA = $WM_CAP_START + 23
$WM_CAP_FILE_SAVEASW = $WM_CAP_UNICODE_START + 23
$WM_CAP_FILE_SAVEDIBA = $WM_CAP_START + 25
$WM_CAP_FILE_SAVEDIBW = $WM_CAP_UNICODE_START + 25
$WM_CAP_FILE_SET_CAPTURE_FILEA = $WM_CAP_START + 20
$WM_CAP_FILE_SET_CAPTURE_FILEW = $WM_CAP_UNICODE_START + 20
$WM_CAP_FILE_SET_INFOCHUNK = $WM_CAP_START + 24
$WM_CAP_GET_AUDIOFORMAT = $WM_CAP_START + 36
$WM_CAP_GET_CAPSTREAMPTR = $WM_CAP_START + 1
$WM_CAP_GET_MCI_DEVICEA = $WM_CAP_START + 67
$WM_CAP_GET_MCI_DEVICEW = $WM_CAP_UNICODE_START + 67
$WM_CAP_GET_SEQUENCE_SETUP = $WM_CAP_START + 65
$WM_CAP_GET_STATUS = $WM_CAP_START + 54
$WM_CAP_GET_USER_DATA = $WM_CAP_START + 8
$WM_CAP_GET_VIDEOFORMAT = $WM_CAP_START + 44
$WM_CAP_GRAB_FRAME = $WM_CAP_START + 60
$WM_CAP_GRAB_FRAME_NOSTOP = $WM_CAP_START + 61
$WM_CAP_PAL_AUTOCREATE = $WM_CAP_START + 83
$WM_CAP_PAL_MANUALCREATE = $WM_CAP_START + 84
$WM_CAP_PAL_OPENA = $WM_CAP_START + 80
$WM_CAP_PAL_OPENW = $WM_CAP_UNICODE_START + 80
$WM_CAP_PAL_PASTE = $WM_CAP_START + 82
$WM_CAP_SEQUENCE = $WM_CAP_START + 62
$WM_CAP_SEQUENCE_NOFILE = $WM_CAP_START + 63
$WM_CAP_SET_AUDIOFORMAT = $WM_CAP_START + 35
$WM_CAP_SET_CALLBACK_CAPCONTROL = $WM_CAP_START + 85
$WM_CAP_SET_CALLBACK_ERRORA = $WM_CAP_START + 2
$WM_CAP_SET_CALLBACK_ERRORW = $WM_CAP_UNICODE_START + 2
$WM_CAP_SET_CALLBACK_FRAME = $WM_CAP_START + 5
$WM_CAP_SET_CALLBACK_STATUSA = $WM_CAP_START + 3
$WM_CAP_SET_CALLBACK_STATUSW = $WM_CAP_UNICODE_START + 3
$WM_CAP_SET_CALLBACK_VIDEOSTREAM = $WM_CAP_START + 6
$WM_CAP_SET_CALLBACK_WAVESTREAM = $WM_CAP_START + 7
$WM_CAP_SET_CALLBACK_YIELD = $WM_CAP_START + 4
$WM_CAP_SET_MCI_DEVICEA = $WM_CAP_START + 66
$WM_CAP_SET_MCI_DEVICEW = $WM_CAP_UNICODE_START + 66
$WM_CAP_SET_OVERLAY = $WM_CAP_START + 51
$WM_CAP_SET_PREVIEW = $WM_CAP_START + 50
$WM_CAP_SET_PREVIEWRATE = $WM_CAP_START + 52
$WM_CAP_SET_SCALE = $WM_CAP_START + 53
$WM_CAP_SET_SCROLL = $WM_CAP_START + 55
$WM_CAP_SET_SEQUENCE_SETUP = $WM_CAP_START + 64
$WM_CAP_SET_USER_DATA = $WM_CAP_START + 9
$WM_CAP_SET_VIDEOFORMAT = $WM_CAP_START + 45
$WM_CAP_SINGLE_FRAME = $WM_CAP_START + 72
$WM_CAP_SINGLE_FRAME_CLOSE = $WM_CAP_START + 71
$WM_CAP_SINGLE_FRAME_OPEN = $WM_CAP_START + 70
$WM_CAP_STOP = $WM_CAP_START + 68


#include <WindowsConstants.au3>
#include <GUIConstants.au3>
#include <GuiButton.au3>





;===============================================================================
;
; Description:      Main program
;
;===============================================================================
Global $dt0, $dt1, $dt2, $dt3
Dim $On = "Green-on-16.jpg", $Off = "Red-on-16.jpg"


; Prepare the required Windows DLLs
$avi = DllOpen("avicap32.dll")
$user = DllOpen("user32.dll")

; Build the main window with the window title "RRMulti" to be used for embedding
$Main = GUICreate("RRMulti", 850, 600, -1, -1, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
;creation de 4 boutons checkables
$on1 = GUICtrlCreateCheckbox("OFF",810,10,40,40, $BS_PUSHLIKE)
$on2 = GUICtrlCreateCheckbox("OFF",810,80,40,40, $BS_PUSHLIKE)
$on3 = GUICtrlCreateCheckbox("OFF",810,150,40,40, $BS_PUSHLIKE)
$on4 = GUICtrlCreateCheckbox("OFF",810,220,40,40, $BS_PUSHLIKE)
;initialisation des leds
$Led0 = GUICtrlCreatePic("", 805, 10, 6, 40);ON/OFF caméra 1
$Led1 = GUICtrlCreatePic("", 805, 80, 6, 40);ON/OFF caméra 2
$Led2 = GUICtrlCreatePic("", 805, 150, 6, 40);ON/OFF caméra 3
$Led3 = GUICtrlCreatePic("", 805, 220, 6, 40);ON/OFF caméra 4
;===============================================================================
; Create 4 capture windows, one for each camera
; Notes: 1. Windows can be added or removed as needed.
;        2. The WDM Capture Device is indicated in the $WM_CAP_DRIVER_CONNECT message for each capture window
;        3. The size and location of the capture area is set in the "capCreateCaptureWindow" DLL call
;        4. The script will run without cameras connected and will show 4 black capture areas
;===============================================================================

$cap0 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 1, "int", 1, "int", 400, "int", 300, "hwnd", $Main, "int", 1)
$cap1 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 402, "int", 1, "int", 400, "int", 300, "hwnd", $Main, "int", 1)
$cap2 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 1, "int", 302, "int", 400, "int", 300, "hwnd", $Main, "int", 1)
$cap3 = DllCall($avi, "int", "capCreateCaptureWindow", "str", "cap", "int", BitOR($WS_CHILD, $WS_VISIBLE), "int", 402, "int", 302, "int", 400, "int", 300, "hwnd", $Main, "int", 1)

; Start the display
GUISetState(@SW_SHOW)

;HotKeySet("{INSERT}", "SnapShot"); Press 'Insert' to make a SnapShot !

_SetState(); démarre l'affichage des leds (off au départ)

; Process Windows messages, we only look at the Close event so the cameras can be disconnected
; Note:  This routine can also handle messsages sent by other RR programs
While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then
        DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

        DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

        DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

        DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_END, "int", 0, "int", 0)
        DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

        DllClose($user)
        Exit
    EndIf

    If $msg = $on1 Then
        $dt0 = Number(Not($dt0))
        Switch GUICtrlRead($on1)
            Case $GUI_CHECKED
                GUICtrlSetData($on1, "ON")
                DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 0, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

            Case $GUI_UNCHECKED
                GUICtrlSetData($on1, "OFF")
                DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_END, "int", 0, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        EndSwitch
        _SetState()
    EndIf

    If $msg = $on2 Then
        $dt1 = Number(Not($dt1))
        Switch GUICtrlRead($on2)
            Case $GUI_CHECKED
                GUICtrlSetData($on2, "ON")
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

            Case $GUI_UNCHECKED
                GUICtrlSetData($on2, "OFF")
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_END, "int", 0, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        EndSwitch
        _SetState()
    EndIf

    If $msg = $on3 Then
        $dt2 = Number(Not($dt2))
        Switch GUICtrlRead($on3)
            Case $GUI_CHECKED
                GUICtrlSetData($on3, "ON")
                DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 2, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

            Case $GUI_UNCHECKED
                GUICtrlSetData($on3, "OFF")
                DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_END, "int", 0, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        EndSwitch
        _SetState()
    EndIf

    If $msg = $on4 Then
        $dt3 = Number(Not($dt3))
        Switch GUICtrlRead($on1)
            Case $GUI_CHECKED
                GUICtrlSetData($on4, "ON")
                DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 3, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_SCALE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_OVERLAY, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_PREVIEW, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_SET_PREVIEWRATE, "int", 1, "int", 0)

            Case $GUI_UNCHECKED
                GUICtrlSetData($on4, "OFF")
                DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_END, "int", 0, "int", 0)
                DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
        EndSwitch
        _SetState()
    EndIf
    Sleep(1)
WEnd


;===============================================================================
;
; Description:      Takes a snapshot
; Syntax:           Snapshot($sFile, $sId)
; Parameter(s):     $sId       - Id  ($cap{0-3}[0])
;                   $sFile     - File to save the picture to (*.avi)
; Requirement(s):   A webcam
; Return Value(s):  On Success - Returns 1
;                   On Failure - Returns 0
; Author(s):        Ludocus
; Note(s):
;
;===============================================================================
Func SnapShot($sFile, $sId)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_GRAB_FRAME_NOSTOP, "int", 0, "int", 0)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_FILE_SAVEDIBA, "int", 0, "str", $sFile)
EndFunc


;===============================================================================
;
; Description:      Starts recording the webcam to a file
; Syntax:           RecordStart($sFile, $sId)
; Parameter(s):     $sId       - Id  ($cap{0-3}[0])
;                   $sFile     - File to save the movie to (*.avi)
; Requirement(s):   A webcam
; Return Value(s):  On Success - Returns 1
;                   On Failure - Returns 0
; Author(s):        Ludocus
; Note(s):          Stop recording by: RecordStop($Id)
;
;===============================================================================
Func RecordStart($sFile, $sId)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_FILE_SET_CAPTURE_FILEA, "int", 0, "str", $sFile)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_SEQUENCE, "int", 0, "int", 0)
    If @error Then
        Return 0
    Else
        Return 1
    EndIf

EndFunc

;===============================================================================
;
; Description:      Stops recording.
; Syntax:           RecordStop($sId)
; Parameter(s):     $sId       - Id ($cap{0-3}[0])
; Requirement(s):   A webcam
; Return Value(s):  On Success - Returns 1
;                   On Failure - Returns 0
; Author(s):        Ludocus
; Note(s):          None
;
;===============================================================================
Func RecordStop($sId)
    DllCall($user, "int", "SendMessage", "hWnd", $sId, "int", $WM_CAP_STOP, "int", 0, "int", 0)
    If @error Then
        Return 0
    Else
        Return 1
    EndIf
EndFunc

;Fonction 2 états pour les leds
Func _SetState()
        For $i = 0 To 3
            If Eval('dt' & $i) = 1 Then
                GUICtrlSetImage(Eval('led' & $i), $On)
            Else
                GUICtrlSetImage(Eval('led' & $i), $Off)
            EndIf
        Next
    EndFunc   ;==>_SetState

Felicitations, on n'a pas pu vous apporter grand aide il faudrait une heure complète pour se plonger dans votre code et pour etre franc je n'en avais pas tres envi.

Merci,

Mon seul regret est que dans mon avant dernière version, j'avais trouvé un script dont javais fait un UDF qui permettait de définir des boutons avec des images .ico.

FunButton.au3:

► Afficher le texte

Code : Tout sélectionner

#cs ----------------------------------------------------------------------------

AutoIt Version: 3.3. (beta)
Author:

Script Function:
       Webcam Udf

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here
#include <WindowsConstants.au3>
#include-once

Func _GUICtrlCreateBitBtn($sText, $iLeft, $iTop, $iWidth, $iHeight, $sImg, $iIndex = 0, $iMaxIconHeight = -1, $iDist = 0, $nAllign = 0, $iFontSize = 8.5, $iFontWeight = Default)
    ;funkey 16.12.2009
    Local $iOffsetX, $iOffsetY, $LabelStyle = 0x201
    Local $a = _GetTextSize("a     a", $iFontSize)
    Local $b = _GetTextSize("aa", $iFontSize)
    Local $SpaceLen = ($a[0] - $b[0]) / 5
    Local $aSize = _GetTextSize($sText, $iFontSize)
    Local $iIconHeight = $iMaxIconHeight
    If $iMaxIconHeight = -1 Or $iMaxIconHeight > $iHeight - 8 Then
        $iIconHeight = $iHeight - 8
    EndIf
    Local $iSpaces = Ceiling(($iIconHeight + $iDist) / $SpaceLen)
    Switch $nAllign
        Case 0 ;Icon is left
            $iOffsetX = $iWidth / 2 - $aSize[0] / 2 - $iIconHeight / 2 - $iDist / 2
            $iOffsetY = ($iHeight - $iIconHeight) / 2
            $sText = StringFormat("%" & $iSpaces + StringLen($sText) & "s", $sText)
        Case 1 ;Icon is right
            $iOffsetX = $iWidth / 2 + $aSize[0] / 2 - $iIconHeight / 2 + $iDist / 2
            $iOffsetY = ($iHeight - $iIconHeight) / 2
            $sText = StringFormat("%" & - $iSpaces - StringLen($sText) & "s", $sText)
        Case 2 ;Icon is on the top
            $iOffsetX = $iWidth / 2 - $iIconHeight / 2
            $iOffsetY = 4
            $LabelStyle = 0x1
        Case 3 ;Icon is on the bottom
            $iOffsetX = $iWidth / 2 - $iIconHeight / 2
            $iOffsetY = $iHeight - $iIconHeight - 4
            $LabelStyle = 0x1
        Case 4 ;Icon is in the middle
            $iOffsetX = $iWidth / 2 - $iIconHeight / 2 + $iDist / 2
            $iOffsetY = ($iHeight - $iIconHeight) / 2
    EndSwitch
    Local $hBtn = GUICtrlCreateLabel("", $iLeft, $iTop, $iWidth, $iHeight)
    GUICtrlCreateIcon($sImg, $iIndex, $iLeft + $iOffsetX, $iTop + $iOffsetY, $iIconHeight, $iIconHeight, 0)
    GUICtrlCreateLabel($sText, $iLeft, $iTop, $iWidth, $iHeight, $LabelStyle, 0x200)
    GUICtrlSetBkColor(-1, -2) ; $GUI_BKCOLOR_TRANSPARENT
    GUICtrlSetFont(-1, $iFontSize, $iFontWeight)
    GUICtrlSetState(-1, 32) ;$GUI_HIDE
    GUICtrlCreateLabel($sText, $iLeft, $iTop, $iWidth, $iHeight, $LabelStyle, 0x001)
    GUICtrlSetBkColor(-1, -2) ; $GUI_BKCOLOR_TRANSPARENT
    GUICtrlSetFont(-1, $iFontSize, $iFontWeight)
    Return $hBtn
EndFunc   ;==>_GUICtrlCreateBitBtn

Func _BitBtnClick($IdBtn)
    ;funkey 16.12.2009
    Local $aInfo, $aInfoLast
    GUICtrlSetState($IdBtn + 3, 32) ;$GUI_HIDE
    GUICtrlSetState($IdBtn + 2, 16) ;$GUI_SHOW
    $aInfoLast = GUIGetCursorInfo()
    Do
        Sleep(10)
        $aInfo = GUIGetCursorInfo()
        If @error Then Return 0
        If $aInfo[4] <> $aInfoLast[4] Then ;if changing the hover-control
            If $aInfo[4] < $IdBtn Or $aInfo[4] > $IdBtn + 3 Then ;if not hovering the BitBtn
                GUICtrlSetState($IdBtn + 2, 32) ;$GUI_HIDE
                GUICtrlSetState($IdBtn + 3, 16) ;$GUI_SHOW
            Else
                GUICtrlSetState($IdBtn + 3, 32) ;$GUI_HIDE
                GUICtrlSetState($IdBtn + 2, 16) ;$GUI_SHOW
            EndIf
        EndIf
        $aInfoLast = $aInfo
    Until Not $aInfo[2]
    GUICtrlSetState($IdBtn + 2, 32) ;$GUI_HIDE
    GUICtrlSetState($IdBtn + 3, 16) ;$GUI_SHOW
    If $aInfo[4] <> $IdBtn + 2 And $aInfo[4] <> $IdBtn + 1 Then Return 0
    Return 1
EndFunc   ;==>_BitBtnClick

Func _GetTextSize($nText, $iFontSize = 8.5, $sFont = 'Microsoft Sans Serif', $iFontAttributes = 0)
    ;Author: Bugfix
    ;Modified: funkey
    If $nText = '' Then Return
    _GDIPlus_Startup()
    Local $hFormat = _GDIPlus_StringFormatCreate(0)
    Local $hFamily = _GDIPlus_FontFamilyCreate($sFont)
    Local $hFont = _GDIPlus_FontCreate($hFamily, $iFontSize, $iFontAttributes, 3)
    Local $tLayout = _GDIPlus_RectFCreate(15, 171, 0, 0)
    Local $hGraphic = _GDIPlus_GraphicsCreateFromHWND(0)
    Local $aInfo = _GDIPlus_GraphicsMeasureString($hGraphic, $nText, $hFont, $tLayout, $hFormat)
    Local $iWidth = Ceiling(DllStructGetData($aInfo[0], "Width"))
    Local $iHeight = Ceiling(DllStructGetData($aInfo[0], "Height"))
    _GDIPlus_StringFormatDispose($hFormat)
    _GDIPlus_FontDispose($hFont)
    _GDIPlus_FontFamilyDispose($hFamily)
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_Shutdown()
    Local $aSize[2] = [$iWidth, $iHeight]
    Return $aSize
EndFunc   ;==>_GetTextSize

Je pouvais alors créer un bouton avec du text et une image de dessus du genre:
_GUICtrlCreateBitBtn("Cam 1", 552, 68, 44, 46, Webcam.ico, 20, 35, 0, 3, 10);ON/OFF caméra 1

Mais avec la commande GUICtrlCreateCheckbox("OFF",810,10,40,40, $BS_PUSHLIKE) , je n'ais plus cette possibilité .
Si vous avez une idée ,

Merci d'avance

Bonjour, J'ai tenté de faire fonctionner votre script avec deux caméra sans y parvenir. Il semblerait que windows ne soit pas adapté à ce type d'opération, si j'en crois des développeurs C++. C'est dommage....

Bonjour,

Juste pour te dire que j'ai fais un programme qui utilise 2 webcams ( installées) en C++ mais avec la librairie vfw ( celle qui contient les fonctions que tu utilises).

Bonne suite.

Et ça fonctionne avec 2 webcams?

Juste comme ca en passant:

ca:

Code : Tout sélectionner

DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_END, "int", 0, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap0[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_END, "int", 0, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap1[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_END, "int", 0, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap2[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_END, "int", 0, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap3[0], "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)

DllClose($user)
Exit

Ne serait-il pas mieux comme ça?:

Code : Tout sélectionner

For $i = 0 To 3
    DllCall($user, "int", "SendMessage", "hWnd", Eval("$cap" & $i & "[0]"), "int", $WM_CAP_END, "int", 0, "int", 0)
    DllCall($user, "int", "SendMessage", "hWnd", Eval("$cap" & $i & "[0]"), "int", $WM_CAP_DRIVER_DISCONNECT, "int", 0, "int", 0)
Next

DllClose($user)
Exit

AutoIt Français

[R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

[R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [..] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre

Re: [R] Gestion de 4 Webcam USB ou IP dans une seule fenêtre