Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Изменение курсора мыши [D7, XP]


Jimmy ©   (2012-09-23 15:38:00) 

Когда мышь находится скажем над Edit'ом, изменить курсор можно так: Edit1.Cursor:=crHandPoint. А как можно изменить курсор, когда мышь находится над:
1. Ободками Edit, SpinEdit, ListBox, StringGrid?
2. Над PopupMenu?
3. Над формой, закрытой модальным окном?
Заранее спасибо!


QAZ2   (2012-09-23 21:32:00) [1]

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


sniknik   (2012-09-23 19:20:00) [2]

> В том и суть вопроса
и почему ее нет в вопросе?

> это есть и в моем вопросе.
у тебя курсор у объекта, а вопрос о курсоре над составной частью... разница однако. и откуда понять "искал и не нашел"?

p.s. если хочешь ответов, спрашивай именно то чего хочешь и для чего, иначе ответ будет не о том.
ну или на форум к телепатам.


Jimmy   (2012-09-23 18:58:00) [3]

>sniknik
В том и суть вопроса, что я не могу найти у Edita и пр. ободки, не могу найти свойство Cursor у PopupMenu и т.д. А что касается "например" - это есть и в моем вопросе.


Hole   (2012-09-23 18:45:00) [4]

http://msdn.microsoft.com/en-us/library/windows/desktop/ms645618%28v=vs.85%29.aspx


sniknik   (2012-09-23 18:39:00) [5]

повторение конечно мать учения, но ты вроде не учитель... думаешь в первый раз не поняли?

показанное ПРИМЕР, слово "например" в начале какбе ясно на это намекает.
найдешь у Edit-а и т.д. "ободки", действуй так же.


Jimmy   (2012-09-23 16:37:00) [6]

SpinEdit1.Button.Cursor:= crCross; - меняет курсор над кнопками SpinEdit. А мне хотелось бы узнать что надо поставить на место "Button", чтоб менялся курсор над:
1. Ободками Edit, SpinEdit, ListBox, StringGrid?
2. Над PopupMenu?
3. Над формой, закрытой модальным окном?


sniknik   (2012-09-23 16:15:00) [7]

например
procedure TForm1.FormCreate(Sender: TObject);
begin
 SpinEdit1.Button.Cursor:= crCross;
end;

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо