![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 31.08.2007
Сообщений: 37
|
![]()
Как зделать чтобы сообщения перемещались рандомно по монитору?и как зделать чтобы сообщения выводились на прозрачном фоне,а не на белом..?
|
![]() |
![]() |
![]() |
#2 |
Android Developer
Старожил Подтвердите свой е-майл
Регистрация: 19.02.2007
Сообщений: 3,708
|
![]()
пишу сразу сдесь так что за правильно написания не отвичаю, но найти в сети не составить труда
1. SetWindowLong, EX_STYLE, EX_LAYERED 2. Создаем ( ну для легкости ) TBitmap с PixelFormat = pf32bit. 3. GDI+ ( GDIPAPI.pas ) юзаем контекст для получения из HDC ( TBitmap.Canvas.Handle ) и рисуем текст как угодно 5. Заливаем полученный контекст цветом ARGB = 0, 0, 0, 0 - черный прозрачный полностью 4. Нарисовали что надо и освободили контекст 5. Полученный у TBitmap.Canvas.Handle пихаем для обновления окна UpdateWindowLayer. 6. Все окно прозрачно с текстом, теперь у окна SetBounds и вперед по таймеру юзая Random |
![]() |
![]() |
![]() |
#3 |
Тот ещё
Старожил
Регистрация: 14.11.2007
Сообщений: 2,242
|
![]()
А если сразу на канве монитора текст писать?
|
![]() |
![]() |
![]() |
#4 |
Пользователь
Регистрация: 31.08.2007
Сообщений: 37
|
![]()
спасибо за вариант)
|
![]() |
![]() |
![]() |
#5 |
Форумчанин
Регистрация: 06.09.2007
Сообщений: 239
|
![]()
<delete this>
Последний раз редактировалось Ring0Sn; 11.10.2008 в 16:34. Причина: ( |
![]() |
![]() |
![]() |
#6 |
Пользователь
Регистрация: 04.11.2007
Сообщений: 64
|
![]()
на скорую руку...
как понял, именно такого рода прога нужна была? |
![]() |
![]() |
![]() |
Опции темы | Поиск в этой теме |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
перемещение формы | Черничный | Общие вопросы Delphi | 11 | 10.12.2009 11:06 |
Перемещение данных | Мария100684 | Microsoft Office Access | 6 | 26.09.2008 03:45 |
Перемещение кнопки? | &RiU | Общие вопросы Delphi | 1 | 28.05.2008 18:13 |
Перемещение компонентов | _SERGEYX_ | Общие вопросы Delphi | 2 | 10.04.2008 13:33 |
Перемещение файлов | Nasya | Microsoft Office Excel | 2 | 13.10.2007 20:37 |