Ограничение раскрывания окон программ

@Razmir · Регистрация: 04.03.2013

Author24 — интернет-сервис помощи студентам

День добрый всем. Подскажите, как можно замутить такую фишку? Есть программка, представляющая собой вытянутую по верху экрана форму. Как можно сделать так, чтобы когда открываешь проводник, браузер или что то другое, они не залазили под эту форму в максимальном режиме, а открывались строго до нее(т.е. эта форма ограничила размер экрана). Спасибо.

Добавлено через 15 часов 57 минут
Ни кто не знает как это сделать???

@aagubarev · 05.03.2013, 06:47

Доброго времени. Ты пишешь на чем-то программку или уже имеется готовая?
не заметил (имеется).
Вообще если есть функция прилипания у программы, то она сама должна регулировать окно.

@Razmir · 05.03.2013, 07:05 **[ТС]**

А как функция прилипания может помочь? Желательно чтобы и рабочий стол был до формы. Т.е. как панель задач, под которой ничего не прячется.

@aagubarev · 05.03.2013, 09:37

Сообщение от Razmir

А как функция прилипания может помочь? Желательно чтобы и рабочий стол был до формы. Т.е. как панель задач, под которой ничего не прячется.

Ну так я и говорю, функция "прилипания", к примеру (квип ставишь. он липнет к границе экрана, затем любое открытое окно будет до одной стороны формы.)

Если пишешь сам, то)

Delphi

procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.ScreenSnap:=true;
  Form1.SnapBuffer:=15;
end;

Форма будет липнуть и окно будет ограничено по краю.

что за программа?

@Razmir · 05.03.2013, 10:19 **[ТС]**

Да по сути это не программа. В машине стоит комп, и картинка с него не помещается на мониторе. Настройки ничем не помогают. Получается когда тот же браузер открываешь шапка его уходит за видимую границу экрана. Соответственно и значки рабочего стола также вылазят. Вот решил сделать такой своеобразный костыль. Со значками уже разобрался, осталось с окнами.

Добавлено через 8 минут
А как сделать оное прилипание?

Добавлено через 20 минут
И так, нашел такое:

Delphi

rect:trect;
 
Rect := Screen.WorkAreaRect;
rect.Top:=75;// Заданные размеры рабочей области
rect.left:=75;
rect.right:=75;
SystemParametersInfo(SPI_SETWORKAREA, 0, @Rect, SPIF_SENDWININICHANGE);

1. Область рабочего стола ограничивается заданными параметрами.
2. На максимум новое окно открывается так же по заданным размерам.

Остается две вещи:

1. Открытые до выполнения кода окна остаются за пределами рабочей области.
2. Окна открывающиеся не в развернутом состоянии уходят за пределы этой области.

Как это возможно решить?

Добавлено через 6 минут
Спасибо.

Смешение этих двух кодов решило, проблему 2.
Осталась 1я проблема.

@volvo · 05.03.2013, 12:15

Razmir, на форумах MSDN проскакивало решение: передавать вторым параметром SystemParametersInfo не 0, а 1, тогда первый пункт должен решиться.

@Razmir · 05.03.2013, 16:26 **[ТС]**

Спасибо. А как сделать чтобы иконки не затрагивало, а только окна?

@Razmir 3 / 2 / 1 Регистрация: 04.03.2013 Сообщений: 145
		1
	Ограничение раскрывания окон программ 05.03.2013, 06:44. Показов 1506. Ответов 6 Метки нет (Все метки) День добрый всем. Подскажите, как можно замутить такую фишку? Есть программка, представляющая собой вытянутую по верху экрана форму. Как можно сделать так, чтобы когда открываешь проводник, браузер или что то другое, они не залазили под эту форму в максимальном режиме, а открывались строго до нее(т.е. эта форма ограничила размер экрана). Спасибо. Добавлено через 15 часов 57 минут Ни кто не знает как это сделать??? 0

@aagubarev 0 / 0 / 0 Регистрация: 05.03.2013 Сообщений: 31
	05.03.2013, 06:47	2
	Доброго времени. Ты пишешь на чем-то программку или уже имеется готовая? не заметил (имеется). Вообще если есть функция прилипания у программы, то она сама должна регулировать окно. 0

@Razmir 3 / 2 / 1 Регистрация: 04.03.2013 Сообщений: 145
	05.03.2013, 07:05 [ТС]	3
	А как функция прилипания может помочь? Желательно чтобы и рабочий стол был до формы. Т.е. как панель задач, под которой ничего не прячется. 0

@volvo Супер-модератор 32991 / 21297 / 8180 Регистрация: 22.10.2011 Сообщений: 36,592 Записей в блоге: 8
	05.03.2013, 12:15	6
	Razmir, на форумах MSDN проскакивало решение: передавать вторым параметром SystemParametersInfo не 0, а 1, тогда первый пункт должен решиться. 0

@Razmir 3 / 2 / 1 Регистрация: 04.03.2013 Сообщений: 145
	05.03.2013, 16:26 [ТС]	7
	Спасибо. А как сделать чтобы иконки не затрагивало, а только окна? 0