Word таблицы

[Mr_skiner]

Добрый день. Возникли проблемы с созданием таблиц в Worde посредствам делфи.

  App := CreateOleObject('Word.Application');
  App.Documents.Add;
  App.ActiveDocument.Tables.Add(App.ActiveDocument.Range(0, 0), 5, 2);
  App.Visible := True;

таблица создается нормально, как заполнять каждую ячейку я знаю, но как производить форматирование? Допустим, изменить ширину первой колонки.
И еще одно. мне нудно создать циклом несколько таблиц на одной странице, как это осуществить? Если зациклить этот код, то таблица вставляется в первую ячейку предыдущей. благодарю за внимание.

[FaTaL]

как производить форматирование? Допустим, изменить ширину первой колонки.

Зайдите в ворд, включите запись макроса увеличьте ширину столбца, остановите запись макроса и посмотрите сам макрос. Потом перенесите это в Delphi.

И еще одно. мне нудно создать циклом несколько таблиц на одной странице, как это осуществить? Если зациклить этот код, то таблица вставляется в первую ячейку предыдущей. благодарю за внимание.

Перед тем как создать новую таблицу, сделайте переход курсора в конец документа. Помоему я делал это как то так Word.Selection.EndKey;