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

螢幕攝影 CPU使用問題..

尚未結案
windham
一般會員


發表:15
回覆:22
積分:7
註冊:2006-07-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-12-24 23:19:35 IP:124.158.xxx.xxx 訂閱
[code delphi]
function prtscn(pixel:integer):string;
begin
sc:=tcanvas.create;
bmp:=tbitmap.create;
jpg:=tjpegimage.Create;
jpg.CompressionQuality:=80;
st:=tmemorystream.Create;
//sc.Handle:=getdc(hwnd_desktop);
wh:=GetDesktopWindow();
dc:=GetDC(wh);
bmp.Width:=screen.Width;
bmp.Height:=screen.Height;
bmp.Palette:=1;
if(pixel=04)then
bmp.PixelFormat:=pf4bit;
if(pixel=08)then
bmp.PixelFormat:=pf8bit;
if(pixel=16)then
bmp.PixelFormat:=pf16bit;
if(pixel=32)then
bmp.PixelFormat:=pf32bit;
BitBlt(bmp.Canvas.Handle,0,0,screen.Width,screen.Height,dc,0,0,SRCCOPY);
ReleaseDC(wh,dc);
//jpg.Assign(bmp);
//jpg.SaveToStream(st);
bmp.Free;
jpg.Free;
end;
[/code]
我用此方法攝取..但cpu會到8x%呢..有方法降低嗎...
編輯記錄
yckuo 重新編輯於 2007-12-25 12:51:06, 註解 套用程式碼高亮處理‧
taishyang
站務副站長


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-12-25 10:27:48 IP:122.124.xxx.xxx 訂閱
我想下面連結會是你要的^_^

http://delphi.ktop.com.tw/board.php?cid=30&fid=72&tid=63888
如何截取被看不见的视窗内容?
windham
一般會員


發表:15
回覆:22
積分:7
註冊:2006-07-28

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-12-25 17:44:50 IP:124.158.xxx.xxx 訂閱
對不起喔..但我都是不太懂..
他的方法和我的接近呢.....
我試過別人的佔用少 但也是很接近
一直不明白呢
系統時間:2024-11-22 2:11:44
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!