_3_GetCurrentFormat

Date: 02-16-2022

Return to Index

 
'Compilable Example:  (Jose Includes)
#Compile Exe
#Dim All
 
#Debug Error On
#Debug Display On
 
%Unicode = 1
#Include "Win32API.inc"
#Include Once "dshow.inc"
#Include Once "dshow_utilities.inc"
 
Function PBMain() As Long
   Dialog New Pixels, 0, "Get Current Format",,,640,480, %WS_OverlappedWindow Or %WS_ClipChildren To hDlg
   Dialog Show Modal hDlg Call DlgProc
End Function
 
CallBack Function DlgProc() As Long
   Local w,h,fBits As Long
   Select Case Cb.Msg
      Case %WM_InitDialog
         DisplayFirstCamera
         GetCurrentFormat(w,h,fBits)
         Dialog Set Text hDlg, "Get Current Format: " +  Str$(w) + Str$(h) + Str$(fBits)
   End Select
End Function
                              

created by gbSnippets
http://www.garybeene.com/sw/gbsnippets.htm