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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 30.11.2014, 14:17   #1
Illusiony
Форумчанин
 
Регистрация: 17.02.2014
Сообщений: 881
По умолчанию Как сделать прозрачный фон для Label?

Вывожу рисунки функцией Draw на форму из ImageList после нажатия на кнопку.
после изменения текста в лабел прямоугольник фона этого элемента закрывает рисунок.
Свойство Transparent у Label никак не влияет.
Как выйти из положения?
Illusiony вне форума Ответить с цитированием
Старый 30.11.2014, 14:32   #2
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

Проверил, поверх TImage с рисунком фон TLabel прозрачен в Delphi 2007.

А что мешает выводить текст с помощью TextOut на канву формы после отрисовки?

Последний раз редактировалось Arigato; 30.11.2014 в 14:35.
Arigato вне форума Ответить с цитированием
Старый 30.11.2014, 14:44   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Цитата:
после нажатия на кнопку
В OnPaint формы это делать нужно или подложку в виде Image
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 30.11.2014, 14:47   #4
Illusiony
Форумчанин
 
Регистрация: 17.02.2014
Сообщений: 881
По умолчанию

TextOut, попробую, я просто далеко не профессионал
Я сначала создаю лабел, потом кнопкой запукаю отрисовки рисунка, ла,ел при этом полностью закрываетcя. Далее через кнопку изменяю текс лабела и вокруг этого текста прямоугольник фона. Как и писал ранее Transparent у Label не вkияет.(Delphi 7)
Illusiony вне форума Ответить с цитированием
Старый 30.11.2014, 14:48   #5
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

Кстати, если onPaint не обрабатывать, то картинку на форме можно стереть, если форму за пределы экрана переместить или же другим окном перекрыть.
Arigato вне форума Ответить с цитированием
Старый 30.11.2014, 14:49   #6
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Цитата:
Transparent у Label не вkияет.(Delphi 7)
Влияет, см. #3
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 30.11.2014, 14:52   #7
Illusiony
Форумчанин
 
Регистрация: 17.02.2014
Сообщений: 881
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
В OnPaint формы это делать нужно или подложку в виде Image
Но рисунке в процессе работы будут меняться и надписи тоже.

Цитата:
Сообщение от Аватар Посмотреть сообщение
Влияет, см. #3
НУ я что врать зачем то буду?
Значит либо что то не так сделал, не понимаю что, либо в моей среде почему то это не работает ( насчет Transparent у Label)

Последний раз редактировалось Stilet; 30.11.2014 в 18:08.
Illusiony вне форума Ответить с цитированием
Старый 30.11.2014, 15:00   #8
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

На канвас формы нужно все в OnPaint повторять. Чтобы этого избежать Image и лэйблы после него должны быть созданы
Цитата:
НУ я что врать зачем то буду?
Кто говорит что врете? Не правильно делаете
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 30.11.2014, 15:01   #9
Illusiony
Форумчанин
 
Регистрация: 17.02.2014
Сообщений: 881
По умолчанию

Спасибо, TextOut вроде получается.

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

Последний раз редактировалось Stilet; 30.11.2014 в 18:10.
Illusiony вне форума Ответить с цитированием
Старый 30.11.2014, 15:04   #10
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Цитата:
TextOut вроде получается.
Подвигайте форму влево-вправо или другую поверх откройте и закройте
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
прозрачный фон для Image Randy.Mandy Компоненты Delphi 1 21.02.2012 00:49
Прозрачный фон xakkkkker Мультимедиа в Delphi 10 24.12.2008 09:44
Вопрос по label. Как сделать так чтобы label была прозрачной. Lonix Компоненты Delphi 2 01.04.2007 06:23
Прозрачный фон Label Alar Компоненты Delphi 0 30.10.2006 00:38