如何检测TRW2000 的运行
有关softice的监测方法很多,我在这儿给出一个检测TRW2000是否运行的方法:
以下是代码:
procedure TForm1.FormCreate(Sender: TObject);
var
killp : hwnd;
begin
killp:=findwindow(nil,pchar('TRW2000 for Windows 9x'));
if killp<>0 then
begin
sendmessage(killp,WM_CLOSE,0,0);//写上你的代码
end;
end;
问题点数:10、回复次数:3Top
1 楼karl()回复于 2002-05-10 16:30:44 得分 0
但如果我把TRW2000 for Windows 9x该掉你就看不见了呀......Top
2 楼karl()回复于 2002-05-10 16:32:19 得分 0
而且这样的代码编译好后,我反汇编一下就看到了Top
3 楼cutelocust(涉水而来)回复于 2002-05-10 16:40:18 得分 0
这是这种方法的局限Top
4 楼karl()回复于 2002-05-10 16:46:13 得分 10
是啊,所以说要想一种好的方法
不瞒你说,我也Crack过东西,但一次我用TRW2000载入一个软件的时候就被他发现把
我的MBR擦掉了,以后就不敢用这东西了........Top




