procedure TMyThread.Execute;
begin
inherited;
while not Terminated do
begin
Sleep(100);
try
FStr := FIdHttp.Get('');
except
Self.Terminate;
end;
end;
end;

我哪里写得不对吗？