Изменение курсора мыши

← →
Jimmy (2012-09-23 15:38) [0]

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

← →
sniknik © (2012-09-23 16:15) [1]

например
procedure TForm1.FormCreate(Sender: TObject); begin SpinEdit1.Button.Cursor:= crCross; end;
но лучше похоже заменить дефаултный... раз тебе так много с него нужно поменять.

← →
Jimmy (2012-09-23 16:37) [2]

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

← →
sniknik © (2012-09-23 18:39) [3]

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

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

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

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

← →
Jimmy (2012-09-23 18:58) [5]

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

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

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

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

← →
QAZ2 (2012-09-23 21:32) [7]

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

Изменение курсора мыши Найти похожие ветки