Текущий архив: 2008.05.04;
Скачать: CL | DM;
Вниз
Присоединение окна чужой программы к форме. Найти похожие ветки
← →
Pavelkq (2008-04-04 08:51) [0]Можно ли к своей форме присоединить окно Ворда? Было бы здорово, чтобы границ формы Ворда не было, как и системного меню. Т.е. чтобы форма выглядела, как одно целое (просто с фреймами).
← →
Сергей М. © (2008-04-04 08:53) [1]см. TOleContainer
← →
ЮЮ © (2008-04-04 10:33) [2]A как с pdf поступить? Он не хочет ни в какую открываться в TOleContainer, всё в своем окне открыться норовит :(
← →
Pavelkq (2008-04-07 07:11) [3]Замечательный компонент, прекрасные возможности. Но не пойму, как победить его размещение на Panel. Если установить алигн в клиент, то пока компонент не активен, он размещается, как положено, на панели. Как только я активирую, он заполняет всю мою форму, игнорируя размеры Panel.
← →
ЮЮ © (2008-04-07 09:41) [4]Ну так не жалей для него всей формы. А если хочется занять часть формы, то никто не мешает форму, отданную 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 15:07) [5]Работает, но эта новая форма создается где-то вдалике от намеченных планов внутри формы1. Как же ее привязать к Panel1? Код
form2 := TForm2.Create(Panel1);
form2.Parent := Panel1;
form2.Show;
результатов не дал.
← →
Pavelkq (2008-04-07 15:07) [6]Работает, но эта новая форма создается где-то вдалике от намеченных планов внутри формы1. Как же ее привязать к Panel1? Код
form2 := TForm2.Create(Panel1);
form2.Parent := Panel1;
form2.Show;
результатов не дал.
← →
ANB (2008-04-07 16:18) [7]
> Pavelkq (07.04.08 15:07) [6]
+ Align
Кистате, я как то засунул окошко самого ворда в свою панельку без олеконтейнера - прикольно смотриться :)
← →
ЮЮ © (2008-04-08 03:39) [8]> но эта новая форма создается где-то вдалике от намеченных
> планов внутри формы1. Как же ее привязать к Panel1?
procedure TForm1.Button1Click(Sender: TObject);
var
form2: TForm2;
begin
form2 := TForm2.Create(Self);
form2.Align := alClient; // если не сделал это в дизайнере, установи здесь
form2.Parent := Panel1;
form2.Show;
end;
← →
Pavelkq (2008-04-08 06:54) [9]ANB, конечно я поставил олеконтрол.
ЮЮ, спасибо, хорошо получилось!
Страницы: 1 вся ветка
Текущий архив: 2008.05.04;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.019 c
