|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
05.10.2008, 18:18 | #1 |
Пользователь
Регистрация: 31.08.2007
Сообщений: 37
|
перемещение текста по монитору
Как зделать чтобы сообщения перемещались рандомно по монитору?и как зделать чтобы сообщения выводились на прозрачном фоне,а не на белом..?
|
05.10.2008, 18:26 | #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 |
05.10.2008, 21:26 | #3 |
Тот ещё
Старожил
Регистрация: 14.11.2007
Сообщений: 2,242
|
А если сразу на канве монитора текст писать?
|
11.10.2008, 14:35 | #4 |
Пользователь
Регистрация: 31.08.2007
Сообщений: 37
|
спасибо за вариант)
|
11.10.2008, 16:20 | #5 |
Форумчанин
Регистрация: 06.09.2007
Сообщений: 239
|
<delete this>
Последний раз редактировалось Ring0Sn; 11.10.2008 в 16:34. Причина: ( |
12.10.2008, 17:59 | #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 |