Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.09.2010, 19:43   #1
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию Необычное взаимодействие двух форм.

Есть две формы, назовем их A и B

Свойства: Форма A сдвигать со своей позиции на экране не будет (разве что по SetWindowPos). Форма B лежит на форме А и относительно её сдвигаться не будет (например: A.Left = 100 B.Left = 150 → A.Left = 200 B.Left = 250).

Что я хочу получить:
- Форма В всегда должна лежать на форме А.
- При клике на форму А не должно быть никаких звуков, как например при клике на родителя модальной формы.
- При клике на форму А она не должна перекрывать собой форму В. Даже на мгновение, чтобы форма В не мерцала.

Пока вроде всю, буду рад помощи.
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 23.09.2010, 22:05   #2
Somebody
Участник клуба
 
Регистрация: 08.10.2007
Сообщений: 1,185
По умолчанию

B.Parent := A не подходит?
Somebody вне форума Ответить с цитированием
Старый 23.09.2010, 23:20   #3
DomiNick
Студент, не
Старожил
 
Аватар для DomiNick
 
Регистрация: 29.01.2009
Сообщений: 2,067
По умолчанию

Эм..... SetParent? о__О
I am the First of Cyber Evolution...
I am the First to Program your Future...
DomiNick вне форума Ответить с цитированием
Старый 24.09.2010, 17:38   #4
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,761
По умолчанию

Используйте дочерние формы MDIChild
FaTaL вне форума Ответить с цитированием
Старый 25.09.2010, 13:45   #5
ViktorXP
Форумчанин
 
Аватар для ViktorXP
 
Регистрация: 24.11.2006
Сообщений: 108
По умолчанию

+ ко всем выше высказаным предложениям добавлю еще одно.
перегружаеш в форме B метод CreateParams
и вписываеш в нем такой код
Код:
procedure TFormB.CreateParams(var Params: TCreateParams);
begin
 inherited CreateParams(Params);
 Params.WndParent := {тут подсовываеш хендл окна A}; 
end;
И теперь форма B всегда будет поверх формы A, но при этом будет отдельным окном.
ViktorXP вне форума Ответить с цитированием
Старый 25.09.2010, 17:28   #6
DomiNick
Студент, не
Старожил
 
Аватар для DomiNick
 
Регистрация: 29.01.2009
Сообщений: 2,067
По умолчанию

Точнее "внутри клиентской области"... Именно это и делает SetParent...
И думаю в проекте не используется VCL... ))
I am the First of Cyber Evolution...
I am the First to Program your Future...
DomiNick вне форума Ответить с цитированием
Старый 25.09.2010, 17:33   #7
ViktorXP
Форумчанин
 
Аватар для ViktorXP
 
Регистрация: 24.11.2006
Сообщений: 108
По умолчанию

Цитата:
Сообщение от DomiNick Посмотреть сообщение
Точнее "внутри клиентской области"... Именно это и делает SetParent...
Нет... это будет отдельное окно. и при этом всегда находится поверх "главного" окна
ViktorXP вне форума Ответить с цитированием
Старый 25.09.2010, 17:55   #8
Yurk@
Участник клуба
 
Аватар для Yurk@
 
Регистрация: 19.12.2007
Сообщений: 1,100
По умолчанию

а чем MDI то не подходит ?
На форуме: Помогаю за спасибо
ICQ\Skype: Это моё личное время ...
Yurk@ вне форума Ответить с цитированием
Старый 25.09.2010, 17:57   #9
ViktorXP
Форумчанин
 
Аватар для ViktorXP
 
Регистрация: 24.11.2006
Сообщений: 108
По умолчанию

ну мы еще не знаем что топикстартер решил. ему тут варианты написали. ему осталось только выбрать то что больше всего подходит к его ситуации.

пс. насчет mdi ему предложили в 4 посте
ViktorXP вне форума Ответить с цитированием
Старый 25.09.2010, 18:00   #10
Somebody
Участник клуба
 
Регистрация: 08.10.2007
Сообщений: 1,185
По умолчанию

Цитата:
Сообщение от Yurk@ Посмотреть сообщение
а чем MDI то не подходит ?
Из пушки по воробьям.
Somebody вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сближение двух форм CraftR14 Общие вопросы Delphi 8 20.04.2010 18:35
Взаимодействие форм Anekdot Общие вопросы Delphi 2 29.01.2010 07:33
Нормальное сворачивание ДВУХ форм Alex Cones Общие вопросы Delphi 1 27.07.2009 23:58
Взаимодействие форм mauar Общие вопросы Delphi 7 05.05.2008 11:36