host3nter

حرفه ای: تحلیل کد

سلام به همه من این برنامه رو که برای استفاده از Webcam هستش رو از آدرس ...

موضوع حرفه ای: تحلیل کد,.

VB.NET, برنامه نویس, برنامه نویسی

تاريخ ارسال:2014/08/31

هاست سنتر سلام به همه من این برنامه رو که برای استفاده از Webcam هستش رو از آدرس زیر دانلود کردم و هرجا که جستجو کردم همین کدها رو پیدا کردم که در زیر مشاهده میکیند.http://www.vb-helper.com/howto_video_capture.html حالا چند تا سوال برام پیش اومده که از تمام برنامه نویسان که اطلاعاتی دارند خواهش میکنم جواب بدند. موضوع اول اینه که هر کدی که یجورایی با سخت افزار کار داره من کمی مشکل دارم. اگر راهنمای کاملی از کار کردن با دستگاه ها و سخت افزارها سراغ دارید معرفی بفرمایید.خط اول چه زمان باید نوشته بشه؟در چند خط اول چندین ثابت تعریف شده اند که تو MSDN یک تعریف براشون وجود داره و هیچ مثالی هم زده نشده. اینکه چطور مقدار دهی باید بشن و این مقادیر چی میگند من حالیم نمیشه؟ آیا میشه مقادیر این ثابت ها رو در زمان طراحی چیز دیگه ای تعریف کرد یا که همیشه باید برای دوربین این مقادیر رو تعریف کنیم؟اگر میشه درخصوص کاربرد هر یک از توابعی که بعد از معرفی ثابت ها برای استفاده از API تعریف شده توضیح بدید. کارشون چیه؟چه لزومی داشته که برای متغیر رشته ای Space(100) تعریف بشه؟چرا هر زمان که روی دکمه Start در فرم کلیک می کنم یک پنجره باز میشه که باید از اونجا دوربین مورد نظر را انتخاب کنم؟ مگر درایور انتخاب شده در لیست روی فرم که کاربر انتخاب میکنه ملاک نیست؟ اینطور که پیداست خود برنامه با اولین دوربین که شناسایی میکنه باید کار کنه.اگر بخواهم با یک کلیک، دوربین روشن و تصویر گرفته بشه و هیچ پنجره اضافه دیگری ظاهر نشه چه تغییراتی باید به برنامه بدم؟ در مجموع هر توضیحی که از هر خط برنامه میدونید بنویسید. حتی اگر فقط بخشی از کد رو متوجه شدید هم توضیح بدید ممنون میشم. Imports System.Runtime.InteropServices Public Class Form1 Const WM_CAP As Short = &H400S Const WM_CAP_DRIVER_CONNECT As Integer = WM_CAP + 10 Const WM_CAP_DRIVER_DISCONNECT As Integer = WM_CAP + 11 Const WM_CAP_EDIT_COPY As Integer = WM_CAP + 30 Const WM_CAP_SET_PREVIEW As Integer = WM_CAP + 50 Const WM_CAP_SET_PREVIEWRATE As Integer = WM_CAP + 52 Const WM_CAP_SET_SCALE As Integer = WM_CAP + 53 Const WS_CHILD As Integer = &H40000000 Const WS_VISIBLE As Integer = &H10000000 Const SWP_NOMOVE As Short = &H2S Const SWP_NOSIZE As Short = 1 Const SWP_NOZORDER As Short = &H4S Const HWND_BOTTOM As Short = 1 Dim iDevice As Integer = 0 ' Current device ID Dim hHwnd As Integer ' Handle to preview window Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, _ <MarshalAs(UnmanagedType.AsAny)> ByVal lParam As Object) As Integer Declare Function SetWindowPos Lib "user32" Alias "SetWindowPos" (ByVal hwnd As Integer, _ ByVal hWndInsertAfter As Integer, ByVal x As Integer, ByVal y As Integer, _ ByVal cx As Integer, ByVal cy As Integer, ByVal wFlags As Integer) As Integer Declare Function DestroyWindow Lib "user32" (ByVal hndw As Integer) As Boolean Declare Function capCreateCaptureWindowA Lib "avicap32.dll" _ (ByVal lpszWindowName As String, ByVal dwStyle As Integer, _ ByVal x As Integer, ByVal y As Integer, ByVal nWidth As Integer, _ ByVal nHeight As Short, ByVal hWndParent As Integer, _ ByVal nID As Integer) As Integer Declare Function capGetDriverDescriptionA Lib "avicap32.dll" (ByVal wDriver As Short, _ ByVal lpszName As String, ByVal cbName As Integer, ByVal lpszVer As String, _ ByVal cbVer As Integer) As Boolean Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load LoadDeviceList() If lstDevices.Items.Count > 0 Then btnStart.Enabled = True lstDevices.SelectedIndex = 0 btnStart.Enabled = True Else lstDevices.Items.Add("No Capture Device") btnStart.Enabled = False End If btnStop.Enabled = False btnSave.Enabled = False picCapture.SizeMode = PictureBoxSizeMode.StretchImage End Sub Private Sub LoadDeviceList() Dim strName As String = Space(100) Dim strVer As String = Space(100) Dim bReturn As Boolean Dim x As Integer = 0 ' ' Load name of all avialable devices into the lstDevices ' Do ' ' Get Driver name and version ' bReturn = capGetDriverDescriptionA(x, strName, 100, strVer, 100) ... هاست,دامین,سایت,وب,طراحی

سوال: دستوری بجای ReadLn در شبکه ایندی که بجای لاین با دریافت کلمه پایان پذیرد

نصب خودکار برنامه های جانبی

گذاشتن طرح توی themeforest.net / کسی اطلاعی داره مارو مطلع کنه لطفا

سوال: سخت تر کردن امکان خواندن کدهای سایت

سوال: ساخت elearning

بازدید ساز سئومارک

فازی c-mean

حرفه, ای:, تحلیل, کد

حرفه ای: تحلیل کد

میزبانی وب ,هاست,فضای وب,ویندوز,لینوکس,دات نت,پی اچ پی,web hosting,windows host,linux host,asp.net,php,sql server,mysql میزبان پایتخت ارائه دهنده خدمات میزبانی وب، هاست و هاستینگ، میزبانی هاست، دامین، میزبانی نمایندگی، نمایندگی وب، سرور مجازی و سرور مجازی ابری می باشد.هاست,میزبانی وب,دامین,سرور مجازی,میزبان پایتخت,host,domain,vps,mizban paytakht,hosting,share hosting,میزبان وب,میزبانی هاست,هاستینگ

google
logo-samandehi