請問一下大大們 為何我第一次connect device 可以看到影像 但我disconnect 後 要重新connect device 它就會出現....Can not connect device !1 請問大大是那裡的問題呢? 謝謝!! void __fastcall TForm1::BitBtn1Click(TObject *Sender) { //開啟裝置按下 if(BitBtn1->Caption == "Connect"){ if (!VideoWnd) OpenVideoWindow(); }else{ if (VideoWnd) CloseVideoWindow(); } } //--------------------------------------------------------------------------- bool __fastcall TForm1::OpenVideoWindow(void) { //TODO: Add your source code here // CAPINFOCHUNK InfoChunk; VideoWnd = capCreateCaptureWindow("VideoWindow",WS_CHILD | WS_VISIBLE,0,0,640,480,Panel1->Handle,(int) 0); if(!OpenDevice()) { DestroyWindow(VideoWnd); VideoWnd=NULL; return false; } } //--------------------------------------------------------------------------- bool __fastcall TForm1::OpenDevice(void) { //TODO: Add your source code here if (capDriverConnect(VideoWnd,1)) { capPreviewScale(VideoWnd,true); capOverlay(VideoWnd,TRUE); capPreviewRate(VideoWnd,1000/30); capPreview(VideoWnd,TRUE); BitBtn2->Enabled = true; BitBtn3->Enabled = true; BitBtn1->Caption = "DisConnect"; return true; }else{ ShowMessage("Can not connect device !!"); BitBtn1->Caption = "Connect"; return false; } } //--------------------------------------------------------------------------- bool __fastcall TForm1::CloseVideoWindow(void) { //TODO: Add your source code here if (bDeviceConnected) CloseDevice(); DestroyWindow(VideoWnd); VideoWnd = NULL; BitBtn1->Caption = "Connect"; BitBtn2->Enabled = false; BitBtn3->Enabled = false; return true; } //--------------------------------------------------------------------------- bool __fastcall TForm1::CloseDevice(void) { //TODO: Add your source code here if (capDriverDisconnect(VideoWnd)) { bDeviceConnected=false; return true; }else{ ShowMessage("Can not disconnect device !!"); BitBtn1->Caption = "DisConnect"; return false; } }

引言: //------------------------------------------------------------------- bool __fastcall TForm1::OpenDevice(void) { //TODO: Add your source code here if (capDriverConnect(VideoWnd,1)) .....................................^^^ { capPreviewScale(VideoWnd,true); capOverlay(VideoWnd,TRUE); capPreviewRate(VideoWnd,1000/30); capPreview(VideoWnd,TRUE); BitBtn2->Enabled = true; BitBtn3->Enabled = true; BitBtn1->Caption = "DisConnect"; return true; }else{ ShowMessage("Can not connect device !!"); BitBtn1->Caption = "Connect"; return false; } }

wzl您好: if (capDriverConnect(VideoWnd,1)) .............................^^^ 我測過你的程式碼，把這裡的1 改成 0 就OK了 ==> if (capDriverConnect(VideoWnd,0)) 發表人 - KGB 於 2003/07/28 18:59:47 發表人 - KGB 於 2003/07/28 19:00:55

KGB 大大謝謝 我試試看...

wzl您好: 您可以參考下面連結加入下面的判斷機制 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=34539

 
bool connect = false;
for( int i = 0; i < 10; i   )
{
 connect = capDriverConnect(VideoWnd,i);
 if(connect) break;
}
if(!connect)
{
 ShowMessage("攝影機連接失敗");
}

順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～ 發表人 -

KGB 大大... 我修改成if (capDriverConnect(VideoWnd,0)) 連第一次都會無法CONNECT 一定要用capDriverConnect(VideoWnd,1)才可以正常連接且看到影像 請問...是為何呢? 要如何修改呢?

taishyang大大 用for loop 試connect 也加入了.. 但是一開始第一次connect 沒問題 第二次進for loop 確全部都連接失敗 這是為何呢? 我已經有capDriverDisconnect(VideoWmd) 跟DestroyWindows(VideoWnd) 為何第二次無法建立Connect 呢? 請大大解惑謝謝!!

wzl您好:     把DestroyWindows(VideoWnd)拿掉試試    順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

大大... 我只要一用下面這兩行其中一行 capDriverDisconnect(VideoWmd) DestroyWindows(VideoWnd) 便無法再連接上device 但是要是不用這兩行就無法將device 的畫面停止...(會存在) 請問大大這是什問題呀?

wzl您好:    下面是我測試的程式,我測試可行(BCB5.0 WinXP)

 
void __fastcall TForm1::Button1Click(TObject *Sender)
{     int i=Edit1->Text.ToInt();  //依您的其況,i=1;
 vcHWND = capCreateCaptureWindow ( "Capture Window",
 WS_CHILD | WS_VISIBLE ,0,0,160,120,((TPanel*)FindComponent("Panel" IntToStr(i)))->Handle, 0);  //設定視窗大小
 capDriverConnect( vcHWND,Edit1->Text.ToInt());
 capPreviewRate(vcHWND,33);
 capPreview(vcHWND,true);                                       //預覽設定
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 capDriverDisconnect(vcHWND);        
}
//---------------------------------------------------------------------------

可以連線,斷線切換 順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～ 發表人 -

taishyang大大 我已把我測試用的code 傳給您 請問您有收到嗎? 謝謝!~!

wzl您好:   我沒有收到耶,有問題的專案可以上傳到下面連結的地方   http://delphi.ktop.com.tw/forum.asp?FORUM_ID=97 您的問題在哪邊呢?上面的方式還是不可以嗎?< > 順心< > ～我也是在學習的階段,回答的不好請您多多見諒與指教～

taishyang大大 我已經檔案上傳 煩請幫忙謝謝!!

wzl您好:      您的程式在我的電腦都可以WORK耶 BCB5.0 WinXP   不論是[CCD攝影機+影像擷取卡]或是[USB攝影機]都可以正常連線和離線    順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

taishyang大大 我這個程式用亞邁的DV PRO 可以正常沒問題 現在我用的是另一塊影像擷取卡 Mutech MV500 Http://www.mutech.com/ 可是這塊卡就不可以 請問taishyang大大您那邊可推薦幾塊可以顯示640 x480的擷取卡(非補插點黑白) 謝謝大大... 我很好奇為何用標準win32 api 確不能夠跑那張Mutech 的卡呢? 請大大解惑!!

wzl您好:

引言: 我這個程式用亞邁的DV PRO 可以正常沒問題現在我用的是另一塊影像擷取卡 Mutech MV500Http://www.mutech.com/可是這塊卡就不可以請問taishyang大大您那邊可推薦幾塊可以顯示640 x480的擷取卡(非補插點黑白) 謝謝大大...我很好奇為何用標準win32 api 確不能夠跑那張Mutech 的卡呢? 請大大解惑!!

我只有一張影像擷取卡(UPG301T), 而且覺得不是很好用< > 我沒有其他的影像擷取卡,所以不曉得還有這樣的情況< > 抱歉,幫不上忙了~~ P.S:我沒有那麼厲害可以被稱為[大大],我只是個熱心助人的版主< > 順心< > ～我也是在學習的階段,回答的不好請您多多見諒與指教～