Текущий архив: 2006.05.14;
Скачать: 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 вся ветка
Текущий архив: 2006.05.14;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.031 c
