1、试试FreeAndNil过程。
2、运行结束不就退出了?要完全停止的话,调用TTimer.Enable:=false。
3、使用Copy函数。

解决方案 »

  1.   

    3:Copy() & Pos();
    2:Timer.Enable:=false;
    1:.......
      

  2.   

    1:FreeAndnil过程是不是Form1.FreeAndnil这样调用?我这样调用提示不对啊。
    我只是想实现象软件启动的那种功能,封面显示完后,封面窗口释放掉,然后显示猪窗口,哪位有好的实现方法?请指点
      

  3.   

    1.在工程文件中修改,如下:
    begin
      Application.Initialize;
      Application.Title := 'form1';
      FEnvelop:=TFEnvelop.Create(FEnvelop);//封皮form创建
      FEnvelop.Show;//显示
      FEnvelop.Update;//更新
      Application.CreateForm(TMainForm, MainForm);//主窗体创建
      FEnvelop.Free;//封皮释放
      Application.Run;
    end.2.在OnTimer事件中设定条件,一旦条件满足,Timer.Enabled:=False;3.首先使用Pos函数查找指定子串的位置,然后用Copy函数截取
      

  4.   

    FreeAndNil的意思是说调用对象的Free方法,并且把这个实例的指针设置为空。
      

  5.   

    补充:
    3、如果是查找子字符串的话,可以用Pos函数