全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1033
推到 Plurk!
推到 Facebook!

用TMediaplayer是否可做圖片擷取?

尚未結案
finalevil
一般會員


發表:20
回覆:17
積分:7
註冊:2004-04-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-12-01 02:57:01 IP:140.136.xxx.xxx 未訂閱
我使用TMediaplayer將影像show在panel上,並想用BitBlt的方式將影像顯示在TImage元件上,可是失敗了...以下是我的程式碼,不知道是哪裡有錯呢? 亦或是TMediaplayer不支援以下方式的擷圖? 麻煩各位了,謝謝 < class="code"> if(this->OpenDialog1->Execute()) { Graphics::TBitmap *BMP = new Graphics::TBitmap; TPoint getPoint; HDC aDC; this->MediaPlayer1->FileName = this->OpenDialog1->FileName; this->MediaPlayer1->Open(); this->Panel1->Width = this->MediaPlayer1->DisplayRect.Width(); this->Panel1->Height = this->MediaPlayer1->DisplayRect.Height(); BMP->Width = this->MediaPlayer1->DisplayRect.Width(); BMP->Height = this->MediaPlayer1->DisplayRect.Height(); this->MediaPlayer1->TimeFormat = tfFrames; getPoint = this->Panel1->ClientToScreen(Point(0,0)); aDC = GetDC(0); this->MediaPlayer1->Position = 20; Application->ProcessMessages(); BitBlt(BMP->Canvas->Handle, 0,0,BMP->Width,BMP->Height,aDC, getPoint.x, getPoint.y, SRCCOPY); this->Image1->Picture->Bitmap = BMP; this->Image1->Invalidate(); }
系統時間:2024-05-07 23:01:04
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!