请问个QQ登录器源码的问题，

Question

以下代码是QQ登陆器执行登陆QQ的，请问那个qqpath我改成了彩虹显IP的地址就不能启动qq，想启动彩虹QQ啊
要怎么办？我procedure  QQdenglu();
var 
  qqid,qqpass,qqpath:string;
  qqstate:byte = 41 ;
begin
  qqid:=edit1.text;
  qqpass:=edit2.text;
    reg :=TRegistry.Create;
    with reg do
      begin
        RootKey:=HKEY_LOCAL_MACHINE;
        if openkey('SOFTWARE\TENCENT\QQ',true) then
          QQpath :=  readstring('Install') ;
          free;
      end;
      winexec(pchar(GetCommandLine(QQpath,QQID,QQPass,QQstate)),SW_MAXIMIZE);
end;);

Answer 1

通过读取注册表项HKEY_LOCAL_MACHINE下的'SOFTWARE\TENCENT\QQ'得到QQ的安装路径呀。以上是关于注册表的读取操作
winexec(pchar(GetCommandLine(QQpath,QQID,QQPass,QQstate)),SW_MAXIMIZE);
这句就是根据从注册表中读取出来的QQ安装路径运行QQ了。。

Answer 2

winexec(pchar(GetCommandLine(QQpath,QQID,QQPass,QQstate)),SW_MAXIMIZE);这句,相当于:
开始----运行...
输入:
QQ程序路径 [QQ号] [QQ密码] [登录状态]
腾讯QQ的执行程序里面,应该处理了后面的参数:[QQ号] [QQ密码] [登录状态]
delphi的代码里面就可以用 ParamStr()函数取得命令行参数.而你所说的 彩虹显IP 的QQ程序,应该是别人改过的.可能没有处理这些参数的代码在里面.