Скачать: CL | DM;

Всплывающие сообщения   Найти похожие ветки 

← →
Keks ©   (2006-04-24 12:37) [0]

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

---

← →
EvS ©   (2006-04-24 12:59) [1]

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

---

← →
Loginov Dmitry ©   (2006-04-24 13:15) [2]

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


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

---

← →
Keks ©   (2006-04-24 13:46) [3]

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

---

← →
Keks ©   (2006-04-24 13:55) [4]

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

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

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

---

← →
Anatoly Podgoretsky ©   (2006-04-24 13:56) [5]

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

---

← →
Anatoly Podgoretsky ©   (2006-04-24 13:57) [6]

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

---

← →
Keks ©   (2006-04-24 14:20) [7]

А как сделать чтобы текст был на полупрозрачном фон, а то сплошной фон получается:
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;
и что бы размеры прямоугольника были относительно формы

---

← →
Мефисто   (2006-04-24 15:59) [8]

Keks ©   (24.04.06 14:20) [7]

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

---

← →
Keks ©   (2006-04-24 17:35) [9]

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

---

← →
Мефисто   (2006-04-24 17:48) [10]

Keks ©   (24.04.06 17:35) [9]

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

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.026 c