[Asinkrit]

Напиши так:

Код:

 ...
  Edit3.text:=IntToStr (Razmer) + ' KB';
  Application.ProcessMessages;