Расскажите плиз как ICQ это делает ? Как она определяет с какого устройства читать изображение ????









Option Explicit
Private objTuneRequest As IChannelTuneRequest
Private sectst As New AuxInTuningSpace
Private Sub Form_Load()
On Error GoTo errHandler
Set objTuneRequest = sectst.CreateTuneRequest
'objTuneRequest.Channel = 1
VidControl.DisableAudio
VidControl.AutoSize = True
VidControl.View objTuneRequest
VidControl.Run
frmPreview.Width = VidControl.Width + 90
frmPreview.Height = VidControl.Height + 300
Form1.Show
Exit Sub
errHandler:
MsgBox Err.Description & vbNewLine & "Error number: " & Err.Number, vbCritical, "Error:"
Unload Me

objTuneRequest.Channel = 14'указал № канала1-69 VidControl.View objTuneRequest'просмотр 
Сейчас этот форум просматривают: AhrefsBot, SemrushBot и гости: 14