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

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

Изменение курсора в процессе вставки... [D7]


Бульбаш ©   (2005-08-05 10:15:00) 

Использую ODAC. Процесс вставки записи (Insert на SmartQuery) идет довольно длительно (мертвый канал), при этом вид курсора остается по умолчанию и пользователь начинает попытки нажатия всего подряд. Как изменить курсор на SQLWait (В пределах всей формы) на время выполнения Insert-а? Пробовал в обработчике кнопки вставить давать Cursor:=crSQLWait - не работает. Подскажите плиз такую тонкость.
P.S. Ранее вместо Insert-а на DataSet выполнял запрос на вставку (ExecSQL) - там курсор менял форму сам...


msguns   (2005-08-05 11:28:00) [1]

Что за проблема ! Ну нарисуй панель высотой с четверть экрана, а буквы каким-нибудь 24-м шрифтом и красным цветом. Для слепых вруби музон,- что нибудь вроде деза. Когда "продвинутся", сделаешь нормальным.


Бульбаш   (2005-08-05 11:24:00) [2]

Статусная панель хороша для продвинутого пользователя, который знает куда смотреть (все вышеизложенное туда выводится) а в качестве защиты от дурака лучше часики.
А Screen.Cursor вроде бы работает, спасибо буду разбираться...


msguns   (2005-08-05 10:39:00) [3]

Вообще-то для пользователя внизу формы кладут статусную панельку, где отображают текстом то, что в данный момент времени приостекает в приложении. Туда же можно положить и состояние курсора ("Запись 125 из 600") и режим датасета ("Извлечение","Просмотр","Вставка","Редактирование","Фильтрация" и т.д.), и текст последней ошибки ("Конфликт ключей","Запись удалена другим пользователем","Блокировка таблицы"..).
Удобно для юзера и совсем не сложно для программиста ;))


Sergey13   (2005-08-05 10:33:00) [4]

Screen.Cursor := crHourGlass;


Наверх

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