экспорт в Excel и округление.

[hyperborean]

При экспорте в Excel (Эксель) через Automation "Microsoft Excle 8.0 Object Library" числа округляются до двух знаков после нуля при условии, что в перемунную типа xlRange.Value передается число.
Однако, при использовании форматирования вида "# ##0,000##" (т.е. нам нужно 3-5 знаков после нуля и разделитель разрядов до нуля) и передачи текстового значения все получается отлично.

vValue(type variant)
dQuantity(type decimal)

БЫЛО:

vValue := dQuantity; //передается через параметр
xlRange.NumberFormat := '# ##0,00###';
xlRange.Value := vValue;

СТАЛО:

vValue=FORMAT(dQuantity); //передается через параметр
xlRange.NumberFormat := '# ##0,00###';
xlRange.Value := vValue;