Excel

← →
l123456789l (2003-05-30 14:31) [0]

Из Delphi 5 (столбец: String ) кидаю данные в Excel
указываю в Excel:
XL.WorkBooks[1].WorkSheets[1].Range["E1:E100"].VerticalAlignment := 1; //Выоавнивать по верхнему краю
XL.WorkBooks[1].WorkSheets[1].Range["E1:E100"].WrapText := True; //Переносить строку
Но когда я смотрю отчет Excel в виде просмотра и печати появляются пробелы между строк, текст сжимается, а автоподбор столбца не делает
В табличном виде Excela вид такой
ппппппппппппппппппппппппп
ррррррррррррррррррррррррр

При просмотре на печати
ппппппппппппппппппппппппп

ррррррррррррррррррррррррр

С уважение Аскар Астана

← →
AbrosimovA (2003-06-04 10:16) [1]

А ты не делай WrapText. А что значит "текст сжимается"?

← →
Vitek (2003-06-05 06:59) [2]

Попробуй
XL.WorkBooks[1].WorkSheets[1].Range["E1:E100"].VerticalAlignment :=-4108

← →
AbrosimovA (2003-06-05 08:19) [3]

xlVAlignTop

Excel Найти похожие ветки