Оттрассируй эти 2 строчки
while not XMLD.load(URL) do
Application.ProcessMessages;

Мне кажется, что XMLD.load не вернет управление до тех пор пока не загрузится, а посему и ProcessMessages ты не вызовешь.

Здесь варианта 2
1) Вынеси этот кусок кода в отдельный поток

2) Посмотри по документации может у твоего класса есть метод обработки времени загрузки.

__________________

http://madnet.name - madnet - blog | homepage (Мысли, релизы, скрипты, софт)

http://antichat.ru - Лучший сайт по безопасности
irc.antichat.ru:7771 #antichat - общение online
ГАРАНТ ФОРУМА