Работа с Word через Delphi

← →
Salvator (2002-11-26 19:08) [0]

Мастера помогите, как через Delphi, изменить ширину столбца таблицы в Word"е?

← →
alvin (2002-11-27 08:50) [1]

В своей программе я читал значения из StringGrid, а менял ширину столбцов изменяя ширину ячеек в цикле

// получить массив таблиц
tabls:=aRange.Tables;
// добавляем новую таблицу размером 5 на 5
tabl:=tabls.Add(arange,StringGrid1.RowCount,4);

for i:=0 to StringGrid1.RowCount-1 do begin
// читаем значение ячеек
tabl.Cell(i+1,1).Width:=50;
tabl.Cell(i+1,1).Range.Text:=StringGrid1.Cells[0,i];
tabl.Cell(i+1,2).Width:=150;
tabl.Cell(i+1,2).Range.Text:=StringGrid1.Cells[1,i];
tabl.Cell(i+1,3).Width:=170;
tabl.Cell(i+1,3).Range.Text:=StringGrid1.Cells[2,i];
tabl.Cell(i+1,4).Width:=80;
tabl.Cell(i+1,4).Range.Text:=StringGrid1.Cells[3,i];

Работа с Word через Delphi Найти похожие ветки