Работа с Word через Delphi [D5, Win95/98, WinME]
Salvator © (2002-11-26 19:08:00)
Мастера помогите, как через Delphi, изменить ширину столбца
таблицы в Word"е?
alvin (2002-11-27 08:50:00) [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];
Наверх 
ЧАТ |
Орешник |
|
