如何用DELPHI编程实现对OICQ的屏蔽。(100分)

romanticonline 2002-05-07 03:20:52
如何用DELPHI编程实现对OICQ的屏蔽。
谢谢。
...全文
48 11 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
knock 2002-06-12
  • 打赏
  • 举报
回复
jia
romanticonline 2002-05-10
  • 打赏
  • 举报
回复
楼上的,可以告诉我如何具体的实施,也就是说,如何封闭这些UDP端口吗?
banxian 2002-05-09
  • 打赏
  • 举报
回复
封掉從4000-4010的UDP端口
romanticonline 2002-05-09
  • 打赏
  • 举报
回复
谢谢大家及各位高手了,我主要想知道如何通过直接控制端口的方法来屏蔽OICQ的运行的。
谢谢大家。
eulb 2002-05-07
  • 打赏
  • 举报
回复
用FineWindow也行
只要用spy++ 或winsight找到qq的类名就可以了
lmpeel 2002-05-07
  • 打赏
  • 举报
回复
可以在后台监控,一旦发现QQ就关掉:
关闭某个程序:

lppe:tprocessentry32;
sshandle:thandle;
hh:hwnd;
found:boolean;

begin

//关闭***.exe
sshandle:=createtoolhelp32snapshot(TH32CS_SNAPALL,0);
found:=process32first(sshandle,lppe);
// str:=extractfilepath(paramstr(0))+'client.exe';
while found do
begin
//进行你的处理其中lppe.szExefile就是程序名。
str:=uppercase(extractfilename(lppe.szExeFile));
if str='***.EXE' then
begin
hh:=OpenProcess(PROCESS_ALL_ACCESS,true,lppe.th32ProcessID);
TerminateProcess(hh,0);
end;
found:=process32next(sshandle,lppe);
end;

wjohenw 2002-05-07
  • 打赏
  • 举报
回复
楼上的太直接了吧,你的程序很容易被发现的
colacoca 2002-05-07
  • 打赏
  • 举报
回复
一发现qq2000b.exe运行,就把它关掉
cobi 2002-05-07
  • 打赏
  • 举报
回复
你想如何屏蔽啊
hch_d 2002-05-07
  • 打赏
  • 举报
回复
能不能具体一点?
nne998 2002-05-07
  • 打赏
  • 举报
回复
怎么屏蔽法~~~~~~~~~?

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧