|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
15.05.2010, 22:51 | #1 |
Регистрация: 14.05.2010
Сообщений: 7
|
курсор с компонентом
Как можно перемещать за курсором компонент (или просто текст), на котором отображается меняющаяся надпись (таймер)?
|
15.05.2010, 22:53 | #2 |
Участник клуба
Регистрация: 15.01.2010
Сообщений: 1,325
|
Язык какой?
Грибы - они разные. Один тебя накормит, другой тебе кино покажет...
Редактор журнала "[ПРОграммист]" Yan's Home Digital Lab |
15.05.2010, 22:57 | #3 |
Регистрация: 14.05.2010
Сообщений: 7
|
Delphi 7.0 Таймер отсчитывает секунды между кликами
Вот это не получается, потому что нужно просто отображать текст, а не рисовать квадратики по всему экрану: Scr := TCanvas.Create; Scr.Handle := GetDC(HWND_DESKTOP); ... cp:=mouse.CursorPos; Scr.TextOut(cp.X,cp.Y,'1111'); Последний раз редактировалось ASЯ; 15.05.2010 в 23:15. |
15.05.2010, 23:11 | #4 |
Участник клуба
Регистрация: 15.01.2010
Сообщений: 1,325
|
Поподробнее можно?
Если курсор перемещается только над формой, то достаточно легко. А если формы не должно быть видно, то сложнее. Вам как надо?
Грибы - они разные. Один тебя накормит, другой тебе кино покажет...
Редактор журнала "[ПРОграммист]" Yan's Home Digital Lab |
15.05.2010, 23:18 | #5 |
Регистрация: 14.05.2010
Сообщений: 7
|
форма прозрачная , видно только несколько Shape-ов. А это должно происходить по всему экрану
Конечно можно растянуть форму на весь экран, но очень не хочется, тем более, что желательно, чтобы это работало и при других запущеных приложениях. Сама проблема в том, чтобы перемещать компонент. Последний раз редактировалось ASЯ; 15.05.2010 в 23:33. |
15.05.2010, 23:26 | #6 |
Участник клуба
Регистрация: 15.01.2010
Сообщений: 1,325
|
Вот помню же, что недавно такая тема поднималась!
ASЯ, кросспостинг тут не поощряется. ...однако задание интересное... сейчас посмотрю, НО ничего не обещаю
Грибы - они разные. Один тебя накормит, другой тебе кино покажет...
Редактор журнала "[ПРОграммист]" Yan's Home Digital Lab Последний раз редактировалось ex.cluz; 15.05.2010 в 23:30. |
15.05.2010, 23:37 | #7 |
Регистрация: 14.05.2010
Сообщений: 7
|
Прошу прощения, если повторяюсь, но я ещё спрашивала про отлавливание клика по экрану, но про отображение таймера не объяснили..
|
15.05.2010, 23:39 | #8 |
Участник клуба
Регистрация: 15.01.2010
Сообщений: 1,325
|
Что значит "по экрану"? т.е. за пределами формы?
Грибы - они разные. Один тебя накормит, другой тебе кино покажет...
Редактор журнала "[ПРОграммист]" Yan's Home Digital Lab |
15.05.2010, 23:43 | #9 |
Регистрация: 14.05.2010
Сообщений: 7
|
Да. Для этого, наверно придётся ставить хук на событие мышки, но с этим проблемы уже почти нет. А за пределами формы Canvas надписи перерисовывается по таймеру постоянно, но не убирает предыдущее изображение. Очень некрасиво..
|
15.05.2010, 23:49 | #10 |
Участник клуба
Регистрация: 15.01.2010
Сообщений: 1,325
|
Я бы предложил прикрепить к курсору отдельную маленькую форму с BorderStyle:=bsNone и TLabel, в которой и отображать секунды.
Грибы - они разные. Один тебя накормит, другой тебе кино покажет...
Редактор журнала "[ПРОграммист]" Yan's Home Digital Lab |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
работа с компонентом | kuzmich | Компоненты Delphi | 0 | 07.07.2009 21:58 |
уберите курсор (в конце программы верните курсор), | HECTOR.A. | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 05.06.2009 20:10 |
Помогите с компонентом | Aндрей | Помощь студентам | 2 | 13.05.2009 15:30 |
Поделитесь компонентом | Михаил Юрьевич | Компоненты Delphi | 2 | 27.04.2008 10:52 |
помогите с компонентом ICQClient | xakkkkker | Компоненты Delphi | 1 | 25.12.2007 14:24 |