[[maeyanes]]

Usa Application.ProcessMessages dentro del bucle de carga...

Código Delphi [-]
for I := 0 to Count - 1 do
begin
  // Código a ejecutar
  Application.ProcessMessages
end;