Экспорт данных в Excel
Добавлено: 25 окт 2006, 14:57
Доброго времени суток! Переношу данные из Dephi в Excel. Подскажите, как задать округление числа до двух знаков после запятой и как вывести это число с символом "%", т.е. как установить параметры ячейки? Фрагмент кода такой:
Sheet:=XLAPP.Workbooks[1].Worksheets['Отчет'];
Sheet.Cells[10,3]:=IntToStr(j)+' из 17';
Sheet.Cells[10,4].Interior.Color:=clRed;
Sheet.Cells[10,4].HorizontalAlignment:=3;
Sheet.Cells[10,4]:=100/3; ???
Вопрос касается последней строчки кода. В ячейку Excel попадает значение 33,33333. А надо 33,33%. Как реализовать? Помогите.
Sheet:=XLAPP.Workbooks[1].Worksheets['Отчет'];
Sheet.Cells[10,3]:=IntToStr(j)+' из 17';
Sheet.Cells[10,4].Interior.Color:=clRed;
Sheet.Cells[10,4].HorizontalAlignment:=3;
Sheet.Cells[10,4]:=100/3; ???
Вопрос касается последней строчки кода. В ячейку Excel попадает значение 33,33333. А надо 33,33%. Как реализовать? Помогите.