这个在delphi中怎么实现?直接TThread.Create(nil)就可以了吗?

解决方案 »

  1.   

    不是吧???!!!
        下载时可以设置 option,但是至少应该先停止下载,然后再开始才能使新 设置生效啊, 呵呵。
        看这段代码:
       procedure bt1click(sender:Tobject);
         var i:integer;
         begin
           i:=0;
           while true
             begin
               mainform.caption:=inttostr(i);
               application.postmessage;
               inc(i)
             end;
         end;
       procedure bt2click(sender:Tobject);
         begin
           option.showmodal;
         end;
      option 显示后 主窗口的标题不是还一直在 !!闪!!吗?
      

  2.   

     提前
     Zig ,你怎么不理人家啊(酸啊)?