关于TProgressBar控制。求助。

Question

我做实验了，是不行
if self.ProgressBar1.Position=100 then self.ProgressBar1.Visible:=false;
这样写就可以了

Answer 1

很简单，因为你的Timer还没有停掉，
它还在继续访问ProgressBar，但你已经把它Free掉了，
所以会出错，你只要在ProgressBar1.Free前加一句Timer1.Enabled := False;就可以了。

Answer 2

你用了free,但事先并没有动态创建呀,所以出错.
procedure TForm1.FormCreate(Sender: TObject);
begin
  myProgressBar:=TProgressBar.Create(self);
  myProgressBar.parent:=form1;
end;
myProgressBar要先定义,
要给分呀!!!!