可以幫我解決這個問題嗎..謝謝 |
尚未結案
|
wun
一般會員 發表:19 回覆:20 積分:7 註冊:2002-08-24 發送簡訊給我 |
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
HDC dc;
TMemoryStream *BmpStream ;
TJPEGImage *jp = new TJPEGImage();
Graphics::TCanvas *ScreenCanvas = new Graphics::TCanvas
TRect rect;
BmpStream = new TMemoryStream();
dc = GetDC(0);
ScreenCanvas->Handle = Form1->dc;
Image1->Picture->Bitmap->Width = Screen->Width;
Image1->Picture->Bitmap->Height= Screen->Height;
rect = Rect(0,0,Screen->Width, Screen->Height);
Image1->Picture->Bitmap->Canvas->CopyRect(Form1->rect, Form1-
>ScreenCanvas, Form1->rect);
jp->CompressionQuality = 20; // 設定圖像解析度(檔案大小)
jp->Assign(Form1->Image1->Picture->Bitmap);
jp->SaveToStream(BmpStream);
}
這是我寫的一段程式...是要Timer每三秒抓取螢幕的畫面然後存成Stream(savetostream),但是為什麼每次在SaveToStream的時候..電腦都會發生Delay的現象..滑鼠都會有delay的現象.這是為什麼呢...有沒有辨法避免這種Delay的現象呢????謝謝大家...
|
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: void __fastcall TForm1::Timer1Timer(TObject *Sender) { HDC dc; TMemoryStream *BmpStream ; TJPEGImage *jp = new TJPEGImage(); Graphics::TCanvas *ScreenCanvas = new Graphics::TCanvas TRect rect; BmpStream = new TMemoryStream(); dc = GetDC(0); ScreenCanvas->Handle = Form1->dc; Image1->Picture->Bitmap->Width = Screen->Width; Image1->Picture->Bitmap->Height= Screen->Height; rect = Rect(0,0,Screen->Width, Screen->Height); Image1->Picture->Bitmap->Canvas->CopyRect(Form1->rect, Form1- >ScreenCanvas, Form1->rect); jp->CompressionQuality = 20; // 設定圖像解析度(檔案大小) jp->Assign(Form1->Image1->Picture->Bitmap); jp->SaveToStream(BmpStream); } 這是我寫的一段程式...是要Timer每三秒抓取螢幕的畫面然後存成Stream(savetostream),但是為什麼每次在SaveToStream的時候..電腦都會發生Delay的現象..滑鼠都會有delay的現象.這是為什麼呢...有沒有辨法避免這種Delay的現象呢????謝謝大家...http://delphi.ktop.com.tw/topic.php?TOPIC_ID=26214 -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |