给迅雷加个密码输入框？

Question

想在迅协运行之前，弹出一个密码输入框，密码正确继续使用
密码错误以挂起
代码如下：
procedure TForm1.Timer1Timer(Sender: TObject);
var
myhand:THandle;
begin
myhand:= FindWindow('#32770',pchar('建立新的下载任务'));
 if myhand>0 then
 begin
 i:=FindProcessID('Thunder5.exe');
 if i>0 then
 begin
 hProcess1:=OpenProcess(PROCESS_ALL_ACCESS,False,i);
  //挂起进程
  SuspendProcess(hProcess1);  end;
  end;
  end;现在挂起迅雷对话框的时候，其它的程序，也会假死，无反映
当恢复进程的时候，又不会弹出迅雷的对话框，不知是挂起进程的方法不对
还是有其它更好办法来实现？

Answer 1

没必要这么做，你可以在“新建下载任务”时把这个窗口隐藏，然后显示你的输入密码窗口，密码正确就再把“新建下载任务”显示出来。密码输错三次以上你就向“新建下载任务”发送WM_CLOSE关闭它。