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

Программирование от Судьи [www.del5.da.ru] Выпуск от 27/05/2002 года


Информационный Канал Subscribe.Ru


- От Судьи -

 

- Основное месторасположение [http://del5.da.ru]

- Зеркало сайта [http://del50.by.ru]

- Mailto: [wadim274@permonline.ru]

 

Доброго времени суток, господа коллеги!

*****************************************

 

================================================================================

Сделать мигающим заголовок окна и кнопку на панели TaskBar

 

var
Flash: boolean;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
// Мигание заголовка окна
FlashWindow(Form1.Handle, Flash);
// Мигание заголовка на панели задач
FlashWindow(Application.Handle, Flash);
Flash := not Flash;

end;

================================================================================

 

Новости нашего сайта:

В данный момент новостей нет...

Ссылки на дружественные сайты:

В данный момент нет никаких ссылок:

На последок:

- Анекдот

Сын подходит к папе:
- Папа, а как я получился?
- Когда твоя мама была козочкой, а твой папа козликом, мы скакали,
скакали и доскакались...
Сын идет к маме:
- Мама, папа сказал, что когда ты была козочкой, а он козликом, вы
скакакли, скакали и получился я?
- Нет, сынок, все было не так. Вот когда я была ласточкой, а дядя
Федя орлом, мы летали, летали и долетались. А твой папа, как был козлом
так и остался!


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное