Screen Mate

← →
Kerk © (2005-07-15 18:34) [0]

Все наверно видели програмки вроде бегающего по рабочему столу апельсина (помаранчевого). Когда-то пытался писать нечто подобное, ничего толком не вышло, но тема эта мне до сих пор интересна.

Хотелось бы в этой ветке окончательно решить как такие штуки ПРАВИЛЬНО делать. :)
Вот чего я писал на эту тему:

http://kladovka.net.ru/index.cgi?pid=list&rid=201
Тут класс TScreenMate. Рисует картинку с маской на десктоп с помощью BitBlt. Все бы хорошо, но мелькает временами. Писалось еще в школьные годы, прошу не пинать, а покритиковать по существу. :)

http://kladovka.net.ru/index.cgi?pid=list&rid=78
Это писал к прошлому новому году. Каждая снежинка - отдельное окно, которому я сделал SetWindowRgn для принятия формы снежинки, а потом SetWindowPos по таймеру. Выглядит отлично, но заметно грузит процессор.

В общем, и там и там недостатки, которых в "бегающем апельсине" нет.
У кого какие соображения? :)

← →
Магнитон Борыч (2005-07-15 19:51) [1]

Что за апельсин?
Я видел заставки, но те просто копировали экран и каверкали его.

← →
Kerk © (2005-07-15 19:59) [2]

Хм.. к сожалению ничего под рукой для примера нету.
Там апельсин бегает по экрану и всякой фигней страдает. Ну их много разных я видел.. собака.. заяц какое-то.. и т.д.. скачай первую ссылку.. там немножко.. поймешь примерно о чем я.

← →
Магнитон Борыч (2005-07-15 21:19) [3]

http://o-delphi.narod.ru/down/komp/Assistant.zip

← →
programania © (2005-07-15 23:25) [4]

А вот тоже вспомнил
http://programania.com/girl.zip 171 kb
Правда там нет кролика и классов
а ходит персонаж из posera и есть еще другие.

По моему главная трудность в зазубренных
краях персонажа: надо быстро делать растушевку с фоном
и наверно тут нужна маска позрачности краев.

Другая проблема в хранении кадров
лучще в jpg, но возникает каемка
надо ее как-то подчищать.

Как лучше решить эти проблемы?

← →
Kerk © (2005-07-16 00:15) [5]

programania © (15.07.05 23:25) [4]

Не компилится. Где взять недостающие файлы?

gifunit.pas ?

← →
programania © (2005-07-16 01:07) [6]

>Kerk © (16.07.05 00:15) [5]
>Не компилится. Где взять недостающие файлы?

Скачал girl.zip 171716 байт
GIFUNIT.PAS в нем есть смотрю WCMD 4.51
всего 5 файлов pas, GIRL.DPR GIRL1.DFM I0.GIF всего 245kb
их нужно распаковать все в одну папку
girl.dpr компилируется и работает в Delphi5
а у тебя что в архиве?

← →
Sapersky (2005-07-16 03:42) [7]

http://smallgoblin.narod.ru/smtutor/transparent.htm

programania © (16.07.05 1:07) [6]

Сорри. Файл на месте. Вчера ночью глюкнул я. :)
Файл на месте, но он не компилится.
На строчке:
DrawingTransparent := True;
говорит: Left side cannot be assigned to

Delphi7,Delphi2005

Заменил
const DrawingTransparent: Boolean = False;на
var DrawingTransparent: Boolean = False;
Откомпилилось.
Прикольно. :)

Screen Mate Найти похожие ветки