| vsoft
10627
|
2004/12/17 19:33:37 |
以下是我改的，CPU占4%~8%
const
SnowNumber = 250; // 雪点数量-1
SetTimer(0, hTimer, (Random(27)+4) *250, @TimerProc); // 重设下次风向改变时间
hTimer := SetTimer(0, 0, Random(5)*250, @TimerProc); // 安装随机风向定时器
现在有一个问题就是：当桌面使用墙纸时，雪下的就太假了，呵.... |
| liumazi
10625
|
2004/12/17 18:34:52 |
| 呵呵,那就好,说明tintin1943兄的Cpu比较快,羡慕ing.... |
| tintin1943
10624
|
2004/12/17 17:51:00 |
| 加了Sleep(10);,CPU在10%以下，雪花还很连贯！ |
| iamdream
10623
|
2004/12/17 17:35:15 |
我跟踪了一下，似乎还是移动雪点时比较花时间；
将SetPixel改为SetPixelV可以少花点时间，不过对于本例来说几乎可以忽略不计！*o# |
| liumazi
10612
|
2004/12/17 14:10:37 |
我觉得关键要缩短移动所用的时间,Sleep长点可以降低Cpu占用,但是可能不连贯..
另,当初讨论见: http://www.delphibbs.com/delphibbs/dispq.asp?lid=2926220 |
| tintin1943
10610
|
2004/12/17 13:53:26 |
| 呵呵，做得很不错.CPU资源就是高一点。我加了一句Sleep(10);在while循环里，CPU就降到10-20％。如果加了Forms单元，编译出来，只要360K，还是划不来。应该还有别的方法。 |
| mmzmagic
10604
|
2004/12/17 10:54:39 |
| 麻子兄厉害啊 佩服ing... |
| delphi1977
10594
|
2004/12/17 8:52:39 |
| 真的很好，谢谢。 |
| leun
10590
|
2004/12/17 1:20:24 |
| 不错. 怎么这么占系统资源? |
| liumazi
10588
|
2004/12/17 0:02:51 |
| 呵呵,看来bingo123兄的机器比我的好. :-P |
| 9903
10583
|
2004/12/16 21:43:02 |
| 好，又是一个经典之作！！！ |
| bingo123
10581
|
2004/12/16 21:04:49 |
| 很漂亮，喜欢~~~就是占用CPU50%，麻子兄继续改进 |
| isxuzhu
10579
|
2004/12/16 19:44:28 |
很不错，值得学习：）
但为何资源占用会100％？ |
| luckhacker
10573
|
2004/12/16 18:40:42 |
| 凡麻子兄的贴我必顶 |
|
