может так
XMLD.load(URL);
for I:=0 to 20 do
begin
Application.ProcessMessages;
end;