Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: ActiveX/СОМ/CORBA > Границы и перенос по словам в Excel

Автор: Akella 23.10.2006, 11:05

Границы и перенос по словам.
Для начала выделяем нужный диапазон а затем...
Показываем границы:

Код


Excel.Selection.Borders.LineStyle:=xlContinuous;
Excel.Selection.Borders.Weight:=xlThin;

И включаем перенос по словам:

Код


Excel.Selection.WrapText:=true;

Создаем OLE объект:

Код


Excel:=CreateOleObject('Excel.Application');

Понадобятся константы:
const

Код


xlContinuous=1;
xlThin=2;
xlTop = -4160;
xlCenter = -4108;