線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1466
推到 Plurk!
推到 Facebook!

兩個ccd camera 擷取後錄製avi的問題

尚未結案
MilesWamg
一般會員


發表:18
回覆:37
積分:11
註冊:2003-02-07

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-06-30 20:08:23 IP:163.18.xxx.xxx 未訂閱
小弟使用BCB 6.0寫兩個ccd camera 擷取後錄製一avi檔的程式 發現如果要同時分別由兩camera各儲存成一avi檔會只有一個avi檔 被儲存下來,請教各位先進有合好的解決方法? 小弟想到一個較笨的方式,先將此兩個畫面 存為一連串的bmp檔再組合成一avi檔           thanks!!
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-06-30 21:18:19 IP:140.135.xxx.xxx 未訂閱
MilesWamg您好:      方便將您的程式碼po上來嗎,好方便大家幫您解決< > 順心< > ~我也是在學習的階段,所以請您多多見諒與指教~
MilesWamg
一般會員


發表:18
回覆:37
積分:11
註冊:2003-02-07

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-07-01 10:52:26 IP:163.18.xxx.xxx 未訂閱
小弟將camera驅動寫成一物件為TCapture,其中開始擷取影像後 呼叫
void __fastcall TCapture::ShowLive(void)
{
  BITMAPINFO bmi;
if(!Live)
 {
  Video = capCreateCaptureWindow("Capture Window",
                               WS_CHILD|WS_VISIBLE,
                               XPOS,YPOS,320,240,
                               Handle,
                               DEVICENUM); //1
  capDriverConnect(Video,0);
  if(!capOverlay(Video,true))
  {
    // capPreviewRate(Video, 100); // PreviewMode!!
     capPreview(Video,true);
  }
  UpdateWindow(Video);
  Live = true;
  SetVideoFormat();      capGetVideoFormat(Video, &bmi, sizeof(BITMAPINFO));
  SetWindowPos(Video, 0, XPOS, YPOS, bmi.bmiHeader.biWidth,bmi.bmiHeader.biHeight,0);     }
}
void __fastcall TCapture::SetAVIFile(AnsiString FileName)
{
  AVIName=FileName;
}     void __fastcall TCapture::Start_save_AVI() //saveAVI
{
   capFileSetCaptureFile(Video,AVIName.c_str());
   capCaptureSequence (Video);
}    主程式
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  //建立使用物件
  Rec  = new TCapture(SHowPanel->Handle,0);
  Rec->Setpos(0,0);
  Rec->SetAVIFile("1.AVI");
  Rec1  = new TCapture(SHowPanel->Handle,0);
  Rec1->Setpos(320,0);
  Rec1->SetAVIFile("2.AVI");
  Rec->ShowLive();
  Rec1->ShowLive();
  .....
   .....      void __fastcall TForm1::Button1Click(TObject *Sender)
{
  Rec->Start_save_AVI();
  Rec1->Start_save_AVI();  //結果只有後者被存下
}    
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-07-01 12:31:14 IP:140.135.xxx.xxx 未訂閱
MilesWamg您好:   不好意思,方便將您的專案上傳到[會員求助程式檔案上傳區]嗎?   http://delphi.ktop.com.tw/forum.asp?FORUM_ID=97 我來幫您測試看看 順心 <>~我也是在學習的階段,所以請您多多見諒與指教~
MilesWamg
一般會員


發表:18
回覆:37
積分:11
註冊:2003-02-07

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-07-01 17:24:22 IP:163.18.xxx.xxx 未訂閱
已經上傳,thanks!!
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-07-01 22:58:44 IP:140.135.xxx.xxx 未訂閱
MilesWamg您好:      我測試的結果是,會出現兩個AVI檔,但是沒有辦法錄下同一時間的畫面   一個在錄,另外一台攝影機畫面就會停止 < > 可能要等其他有經驗的人來回答您的問題了,不好意思幫不上忙< > 連續的BMP轉AVI是不錯的Solution,但我查了很多資料但沒什麼頭緒 GoodLuck <>~我也是在學習的階段,所以請您多多見諒與指教~
MilesWamg
一般會員


發表:18
回覆:37
積分:11
註冊:2003-02-07

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-07-02 00:30:37 IP:218.164.xxx.xxx 未訂閱
感謝taishyang測試小弟的程式 我會加油試試看!! 
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-07-02 01:10:39 IP:61.231.xxx.xxx 未訂閱
MilesWamg您好:       因為您的專案我開啟之後Form上的vcl全都不見了    所以我是參考您的程式而寫了一小段程式來作測試    明天我再將程式po上來(因為我已經回家了,家裡電腦沒灌BCB)    雖然沒什麼參考價值< > >>> 順心< > <>~我也是在學習的階段,所以請您多多見諒與指教~ < class="code"> 發表人 - taishyang 於 2003/07/02 11:23:15
MilesWamg
一般會員


發表:18
回覆:37
積分:11
註冊:2003-02-07

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-07-02 13:47:41 IP:163.18.xxx.xxx 未訂閱
我想avi壓縮是不是只有每次單一camera 才能用?因為即使使用兩單camera程式同時run 也只有一avi檔被存下 小弟使用一張4輸入影像擷取卡作的實驗 那一般4輸入影像擷取卡同時錄影,如螢幕 四分割般的效果如何達成?令人好奇 不然是否可以嘗試從avi壓縮方面切入 不使用 capFileSetCaptureFile(Video,AVIName.c_str()); capCaptureSequence (Video); 此一較方便的做法的話.....
系統時間:2024-05-06 2:43:08
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!