關於DSPack中的Demos\D6-D7\PlayVideoCap的問題 |
|
缺席
|
|
WoodTiger
初階會員   發表：35 回覆：90 積分：25 註冊：2003-08-01 發送簡訊給我 |
1、如何在一個VideoWindow上畫一個框？好像所有的元件放在它上面一連接視頻就會被蓋掉，用其Canvas也不能在有視頻時畫圖。 2、如何不用到VideoWindow元件直接利用SampleGrabber的Onbuffer就在一個Image上輸出視頻？因爲在image上可以放置panel並不受視頻影響。好像關鍵就在：
with FilterGraph as ICaptureGraphBuilder2 do
RenderStream(@PIN_CATEGORY_PREVIEW, nil, Filter as IBaseFilter, SampleGrabber as IBaseFilter, VideoWindow as IbaseFilter);
這段上，但不是很清楚! 3、如何獲得視頻流的分辨率？如何呼叫出視頻參數窗口(視頻流格式、分辨率設置等就像amcap一樣)？ 請各位大大不吝賜教!謝謝! ==================================
搞得懂就答人，搞不懂就問人，沒有人懂還可以問神！
------
-=-=-=-=-=-=-=-=-=-=-= Eveything as your wish. |
|
WoodTiger
初階會員 發表：35 回覆：90 積分：25 註冊：2003-08-01 發送簡訊給我 |
第3 個問題的“如何獲得視頻流的分辨率”按以下方法可以得到：
procedure TfrmCap.btnConfigClick(Sender: TObject);
var
nHeight,nWidth:integer;
basicvideo:IBasicVideo;
begin
if filtergraph.Active then
begin
if succeeded(FilterGraph.QueryInterface(IID_IBasicVideo,BasicVideo)) then
begin
BasicVideo.get_VideoWidth(nwidth);
BasicVideo.get_VideoHeight(nheight);
showmessage(inttostr(nWidth) ' ' inttostr(nHeight));
end;
end;
end;
另外的問題請大大們指教!謝謝! ==================================
搞得懂就答人，搞不懂就問人，沒有人懂還可以問神！
------
-=-=-=-=-=-=-=-=-=-=-= Eveything as your wish. |
|
WoodTiger
初階會員 發表：35 回覆：90 積分：25 註冊：2003-08-01 發送簡訊給我 |
第3個問題中的“如何呼叫出視頻參數窗口(視頻流格式、分辨率設置等就像amcap一樣)？”基本解決，哎硬試出來的，一知半解，呵呵，還請大大們指教!
procedure TfrmCap.btnConfigClick(Sender: TObject);
var
nHeight,nWidth:integer;
basicvideo:IBasicVideo;
PinList:TPinList;
i:integer;
begin
if filtergraph.Active then
begin
if succeeded(FilterGraph.QueryInterface(IID_IBasicVideo,BasicVideo)) then
begin
BasicVideo.get_VideoWidth(nwidth);
BasicVideo.get_VideoHeight(nheight);
showmessage(inttostr(nWidth) ' x ' inttostr(nHeight));
end;
end;
if dsutil.HaveFilterPropertyPage(Filter as IBaseFilter,ppDefault) then
ShowFilterPropertyPage(self.Handle,Filter as IBaseFilter,ppdefault);
FilterGraph.Stop;
Pinlist:=TPinList.Create(Filter as IBaseFilter);
for i:=0 to PinList.Count-1 do
if PinList.Connected[i] then
ShowPinPropertyPage(self.Handle,PinList.Items[i]);
PinList.Free;
FilterGraph.Play;
end; ==================================
搞得懂就答人，搞不懂就問人，沒有人懂還可以問神！
------
-=-=-=-=-=-=-=-=-=-=-= Eveything as your wish. |
|
hanli
一般會員  發表：4 回覆：5 積分：1 註冊：2005-03-23 發送簡訊給我 |
|
|
WoodTiger
初階會員 發表：35 回覆：90 積分：25 註冊：2003-08-01 發送簡訊給我 |
引言: 使用ShowPinPropertyPage(self.Handle,PinList.Items[i]);調岀設置視頻格式大小后,改變視頻大小提示連接岀錯,當前並無此格式?輸岀大小並沒有改變?是什么原因呢?在設置PIN時必須先停止預覽。不過我也是一知半解的，希望大大們指教! ================================== 搞得懂就答人，搞不懂就問人，沒有人懂還可以問神！
------
-=-=-=-=-=-=-=-=-=-=-= Eveything as your wish. |
|
hanli
一般會員 發表：4 回覆：5 積分：1 註冊：2005-03-23 發送簡訊給我 |
|
|
WoodTiger
初階會員 發表：35 回覆：90 積分：25 註冊：2003-08-01 發送簡訊給我 |
|
|
hanli
一般會員 發表：4 回覆：5 積分：1 註冊：2005-03-23 發送簡訊給我 |
|
|
WoodTiger
初階會員 發表：35 回覆：90 積分：25 註冊：2003-08-01 發送簡訊給我 |
發表時間：2005-03-23 16:25:31
IP:60.191.xxx.xxx 未訂閱
系統時間：2024-05-04 6:11:32
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |