Carregar muitas imagens em um formulário

Preciso carregar imagens em diversos TImage, para isso utilizo a função abaixo onde varro todos os componentes TImage.

var i : Integer;
begin
for i := 0 to ComponentCount -1 do
if Components[i] is TImage then
TImage(Components[i]).Picture.LoadFromFile('C:\\Users\\.....\\mis.jpg');
end;

Ocorre que como são muitos arquivos a serem carregados o sistema trava um pouco, sendo assim pensei criar um thread para isso, mas só consegui fazendo chamando o TImage individualmente o que daria um trabalho maior e caso incluisse mais TImage em tempo de execução não funcionaria:

var lForm1 : TForm1;
begin
lForm1 := _Form As TForm1;
lForm1.Image1.Picture.LoadFromFile('');

Se algum colega mais experiente tiver alguma dica ou outra solução para carregar as imagens sem travar a aplicação.