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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 18.03.2011, 11:14   #1
polzovatelpk
 
Регистрация: 15.12.2010
Сообщений: 4
Восклицание Несворачиваемая, дырявая форма

Нужно сделать форму, которая:
1) не сворачивалась кнопкой "свернуть все окна" или клавишами Win+D;
2) она была прозрачной и "дырявой", т.е. через неё можно было бы нажимать мышкой для работы с другими программами.
P.S. Желательно конечно если привидете код программы.
polzovatelpk вне форума Ответить с цитированием
Старый 18.03.2011, 12:43   #2
tsar_
Форумчанин
 
Аватар для tsar_
 
Регистрация: 06.01.2011
Сообщений: 369
По умолчанию

Тема интересная. А что должна делать такая программа?
Программирую по необходимости
tsar_ вне форума Ответить с цитированием
Старый 18.03.2011, 13:55   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

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

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


NB. закрыть можно двойным щелчком в области линий звезды (или просто ESC)
Правой кнопкой - покажет простенький About
Вложения
Тип файла: zip Star.zip (6.3 Кб, 25 просмотров)
Serge_Bliznykov вне форума Ответить с цитированием
Старый 18.03.2011, 14:22   #4
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

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

Цитата:
Сообщение от Johnson Посмотреть сообщение
Код:
FormStyle:=fsAlwaysOnTop;
и при создании формы:
Код:
SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_TRANSPARENT);
не работает...
polzovatelpk вне форума Ответить с цитированием
Старый 19.03.2011, 17:36   #6
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

Что не работает то? Вот Вам форма, прозрачная для кликов... АльфаБленд сами выставите сколько нужно... А несворачиваемость - по таймеру проверка, вдна ли, и если не видна - посылкой сообщения о разворачивании
Вложения
Тип файла: rar Новая папка (2).rar (169.4 Кб, 24 просмотров)
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Старый 17.02.2017, 22:30   #7
стригун
 
Регистрация: 11.02.2017
Сообщений: 3
Радость Благодарю.

Цитата:
Сообщение от Johnson Посмотреть сообщение
Что не работает то? Вот Вам форма, прозрачная для кликов... АльфаБленд сами выставите сколько нужно... А несворачиваемость - по таймеру проверка, вдна ли, и если не видна - посылкой сообщения о разворачивании
вот что получилось.
Вложения
Тип файла: rar Ex1.rar (313.3 Кб, 7 просмотров)
стригун вне форума Ответить с цитированием
Старый 18.02.2017, 06:17   #8
Filka
Форумчанин
 
Регистрация: 29.10.2015
Сообщений: 273
По умолчанию

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

Последний раз редактировалось Filka; 18.02.2017 в 06:25.
Filka вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
форма Айгуля Помощь студентам 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