| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Присоединение окна чужой программы к форме. [D6, XP]

Pavelkq ©   (2008-04-04 08:51:00) 

Можно ли к своей форме присоединить окно Ворда? Было бы здорово, чтобы границ формы Ворда не было, как и системного меню. Т.е. чтобы форма выглядела, как одно целое (просто с фреймами).

---

Pavelkq   (2008-04-08 06:54:00) [1]

ANB, конечно я поставил олеконтрол.
ЮЮ, спасибо, хорошо получилось!

---

ЮЮ   (2008-04-08 03:39:00) [2]

> но эта новая форма создается где-то вдалике от намеченных
> планов внутри формы1.  Как же ее привязать к Panel1?



procedure TForm1.Button1Click(Sender: TObject);
var
 form2: TForm2;
begin
 form2 := TForm2.Create(Self);
  form2.Align := alClient;  // если не сделал это в дизайнере, установи здесь
 form2.Parent := Panel1;
 form2.Show;
end;

---

ANB   (2008-04-07 16:18:00) [3]

> Pavelkq   (07.04.08 15:07) [6]

+ Align

Кистате, я как то засунул окошко самого ворда в свою панельку без олеконтейнера - прикольно смотриться :)

---

Pavelkq   (2008-04-07 15:07:00) [4]

Работает, но эта новая форма создается где-то вдалике от намеченных планов внутри формы1.  Как же ее привязать к Panel1? Код
form2 := TForm2.Create(Panel1);
form2.Parent := Panel1;
form2.Show;
результатов не дал.

---

Pavelkq   (2008-04-07 15:07:00) [5]

Работает, но эта новая форма создается где-то вдалике от намеченных планов внутри формы1.  Как же ее привязать к Panel1? Код
form2 := TForm2.Create(Panel1);
form2.Parent := Panel1;
form2.Show;
результатов не дал.

---

ЮЮ   (2008-04-07 09:41:00) [6]

Ну так не жалей для него всей формы. А если хочется занять часть формы, то никто не мешает форму, отданную TOleContainer-у "разместить" на своей, у формы ведь тоже есть свойство Parent

procedure TForm1.Button1Click(Sender: TObject);
var
 form2: TForm2;
begin
 form2 := TForm2.Create(Self);
 form2.Parent := Self;
 form2.Show;
end;

---

Pavelkq   (2008-04-07 07:11:00) [7]

Замечательный компонент, прекрасные возможности. Но не пойму, как победить его размещение на Panel. Если установить алигн в клиент, то пока компонент не активен, он размещается, как положено, на панели. Как только я активирую, он заполняет всю мою форму, игнорируя размеры Panel.

---

ЮЮ   (2008-04-04 10:33:00) [8]

A как с pdf поступить? Он не хочет ни в какую открываться в TOleContainer, всё в своем окне открыться норовит :(

---

Сергей М.   (2008-04-04 08:53:00) [9]

см.  TOleContainer

---

Наверх