Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

игающая кнопка в таскбаре

Здравствуйте!
Как заставить мигать кнопку моего приложения в таскбаре?

Ответить   Mon, 22 Mar 2004 20:16:32 +0200 (#109736)

 

Ответы:

Прив!

var Flash:bool;
procedure TForm1.Timer1Timer(Sender:TObject);
begin
FlashWindow(Form1.handle, Flash);
FlashWindow(Application.Handle, Flash);
Flash:= not Flash;
end;

procedure TForm1.FormCreate(Sender:TObject);
begin
Flash:=false;
end;

Delphi - Советы программистов. Изд Симбо С-Питербург 2003 г.

С уважением monah
e-mail : janal***@n*****.ru
сайт : http:\\janalex.narod.ru
--
Номер выпуска : 2670
Возраст листа : 183 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/109797
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

Ответить   Tue, 23 Mar 2004 13:37:46 +0600 (#109797)

 

Здравствуйте monah,

Tuesday, March 23, 2004, 9:37:46 AM, вы писали:

Спасибо, помогло!

Ответить   Tue, 23 Mar 2004 13:44:36 +0200 (#109970)