像擷取卡的影像如何才可以讓影像顯示在BCB中啊? |
答題得分者是:Roach
|
lanfanra
一般會員 發表:48 回覆:51 積分:19 註冊:2003-08-06 發送簡訊給我 |
|
Roach
中階會員 發表:61 回覆:104 積分:98 註冊:2002-11-05 發送簡訊給我 |
這部分的討論記錄很豐富
我也是查舊文章才會的 void __fastcall TForm1::FormCreate(TObject *Sender)
{ hCapWnd = capCreateCaptureWindow("My Capture Window", WS_CHILD | WS_VISIBLE,
0, 0, 640, 480,Form1->Panel1->Handle, 0 ); capDriverConnect(hCapWnd, 0 ); capPreview(hCapWnd,true); //顯示於視窗
capPreviewRate(hCapWnd, 1000/30);
capPreviewScale(hCapWnd,true);
capOverlay(hCapWnd, true);
BITMAPINFO bmi;
capGetVideoFormat(hCapWnd, &bmi, sizeof(BITMAPINFO));
SetWindowPos(hCapWnd, 0, 0, 0, bmi.bmiHeader.biWidth,bmi.bmiHeader.biHeight,0); Form1->Panel1->ClientHeight=bmi.bmiHeader.biHeight;
Form1->Panel1->ClientWidth=bmi.bmiHeader.biWidth; } 記得要include "vfw.h" ㄛ
如果要存成 file 就加上一個button如下 {
AnsiString FN_Temp="C:\\Test_001.BMP";
AnsiString FN ="C:\\Test_001.JPG";
if(capFileSaveDIB(hCapWnd,FN_Temp.c_str())==0)
{
ShowMessage("無法儲存站存檔");
return;
} Graphics::TBitmap *bmp;
TJPEGImage *jpg; bmp = new Graphics::TBitmap();
jpg = new TJPEGImage(); bmp->LoadFromFile(FN_Temp);
jpg->Assign(bmp);
jpg->CompressionQuality=90;
jpg->SaveToFile(FN); delete jpg;
delete bmp;
} 這部分有使用到JPG檔所要要 #include "jpeg.hpp" 試車總是問題多
|
lanfanra
一般會員 發表:48 回覆:51 積分:19 註冊:2003-08-06 發送簡訊給我 |
|
JerryKuo
版主 發表:42 回覆:571 積分:322 註冊:2003-03-10 發送簡訊給我 |
你好: 也可以參考這篇http://delphi.ktop.com.tw/topic.php?TOPIC_ID=34539
我是看這篇學滴,很容易實作,這方面的文章在這個版有很多,請善用搜尋資源
如果有什麼不懂的,請繼續發問。
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |