Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Всплывающие сообщения


Keks ©   (2006-04-24 12:37:00) 

Добрый день! Подскажите пожалуйста как реализовать всплывающие сообщения появляющие по таймеру. Хотелось чтобы сообщения появлялись на полупрозрачном фоне.


Мефисто   (2006-04-24 17:48:00) [1]

Keks ©   (24.04.06 17:35) [9]

Полупрозрачность, как я понимаю - это возможность делать прозрачные окна как в 2000/XP?

Создать наследника от THintWindow - создаешь свой класс, с необходимой функциональностью. Можешь к примеру поискать статьи типа: "нестандартный hint", "hint овальной формы" и т.п.

для реализации прозрачности окна исследуешь исходники VCL. В данном случае исходник формы. TForm -> TCustomForm и смотришь, как там реализована работа AlphaBlend.


Keks   (2006-04-24 17:35:00) [2]

Что-то непонятно


Мефисто   (2006-04-24 15:59:00) [3]

Keks ©   (24.04.06 14:20) [7]

Создать наследника от THintWindow, а также посмотреть реализацию AlphaBlend в TCustomForm


Keks   (2006-04-24 14:20:00) [4]

А как сделать чтобы текст был на полупрозрачном фон, а то сплошной фон получается:
procedure TForm1.Button1Click(Sender: TObject);
var hh: THintWindow;
   rr:TRect;
begin
rr.Left:=200;
rr.Top:=20;
rr.Right:=240;
rr.Bottom:=40;
hh:=THintWindow.Create(self);
hh.Color:=Clred;
hh.ActivateHint(rr,'asdasdasd');
end;

и что бы размеры прямоугольника были относительно формы


Anatoly Podgoretsky   (2006-04-24 13:57:00) [5]

Имелся ввиду метод THintWindow, а не TApplication


Anatoly Podgoretsky   (2006-04-24 13:56:00) [6]

Второй, более удобный метод ActivateHint


Keks   (2006-04-24 13:55:00) [7]

>EvS ©   (24.04.06 12:59) [1]

>Ну и в чем проблема?
>Выводи в обработчике события таймера.

Да не в таймере дело мне надо именно про сообщения всплывающие, как сделать чтобы они появлялись на полупрозрачном фоне


Keks   (2006-04-24 13:46:00) [8]

А как использовать этот  Application.ActivateHint(), так просто что-то не появляеться


Loginov Dmitry   (2006-04-24 13:15:00) [9]


> как реализовать всплывающие сообщения


В смысле подсказки?
Тогда может пригодиться Application.ActivateHint().


EvS   (2006-04-24 12:59:00) [10]

Ну и в чем проблема?
Выводи в обработчике события таймера.


Наверх

Титульная страница Поиск, карта сайта Написать письмо