Исходники Delphi: Звездопад.

Опубиковано: 11.08.2008 г., автор: , просмотров: 34639

Примеры Delphi работаем с пикселами.

Пример программы выполненой на delphi. В примере мы работаем с пикселами, а именно на форме рисуються падающие звезды. Интерестная реализация советую посмотреть этот исходничек.

Delphi исходники

Исходник компилировался: на 6,7 версиях delphi.

P.S. Не забываем подписываться на бесплатную мультимедийную рассылку.
Форма для подписки расположена с права и с лева.

До встречи DelphiExpert.ru !!!

Скачать компонент Скачать исходник Звездопад.

Похожие материалы

Последние из рубрики

Платим за лайки! - Оплата сдельная! 26 Aug 2017 в 11:46 #
Наш сервис предоставляет настоящие лайки на фотографии заказчиков, которые готовы платить за качество.

Именно для этого мы и набираем удалённых сотрудников, которые будут выполнять работу, то есть ставить лайки и получить за это деньги.

Чтобы стать нашим удалённым сотрудником и начать ставить лайки, зарабатывая при этом 45 рублей за 1 поставленный лайк,

достаточно просто зарегистрироваться на нашем сервисе. > oplata-vklike.tk <

Вывод заработанных средств ежедневно в течении нескольких минут.
Никто 06 Aug 2011 в 00:00 #
пиксельпад
Роман 12 Jul 2010 в 00:00 #
Поставьте alphablend := false;
А transparentcolor := true;
Затем borderstyle := bsNone;
И добавьте в on_Create у формы(главной) строку
ShowWindow(handle,sw_maximize);
Затем удалите главное меню.
Вуаля - снег на вашем рабочем столе!
Можно ещё у toolbar поставить свойство
align := alCustom;
Anchors := [akRight,akBottom];
Затем сузить toolBar и придвинуть к правому краю вплотную, а от нижнего с отступом примерно в толщину панели задач(где пуск и время сидят).
Полный шик!
3240 22 May 2009 в 00:00 #
Хорошая вещь, применю её в своей заставке к программе
> eve_10 15 Apr 2009 в 00:00 #
Этот исходник учит не рисовать звезды, а учит работать с канвой вообще!

ОтменитьДобавить комментарий