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

移動速度差異甚大該如何解決?

答題得分者是:wameng
chiehjj
初階會員


發表:21
回覆:63
積分:26
註冊:2002-12-31

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-04-18 18:49:42 IP:220.130.xxx.xxx 未訂閱
各位前輩 我想了解物件移動的速度,在P4 2.4G,512M RAM的測試結果如下 160個物件須 20ms, 320個物件須 56ms, 640 個 297ms, 1280個 2312ms 2560個物件須10702ms.(上述數據係測量幾次後的平均值) 理論上移動時間應隨物件數目比例增加,但各位前輩可看出上述數據幾乎是以平方比的級數增加,不知何故,如何解決?請前輩指點,謝謝 我的測試程式如下 procedure Tmain.N221Click(Sender: TObject); VAR I:INTEGER;con:tcontrol;myline:tline;rstart,rend,fre:int64; begin QueryPerformanceFrequency(fre); QueryPerformanceCounter(rstart); FOR I:=0 TO list_SELECTOBJ.Count-1 do begin con:=tcontrol(list_selectobj.items[i]); con.Left :=con.Left 50 ; con.Top :=con.Top 50; end; QueryPerformanceCounter(rend); main.Caption := 'move=' floattostr(((rend-rstart)/ fre )* 1000) ',count_=' inttostr(list_selectobj.Count); end;
wameng
版主


發表:31
回覆:1336
積分:1188
註冊:2004-09-16

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-04-18 19:25:43 IP:61.31.xxx.xxx 未訂閱
為何不用Thread 解決。 另外使用 SetBounds 移動物件效率較高。 參考
chiehjj
初階會員


發表:21
回覆:63
積分:26
註冊:2002-12-31

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-04-20 17:43:59 IP:220.130.xxx.xxx 未訂閱
使用setbound測試結果幾乎減少了一半的時間,使用多緒似乎沒有多大幫助,謝謝版主幫忙,Thanks
系統時間:2024-05-20 20:44:30
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!