Модераторы: Snowy, Alexeis, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Пробема с CheckBox 
:(
    Опции темы
Labels
Дата 8.4.2012, 19:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 12
Регистрация: 6.4.2012

Репутация: нет
Всего: нет



Добрый вечер. Прошу помощи. У меня 2 формы в проекте ,помогите пожалуйсто сделать,  чтоб формы при нажатии на CheckBox становились прозрачными а при втором нажатии формы становились нормальными. Пробывал делать не получается. Вот мой так сказать пример.

Присоединённый файл ( Кол-во скачиваний: 3 )
Присоединённый файл  my.zip 200,63 Kb
PM MAIL   Вверх
Чучмек
Дата 8.4.2012, 19:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЭТ БИЛЭТ
**


Профиль
Группа: Участник
Сообщений: 841
Регистрация: 11.5.2008
Где: СССР

Репутация: 2
Всего: 41



Код

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
if  CheckBox1.Checked then
 begin
 form1.AlphaBlend:=true;
 form1.AlphaBlendValue:=100;
 form2.AlphaBlend:=true;
 form2.AlphaBlendValue:=100;
 end else
  begin
  form1.AlphaBlend:=false;
  form2.AlphaBlend:=false;
  end;
end;



--------------------
умную мысль держи при себе, а дурной - поделись с другими 
PM MAIL   Вверх
Labels
Дата 8.4.2012, 20:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 12
Регистрация: 6.4.2012

Репутация: нет
Всего: нет



Не работает. Если можно скинте в примере.
PM MAIL   Вверх
Чучмек
Дата 8.4.2012, 20:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЭТ БИЛЭТ
**


Профиль
Группа: Участник
Сообщений: 841
Регистрация: 11.5.2008
Где: СССР

Репутация: 2
Всего: 41



Цитата(Labels @  8.4.2012,  20:26 Найти цитируемый пост)
Не работает.

Я что именно не работает?


--------------------
умную мысль держи при себе, а дурной - поделись с другими 
PM MAIL   Вверх
Labels
Дата 8.4.2012, 20:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 12
Регистрация: 6.4.2012

Репутация: нет
Всего: нет



Не работает прозрачность, вкл. выключаю ничего не происходит.
PM MAIL   Вверх
Чучмек
Дата 8.4.2012, 20:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЭТ БИЛЭТ
**


Профиль
Группа: Участник
Сообщений: 841
Регистрация: 11.5.2008
Где: СССР

Репутация: 2
Всего: 41



Вот, у меня на Win7 прекрасно работает.

Присоединённый файл ( Кол-во скачиваний: 7 )
Присоединённый файл  Прозрачность.zip 196,36 Kb


--------------------
умную мысль держи при себе, а дурной - поделись с другими 
PM MAIL   Вверх
Labels
Дата 8.4.2012, 20:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 12
Регистрация: 6.4.2012

Репутация: нет
Всего: нет



Спасибо Тебе Большое . 
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

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

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • По вопросам разработки игр стоит заглянуть сюда

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »


 




[ Время генерации скрипта: 0.1600 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.