Скачать: CL | DM;

Работа с MSWord   Найти похожие ветки 

← →
Bers01   (2004-01-20 11:49) [0]

Добрый день УВАЖАЕМЫЕ МАСТЕРА!
Поскажите кто знает:
Есть var WA:TWordApplication;
В нем открыто много документов ( WA.Documents.Add(...);).
Как сделать активным j-ый документ т.е. чтобы стало активным окно c WA.Documents.Items(j);

С Уважением, Андрей.

---

← →
Семен Сорокин ©   (2004-01-20 11:54) [1]

Activate?

---

← →
Bers01   (2004-01-20 12:02) [2]

Activate; делает j-тый документ активным, но если пользователь до этого переключился на другой документ, то верхним(отображаемым документом) по прежнему остается тот, который выбрал пользователь. Как Быть? Как j-ый отобразить поверх остальных?

С Уважением, Андрей.

---

← →
Семен Сорокин ©   (2004-01-20 12:14) [3]

посмотри в Helpe по поводу ActiveWindow

---

← →
Yr2   (2004-01-20 12:48) [4]

1. Уточните, с каким Word_ом Вы работаете. В Word97 и в Word2000 это будет делаться по-разному. Так как большинство уже перешло на Word2000/2002, то описываю как я это делал. Не могу точно сам объяснить некоторые майкрософтовские заморочки, но эмпирически был получен метод, который надёжно работает практически всегда. Проверьте на примере трёх кнопок. Вот обработчик первой:

Procedure TForm1.Button1Click(Sender: TObject);
VAR Index : OleVariant;

begin
Index:=1;
WA.Documents.Item(Index).Activate; { активизировать Word-документ (1!)}
WA.Documents.Item(Index).ActiveWindow.Activate; { активизировать главное Word-окно (2!)}
WA.Activate; { активизировать Word (курсор) (3!)}
{ порядок важен! иначе чего-нибудь не сработает }
end;

Внимание: переключение между документами (их активизация) будет производиться, если все они уже открыты и видимы на экране (пусть частично или полностью перекрыты). Но, если они полностью минимизированы, то возникает проблема:

2. Начиная с Win2000 активизация закрытого докмента не раскрывает этот документ, а ТОЛЬКО активизирует кнопку на панели задач. Я долго боролся с этим явлением, но красивого и оригинального решения так и не нашел. хотя сделал :)

---

← →
Bers01   (2004-01-20 13:10) [5]

Да Word именно 2000
Спасибо - заработало!

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c