Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: ActiveX/СОМ/CORBA > Создание таблицы в Word


Автор: ci5 11.1.2009, 18:35
Здраствуйте. Столкнулся с проблемой создания таблицы. Но таблицу мне надо не просто создать, а сделать что-то в виде например 5x5 и 4-ый столбец например будет создержать всего одну строку. Тоесть в четвертом столбце сделать просто одну строку. Как возможно это сделать ? Юзал поиск, ничего по этому поводу не нашел. 
Заранее благодарен. 

Автор: Albinos_x 12.1.2009, 00:43
у ячейки таблицы как и в экселе есть свойство mergecells

Автор: ci5 12.1.2009, 09:51
Можно пожалуйста маленький пример привести как это будет выглядеть, а то я че-то никак не пойму как это реализуется. У вас в примере написано только для excel это свойство и оно выглядит так 
Код

ExcelApplication1.Range['A1','A3'].MergeCells:=True;

Но тут через A1,A3 . А вот как в Word это реализовать никак не пойму. 

Автор: Rrader 13.1.2009, 19:40
Код

procedure TForm1.Button1Click(Sender: TObject);
var
  Doc, Table: OleVariant;
begin
  Doc := WordApplication1.ActiveDocument;
  Table := Doc.Tables.Add(Doc.Content, 5, 5);
  Table.Borders.InsideLineStyle := wdLineStyleSingle;
  Table.Borders.OutsideLineStyle := wdLineStyleSingle;
  Table.Cell(1, 4).Merge(Table.Cell(5, 4));
  Table := Unassigned;
  Doc := Unassigned;
end;

Автор: ci5 14.1.2009, 09:12
Спасибо большое, все сделал.  smile 

Автор: ci5 16.1.2009, 19:32
Столкнулся с проблемой. Не могу сделать жирным текст в таблице и сделать поцентру. Может кто подскажет ? И вообще где можно посмотреть по этому информацию ? 

Автор: Rrader 17.1.2009, 12:19
Цитата(ci5 @  17.1.2009,  01:32 Найти цитируемый пост)
 Не могу сделать жирным текст в таблице

Код

Table.Range.Font.Bold := 1;

Цитата(ci5 @  17.1.2009,  01:32 Найти цитируемый пост)
 и сделать поцентру

Код

Table.Range.ParagraphFormat.Alignment := wdAlignParagraphCenter;
Table.Range.Cells.VerticalAlignment := wdCellAlignVerticalCenter;

Цитата(ci5 @  17.1.2009,  01:32 Найти цитируемый пост)
И вообще где можно посмотреть по этому информацию ? 

В справке MS Office по Word, Excel etc.

Автор: ci5 17.1.2009, 23:59
Все спасибо все получилось

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)