Как сделать в дельфи чтоб текст в Label выводился не сразу, а через какой-нибудь промежуток времени? Пример плиз приведите ))

procedure TForm1.ToolButton5Click(Sender:TObject);
begin
Sleep(500) // Задержка в милесекундах 500 милесекунд
пол секунды
Label1.Caption:='Hello World'
end;
end.