z:= floattostr(a.AUDIOFileSizeW / 1024 / 1024); label1.Caption:=floattostr(RoundTo((strtofloat(z)),-1))+' mb';