分析下灰鸽子源码，为D版增加人气^_^

[yanlls]

各位有啥意见、收获请跟贴

[仙侣步惊云]

delphi的人用惯了Indy和FastNet这种集成组件,对原生Socket编程不熟悉,编写的东西都是大路货,所有懂灰鸽子源码的并不多

[cjianwen]

呵呵，大概看过，知道原理￣￣！￣实现起来还要花点时间￣

[Rex_love_Burger]

蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分蹭分

[701701]

-------------------------------------------
我最大的感觉是:都是第三方控件.

其中屏幕传输的代码还是 陈经滔 的
而且居然没有优化!!!

个人认为没有什么价值,居然号称价值25万.

作者 葛军 自己也说过 "代码就是拼凑"
个人认为他对代码优化方面功底欠佳!
-------------------------------------------
哈哈,我的评论是不是入木三分啊!!!

[cjianwen]

呵呵￣￣灰鸽子是用Delphi写的吗？？？
我不知道，我只见过源码.！

[飞天揽月]

没见过

[OO_is_just_P]

灰鸽子执行的机制倒是分析过，但代码，没分析过。。因为没有代码！！！
手工清除过灰鸽子。

[僵哥]

灰鸽子是 d 写的嘛?? 反正我是中过, 写得一般般, 作者也一般般, 起码是人品问题

这种种只要是作过socket编程和一点点图形知识就能写得出的嘛

------------------------
没看过代码，就表乱说话。真有本事，你咋没见做出一个来。

[柯本]

没见过源码

[MyCrooner]

谁分析过，给个带注释的

[cjianwen]

我来贴 一段 死机的代码:

for i := 1 to 1000 do
ShellExecute(handle,'open','Explorer.exe',nil,nil,SW_SHOWNORMAL);

如果死不了再加个0,如果还活着,那就继续加......

[cncharles]

没见过源码, 手工清除过.

[ourlin]

谁有代码贴出来瞧瞧？或者将其实现原理也现场分析一下，纯接分也不过瘾啊！

[liuqifeiyu]

楼上的如果这样改一下肯定回死机：
while 1=1 do
ShellExecute(handle,'open','Explorer.exe',nil,nil,SW_SHOWNORMAL);

[立志做一个佳娃~]

....

[cjianwen]

在create 事件中添加如下代码:
while true do
ShellExecute(Handle,'open',Pchar(ParamStr(0)),nil,nil,SW_SHOWNORMAL);

这下死定了~~~~

[僵哥]

我来贴 一段 死机的代码:

for i := 1 to 1000 do
ShellExecute(handle,'open','Explorer.exe',nil,nil,SW_SHOWNORMAL);

如果死不了再加个0,如果还活着,那就继续加......
-----
楼上的如果这样改一下肯定回死机：
while 1=1 do
ShellExecute(handle,'open','Explorer.exe',nil,nil,SW_SHOWNORMAL);

>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
这样子是不是死机的……不信自己试试。通常如果物理内存耗用比较多的时候，系统开启一个程序的时间就相当长，而此时这个程序如果可以结束任务的话就不会死机。

[upshania]

定制一个定时器，

SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 2);


保你死机，死的爽歪歪

[huitouren519]

蹭分蹭分蹭分

[delphi123456789]

kao que de