Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.07;
Скачать: CL | DM;

Вниз

Курсоры   Найти похожие ветки 

 
AGENT   (2005-07-21 12:40) [0]

Поменял я курсор в приложении на свой через screen, но когда наводишь его на полосу прокрутки scrollbox появляется стандартный курсор windows.  Тоже самое и при проигрывании видео mediaplayer На panel. Проблема решается с scrollbox если в винде поставить другой курсор. Как через delphi Поменять курсор относительно всего windows? Но mediaplayer все равно выводит стандартный указатель, не смотря на курсор в windows.


 
Lexer ©   (2005-07-21 12:52) [1]

Как вариант, пройтись по всем компонентам:
 Cursor := crMyCursor;
 for i := 0 to Pred(ComponentCount) do
   TControl(Components[i]).Cursor := crMyCursor;


 
AGENT   (2005-07-21 12:57) [2]

Когда я это набрал, посыпались тонны сообщений file not found, и программа останавливалась на строчках с открытием файлов, хотя я это повесил в formcreate


 
AGENT   (2005-07-21 12:58) [3]

А нельзя ли поменять относительно всего windows?


 
Digitman ©   (2005-07-21 13:10) [4]


> AGENT   (21.07.05 12:57) [2]


у тебя ошибка в 17-й строке


 
AGENT   (2005-07-21 14:38) [5]

Какая еще 17 строка?:/


 
Kolan ©   (2005-07-21 14:43) [6]


> AGENT   (21.07.05 14:38) [5]
> Какая еще 17 строка?:/


Вот и Digitman © о том же. Какая она у тебя - эта 17 строка покажи...


 
AGENT   (2005-07-21 14:46) [7]

откуда вы взяли 17 строку?
вот это Cursor := crMyCursor;
for i := 0 to Pred(ComponentCount) do
  TControl(Components[i]).Cursor := crMyCursor;

некорректно работает.


 
Lexer ©   (2005-07-21 14:51) [8]

> AGENT   (21.07.05 14:46) [7]
тебе ведь говорят что ошибка у тебя в 17 строке, кстати кажется и в 19...
посмотри их повнимательнее, или выложи их сюда...


 
Kolan ©   (2005-07-21 14:55) [9]

Кароче КОД ДАВАЙ. Про 17 строку это шукта юмора смешная.


 
AGENT   (2005-07-21 14:55) [10]

Откуда вы знаете в какой строке у меня ошибка? Если все работает нормально, но после добавления этих строк начинается какая-то лажа.:)


 
AGENT   (2005-07-21 14:58) [11]

А случайно TControl(Components[i]).Cursor := crMyCursor; не вызвовет у объекта событие onclick?


 
Kolan ©   (2005-07-21 14:59) [12]


> AGENT   (21.07.05 14:55) [10]

"Так Вакутагин" (с) солдаты. :)
1.
> Откуда вы знаете в какой строке у меня ошибка?

Не знаем потому и [4].
2.

> Если все работает нормально, но после добавления

Не добавляй раз все работает.
3.

> начинается какая-то лажа.:)

КАКАЯ мы что телепаты?


 
AGENT   (2005-07-21 15:00) [13]

Объясняю: при создании формы вызывается функция, которая должна вызыватся только при нажатии на label!!!


 
Lexer ©   (2005-07-21 15:02) [14]

> AGENT   (21.07.05 14:58) [11]
>А случайно TControl(Components[i]).Cursor := crMyCursor; не вызвовет у объекта событие onclick?


)))) это шутка такая?


 
alex-drob   (2005-07-21 15:02) [15]


> AGENT   (21.07.05 15:00) [13]

Объясняю: Тебя просят показать код процедуры.


 
AGENT   (2005-07-21 15:04) [16]

Короче нашел: TControl(Components[i]).Cursor := crMyCursor поменяла enabled таймера на true :)
Курсор изменился, но тоже самое осталось:/


 
Kolan ©   (2005-07-21 15:06) [17]


> AGENT   (21.07.05 15:04) [16]

А ты упорный наверно AGENT 007. (В cмысле код так и не дал :) РжуНимагу


 
AGENT   (2005-07-21 15:08) [18]

Да там листинг большой!1434 строчек. Суть не в этом. Ваш способ изменил курсор также как и screen.cursor, но проблема с combobox и mediaplayer остались


 
Lexer ©   (2005-07-21 15:10) [19]

Cursor - это свойство TControl, возможно на форме есть какие-то др. компоненты, попробуй так:
 for i := 0 to Pred(ComponentCount) do
   if Components[i] is TControl then
     TControl(Components[i]).Cursor := crMyCursor;


 
AGENT   (2005-07-21 15:10) [20]

P.s TControl(Components[i]).Cursor := crMyCursor РЕАЛЬНО меняет enabled таймера!!!!!


 
AGENT   (2005-07-21 15:12) [21]

Lexer, 0 эффекта.


 
AGENT   (2005-07-21 15:13) [22]

Даже если scrollbox указать курсор, то на полосе прокрутки будет все равно default windows


 
Digitman ©   (2005-07-21 15:21) [23]


> Да там листинг большой


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

ибо нахреновертил ты там, в своем пнриложении, черт-те что и сбоку бантик, с таймерами-плейерами и прочей лабудой, не понимая логики и секвенции происходящего


 
AGENT   (2005-07-21 15:24) [24]

Причем здесь мое приложение? Скажите, пожалуйста, как курсор поменять относительно windows.



Страницы: 1 вся ветка

Текущий архив: 2005.08.07;
Скачать: CL | DM;

Наверх




Память: 0.52 MB
Время: 0.051 c
14-1121622557
}|{yk
2005-07-17 21:49
2005.08.07
Поздравляю Подгорецкого!


3-1120132278
Vasek
2005-06-30 15:51
2005.08.07
Проблемма с security.fdb?


1-1121511757
Kreyl
2005-07-16 15:02
2005.08.07
Access Violation при использовании DATA MODULE


14-1121752401
SLP
2005-07-19 09:53
2005.08.07
Графический компонент для отображения направления и силы ветра


1-1121680679
Dimedrol
2005-07-18 13:57
2005.08.07
Layout control