Несворачиваемая, дырявая форма - Общие вопросы Delphi

polzovatelpk · 18.03.2011, 11:14

Нужно сделать форму, которая:
1) не сворачивалась кнопкой "свернуть все окна" или клавишами Win+D;
2) она была прозрачной и "дырявой", т.е. через неё можно было бы нажимать мышкой для работы с другими программами.
P.S. Желательно конечно если привидете код программы.

tsar_ · 18.03.2011, 12:43

Тема интересная. А что должна делать такая программа?

Serge_Bliznykov · 18.03.2011, 13:55

вот примерчик. чужой.

(с) PostcardWare (chensky@grot.de)
(C) 1998 T.Zverinskaya, O.Chensky

NB. закрыть можно двойным щелчком в области линий звезды (или просто ESC)
Правой кнопкой - покажет простенький About

Johnson · 18.03.2011, 14:22

Код:

FormStyle:=fsAlwaysOnTop;

и при создании формы:

Код:

SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_TRANSPARENT);

polzovatelpk · 18.03.2011, 17:47

Цитата:

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

Код:

FormStyle:=fsAlwaysOnTop;

и при создании формы:

Код:

SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_TRANSPARENT);

не работает...

Johnson · 19.03.2011, 17:36

Что не работает то? Вот Вам форма, прозрачная для кликов... АльфаБленд сами выставите сколько нужно... А несворачиваемость - по таймеру проверка, вдна ли, и если не видна - посылкой сообщения о разворачивании

стригун · 17.02.2017, 22:30

Цитата:

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

Что не работает то? Вот Вам форма, прозрачная для кликов... АльфаБленд сами выставите сколько нужно... А несворачиваемость - по таймеру проверка, вдна ли, и если не видна - посылкой сообщения о разворачивании

вот что получилось.

Filka · 18.02.2017, 06:17

Мой вариант из этой темы не устроил?
Если интересно, то есть ещё такая...

18.03.2011, 11:14	#1
polzovatelpk Регистрация: 15.12.2010 Сообщений: 4	Несворачиваемая, дырявая форма Нужно сделать форму, которая: 1) не сворачивалась кнопкой "свернуть все окна" или клавишами Win+D; 2) она была прозрачной и "дырявой", т.е. через неё можно было бы нажимать мышкой для работы с другими программами. P.S. Желательно конечно если привидете код программы.

18.03.2011, 12:43	#2
tsar_ Форумчанин Регистрация: 06.01.2011 Сообщений: 369	Тема интересная. А что должна делать такая программа? Программирую по необходимости

18.03.2011, 14:22	#4
Johnson кривокодер ;) Форумчанин Регистрация: 20.06.2008 Сообщений: 707	Код: `FormStyle:=fsAlwaysOnTop;` и при создании формы: Код: `SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_TRANSPARENT);` "А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее... {Быть или не быть} {Неуспешный суицид}

18.02.2017, 06:17	#8
Filka Форумчанин Регистрация: 29.10.2015 Сообщений: 273	Мой вариант из этой темы не устроил? Если интересно, то есть ещё такая... Последний раз редактировалось Filka; 18.02.2017 в 06:25.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
форма	Айгуля	Помощь студентам	3	13.06.2010 13:08
Форма	maksim_serg	Microsoft Office Excel	4	19.04.2010 15:13
Форма	StudentMarat	Microsoft Office Access	2	22.06.2009 09:32
Форма	subsonic	Общие вопросы Delphi	5	10.01.2008 11:18
форма...	Briz	Общие вопросы Delphi	8	22.10.2007 17:26