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

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

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


mouse_web ©   (2004-08-19 10:54:00) 

При обращении к базе данных у меня курсор меняется с обычной стрелочки на плоские песочные часы с надписью sql.
Как заменить курсор на стандартные песочные часы?


mouse_web   (2004-08-21 20:42:00) [1]

я ставил изменение курсора и на открытие RxQuery.Open
и на событие RxQuery.BeforeOpen
не меняется курсор :(


Соловьев   (2004-08-19 12:45:00) [2]


> поставил я [9]

опять в том же событии?


mouse_web   (2004-08-19 12:38:00) [3]

поставил я [9]
не работает...


Соловьев   (2004-08-19 12:22:00) [4]


> Нет, он не врет. Недавно был такой же вопрос на форуме,
> ничто другое не помогало

вроде вспомнил....да..ну тогда твой вариант+мой для установки курсора:)

> crDefault тоже не совсем верно, правильнее сохранять старое
> значение и его восстанавливать.

да. и + это тоже. :)


Sandman25   (2004-08-19 12:18:00) [5]

[9] Соловьев ©   (19.08.04 12:13)

Нет, он не врет. Недавно был такой же вопрос на форуме, ничто другое не помогало


Anatoly Podgoretsky   (2004-08-19 12:18:00) [6]

crDefault тоже не совсем верно, правильнее сохранять старое значение и его восстанавливать.


Соловьев   (2004-08-19 12:13:00) [7]

Так...Т.е. к Ацесу лезим через БДЕ? Ужас. Бери ADO.
Но даже если БДЕ, то
> [5] Sandman25 ©   (19.08.04 11:12)

уже сказал, а я бы добавил такую еще версию:

OnClick:

Screen.Cursor := crHourGlass;
try
RxQuery1.Open;
finally
Screen.Cursor := crDefault;
end;


mouse_web   (2004-08-19 12:09:00) [8]

Ставлю
Screen.Cursor := crHourGlass;
на событие
RxQuery1BeforeOpen
и не пашет


Соловьев   (2004-08-19 12:06:00) [9]


> Очень странно но не работает :(

врешь. у меня работает.


mouse_web   (2004-08-19 12:03:00) [10]

Очень странно но не работает :(
ни один из вариантов [1] [4]


Sandman25   (2004-08-19 11:12:00) [11]

Session.SQLHourGlass := false
или что-то подобное


Соловьев   (2004-08-19 11:07:00) [12]


> При обращении к базе данных


Iconka   (2004-08-19 11:07:00) [13]

Может перед Query.Open?


mouse_web   (2004-08-19 11:05:00) [14]

А на какое событие нужно ставить?


Соловьев   (2004-08-19 11:01:00) [15]

Screen.Cursor := crHourGlass;


Наверх

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