Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/18: Рейтинг темы: голосов - 18, средняя оценка - 4.56
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232

Прозрачность формы без Title/

08.10.2013, 13:26. Показов 3318. Ответов 16
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте Ув. Программисты.
Собственно вопрос: Как сделать прозрачную форму но при этом чтоб Title был НЕ прозрачный?

Вот пример:

Пробовал разные трюки ничего не вышло. Пришла в голову идея унаследовать параметры от Form`ы Alpha Blend для Image, но не знаю как это реализовать.
Или если у кого то есть другие идеи буду рад их испробовать))))

Всем За ранее спасибо!
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.10.2013, 13:26
Ответы с готовыми решениями:

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

Прозрачность формы
Сделал прозрачную форму через свойства: Color: clWhite; TransparentColor: True; TransparentColorValue: clWhite; Проблема в...

прозрачность формы
привет всем. почему, когда выставляю transperentcolor:=true у form - edit, находящийся на ней становится невидимым? как должно быть: ...

16
18 / 17 / 0
Регистрация: 27.11.2012
Сообщений: 353
09.10.2013, 07:58
Да, было бы интересно, как это реализовать.

PS: в FireMonkey случаем не пробовал такое сделать?
0
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
09.10.2013, 08:09  [ТС]
Цитата Сообщение от xVahax Посмотреть сообщение
...
Нет не пробовал, но уже пытаюсь. Была ещё такая идея две формы одна титл вторая прозрачная форма без титла преклеить к друг другу но это совсем не то(((.
0
18 / 17 / 0
Регистрация: 27.11.2012
Сообщений: 353
09.10.2013, 08:26
Цитата Сообщение от cezer_ak Посмотреть сообщение
Нет не пробовал, но уже пытаюсь. Была ещё такая идея две формы одна титл вторая прозрачная форма без титла преклеить к друг другу но это совсем не то(((.
Согласен, форма на форме - это разврат)))

PS: в FireMonkey исполняемый файл будет в разы больше по объему
0
1 / 1 / 2
Регистрация: 22.08.2013
Сообщений: 23
09.10.2013, 08:43
попробуй через компонент alphacontrols. Должно получитbcя
0
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
09.10.2013, 08:46  [ТС]
Цитата Сообщение от Bovan Посмотреть сообщение
попробуй через компонент alphacontrols. Должно получитbcя
Вчера весь день пытался. с Alpha Контролом работаю давно, но у меня так и не вышло. И свои скины пробовал и чужие, прозрачным удаётся сделать только всю форму вместе с титлом.
0
18 / 17 / 0
Регистрация: 27.11.2012
Сообщений: 353
09.10.2013, 08:59
Цитата Сообщение от cezer_ak Посмотреть сообщение
Вчера весь день пытался. с Alpha Контролом работаю давно, но у меня так и не вышло. И свои скины пробовал и чужие, прозрачным удаётся сделать только всю форму вместе с титлом.
Я когда то тоже пытался, потом забил.
А если не секрет, тебя для чего? Просто для красоты?
0
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
09.10.2013, 09:11  [ТС]
Цитата Сообщение от xVahax Посмотреть сообщение
Я когда то тоже пытался...
Нет не только для красоты. У меня на титле будут важные кнопки и всякие иконки которые должны быть хорошо видны, а область формы нужна прозрачная. Через Alpha Control на титл можно вывести кнопки и прочие фишки.
0
18 / 17 / 0
Регистрация: 27.11.2012
Сообщений: 353
09.10.2013, 09:12
Цитата Сообщение от cezer_ak Посмотреть сообщение
Нет не только для красоты. У меня на титле будут важные кнопки и всякие иконки которые должны быть хорошо видны, а область формы нужна прозрачная. Через Alpha Control на титл можно вывести кнопки и прочие фишки.
Ясн, ну я в свободное время попробую данное реализовать, в личку скину если что получится
0
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
09.10.2013, 09:14  [ТС]
Цитата Сообщение от xVahax Посмотреть сообщение
Ясн, ну я в свободное время попробую данное реализовать, в личку скину если что получится
Ок благодарю. От себя так же буду продолжать реализовывать идею если получиться выложу исходники в этой ветке.
0
18 / 17 / 0
Регистрация: 27.11.2012
Сообщений: 353
09.10.2013, 09:25
Цитата Сообщение от cezer_ak Посмотреть сообщение
Ок благодарю. От себя так же буду продолжать реализовывать идею если получиться выложу исходники в этой ветке.
А если от этого оттолкнуться?

Delphi
1
2
3
4
5
6
procedure TForm1.FormShow(Sender: TObject);
begin
 Form1.Color:= clGreen;
 Form1.TransparentColor:= True;
 Form1.TransparentColorValue:= clgreen;
end;
Суть в том что ставится какой нидь не используемый далее цвет форме и делается прозрачным,
вопрос в том как додумать чтобы он не полностью прозрачным был...
0
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
09.10.2013, 09:32  [ТС]
Цитата Сообщение от xVahax Посмотреть сообщение
...
Да я так и сделал сейчас ищу компонент который имеет свойство АлфаБленд

Добавлено через 4 минуты
Кто нибудь знает как унаследовать параметры Алфабленд от формы???
0
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
09.10.2013, 14:12  [ТС]
У меня все таки получилось)))!!! Через FireMonkey!
Вот что получилось:

а вот исходники всего проекта:
huddemo.rar

Терпенье и труд все перетрут))))
2
18 / 17 / 0
Регистрация: 27.11.2012
Сообщений: 353
09.10.2013, 22:26
Дружище, я верил в тебя!!! Спасибо за исходник.
1
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
10.10.2013, 08:51  [ТС]
Цитата Сообщение от xVahax Посмотреть сообщение
...
Спасибо)) Есть недороботки когда активность с этого окна пропадает у него титл становиться немного прозрачным и теряет градиент. Сейчас буду разбираться в чем дело... Если у тебя так же. Напиши ок.
0
18 / 17 / 0
Регистрация: 27.11.2012
Сообщений: 353
10.10.2013, 17:29
Цитата Сообщение от cezer_ak Посмотреть сообщение
Спасибо)) Есть недороботки когда активность с этого окна пропадает у него титл становиться немного прозрачным и теряет градиент. Сейчас буду разбираться в чем дело... Если у тебя так же. Напиши ок.
У меня твой проект не компилится(

[dcc32 Fatal Error] huddemofrm.pas(19): F1026 File not found: 'FMX.StdCtrls.dcu'

на этот модуль ругается FMX.StdCtrls, у меня Delphi XE3, может у тебя доп компоненты какие стоят?
0
5 / 5 / 3
Регистрация: 14.02.2013
Сообщений: 232
11.10.2013, 11:27  [ТС]
Цитата Сообщение от xVahax Посмотреть сообщение
У меня твой проект не компилится(

[dcc32 Fatal Error] huddemofrm.pas(19): F1026 File not found: 'FMX.StdCtrls.dcu'

на этот модуль ругается FMX.StdCtrls, у меня Delphi XE3, может у тебя доп компоненты какие стоят?
забыл сказать у меня Delphi rad xe5
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
11.10.2013, 11:27
Помогаю со студенческими работами здесь

Прозрачность формы
Есть форма,на ней 1 картинка,как сделать форму невидимой,а картинку оставить? Если можно поконкретнее,transparent color не лучший...

Прозрачность дочерней формы
Всем привет. Ситуация следующая: есть 2 формы: Form1 с кнопкой и пустая Form2 procedure TForm1.Button1Click(Sender: TObject); ...

Прозрачность формы и тд...
Можно сделать так чтобы только форма была прозрачной, а компоненты которые были на ней расположены оставались видны!? вот так делал,...

TextOut , SetWindowRgn и прозрачность формы
Хочу создать прозрачную форму с непрозрачной надписью на ней, но почему-то становится прозрачным сам текст, а не форма вокруг него. Тот же...

Как стартовать форму без Title?
Не могу разобраться как стартовать форум без titl. Дельфийский код не работает!procedure TForm1.CreateParams(var Params: TCreateParams); ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
17
Ответ Создать тему
Новые блоги и статьи
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Access
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru