Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.13;
Скачать: CL | DM;

Вниз

Запись в таблицу через сервер Word   Найти похожие ветки 

 
TruthMan   (2005-10-18 10:38) [0]

Помогите, пожалуйста, заполнить таблицу. Никак не могу найти свойство, позволяющее обратиться к конкретной ячейке. Таблица без проблем создается при помощи команды WordDocument1.Tables.Add(WordApplication1.Selection.Range, Number, 2, EmptyParam, EmptyParam);
А вот как быть дальше не знаю.


 
evvcom ©   (2005-10-18 11:03) [1]

А ты макрос запиши, а потом текст в VB-редакторе подсмотри.


 
TruthMan   (2005-10-18 14:59) [2]

Не все удается перенести. Например неясно как выделить все таблицу и задать выравнивание для всех ячеек по центу. В VB это Selection.Tables(1).Select
   Selection.Cells.VerticalAlignment = wdCellAlignVerticalCenter
. А как перенести это в Delphi не знаю.


 
umbra ©   (2005-10-18 16:54) [3]


> А как перенести это в Delphi не знаю.



uses Word97; //чтобы делфи понимал имена констант, если ворд другой - другой      
                  //  модуль прописать. Они все в папке делфи ocx\servers\
var
table: variant;

{........................................}
table := WordDocument1.Tables.Add(WordApplication1.Selection.Range, Number, 2, EmptyParam, EmptyParam);
table.Range.Cells.VerticalAlignment = wdCellAlignVerticalCenter;
{...................................................}
table := Unassigned;


 
TruthMan   (2005-10-18 17:16) [4]

C этим разобрался, но возник другой вопрос. Как выделить следующую ячейку? Пишу WordApplication1.Selection.MoveRight(wdCell, 1, ?). Что это за параметр Extend, который надо третьим указать?


 
umbra ©   (2005-10-18 17:54) [5]


> Что это за параметр Extend, который надо третьим указать?



Extend   Optional Variant. Can be either wdMove or wdExtend. If wdMove is used, the selection is collapsed to the end point and moved to the right. If wdExtend is used, the selection is extended to the right. The default value is wdMove.


Все это написано в справке по ворду, раздел "Cправка по Visual Basic"


 
YurikGL ©   (2005-10-18 22:19) [6]

Вообще-то с таблицами лучш всего работать через ConvertToTable


 
TruthMan   (2005-10-19 11:25) [7]

Спасибо, но пробовал ставить и wdMove и wdExtend. Выдает ошибку Types of actual and formal var parameters must be identical. Используемая команда WordApplication1.Selection.MoveRight(wdCell, 1, wdMove);


 
TruthMan   (2005-10-20 09:38) [8]

Вот как надо было:
var
un_Var, ex_Var, count : OleVariant
...............................................
WordApplication1.Selection.MoveRight(un_Var, count, ex_Var);

Так что билет мне до Бобруйска, в один конец :))



Страницы: 1 вся ветка

Текущий архив: 2005.11.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.025 c
2-1130124489
Vitaliy
2005-10-24 07:28
2005.11.13
Наследование классов


14-1129899414
ilya39
2005-10-21 16:56
2005.11.13
сайт по ASP.NET


2-1129632747
ne0n
2005-10-18 14:52
2005.11.13
DWORD--->String


3-1128364558
Darkwing
2005-10-03 22:35
2005.11.13
Существует ли исходник BDE, независимый от Delphi и где взять?


14-1129621622
Ищущий
2005-10-18 11:47
2005.11.13
DJVU