Показать сообщение отдельно
Старый 26.06.2012, 16:00   #7  
dmites is offline
dmites
Участник
Аватар для dmites
 
221 / 14 (1) ++
Регистрация: 10.08.2005
Для денег
xlWorkSheet.Range('А:E').NumberFormat := '# ##0,00';

Для чисел при экспорте в Excel без разделителя триад (не надо дергать региональные настройки)
xlWorkSheet.Range('А:E').FormulaR1C1:= FORMAT(pValue,0,'<Sign><Integer><Decimals>');

Для полей Code с нулями в начале, чтобs не потерять при экспорте в Excel
ch:=39; .. переменная типа char
xlWorkSheet.Range('А:E').FormulaR1C1:=FORMAT(ch)+pValue;