Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Убрать курсор, при запросах, раздражает 
:(
    Опции темы
RinOSpro
Дата 6.5.2008, 12:08 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
В общем есть корпоративная программа. Работает на мс сикьюэл, ДБЕ.

К ней приделал чат, и данные из базы обнавляются каждую сек. И курсор (песочные часы) раздражает очень... особенно каждую секунду моргает. Как сделать чтоб курсор не изменялся?

Добавлено через 47 секунд
может посоветуете как можно по другому сделать без ежесекундного запроса но главное чтоб интерактивность сохранялась.
  Вверх
ama_kid
Дата 6.5.2008, 12:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


АСУТП-кодер
***


Профиль
Группа: Комодератор
Сообщений: 1460
Регистрация: 5.3.2007
Где: Москва

Репутация: нет
Всего: 95
Цитата(RinOSpro @  6.5.2008,  12:08 Найти цитируемый пост)
может посоветуете как можно по другому сделать без ежесекундного запроса но главное чтоб интерактивность сохранялась.
Вынести обновление данных в отдельный поток?



--------------------
самурай без меча подобен самураю с мечом, но только без меча 
PM MAIL   Вверх
RinOSpro
Дата 6.5.2008, 12:49 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
Цитата
Вынести обновление данных в отдельный поток?


Избавит ли это от моргающего курсора... сомневаюсь...

А как это сделать?
  Вверх
ama_kid
Дата 6.5.2008, 12:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


АСУТП-кодер
***


Профиль
Группа: Комодератор
Сообщений: 1460
Регистрация: 5.3.2007
Где: Москва

Репутация: нет
Всего: 95
Цитата(RinOSpro @  6.5.2008,  12:49 Найти цитируемый пост)
Избавит ли это от моргающего курсора... сомневаюсь...
Курсор моргает, когда загружается основной поток приложения, от загрузки параллельного потока такого не будет (если не игнорировать Sleep и давать возможность переключаться приложению в основной поток, конечно).
Цитата(RinOSpro @  6.5.2008,  12:49 Найти цитируемый пост)
А как это сделать? 
Статья: Многопоточность. Как это делается в Дельфи.



--------------------
самурай без меча подобен самураю с мечом, но только без меча 
PM MAIL   Вверх
RinOSpro
Дата 6.5.2008, 13:32 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
ama_kid - а как засунуть TQuery в поток smile...
  Вверх
ama_kid
Дата 6.5.2008, 13:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


АСУТП-кодер
***


Профиль
Группа: Комодератор
Сообщений: 1460
Регистрация: 5.3.2007
Где: Москва

Репутация: нет
Всего: 95
а что смущает? точно также как и любой тип данных..


--------------------
самурай без меча подобен самураю с мечом, но только без меча 
PM MAIL   Вверх
RinOSpro
Дата 6.5.2008, 15:13 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
Пример дайте пожалуста! 
  Вверх
RinOSpro
Дата 6.5.2008, 16:50 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
Решил проблему вот так 

Код

   Screen.Cursors[crSQLWait] := Screen.Cursors[crDefault];


Добавлено через 38 секунд
только проблема в том что не всегда требуется crDefault
  Вверх
RinOSpro
Дата 6.5.2008, 18:18 (ссылка) | (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered
Вот одно небольшое решение нашел чтоб над едитами и мемо не моргало дефолтным курсором 

Код

private
    procedure CMMouseEnter(var AMsg: TMessage); message CM_MOUSEENTER;

....

procedure TfrmVoIP.CMMouseEnter(var AMsg: TMessage);
begin
  if (FindControl(WindowFromPoint(Mouse.CursorPos)) is TCustomEdit) then
    Screen.Cursors[crSQLWait] := Screen.Cursors[crIBeam] else
    Screen.Cursors[crSQLWait] := Screen.Cursors[crDefault];
end;


Но опять же там где к примеру курсор HandPoint то все равно моргает... Конечно это мелочь но хотелось бы чтоб все было нормально.

Как можно считать какой установлен курсор на компаненте и потом установить его как Screen.Cursors[crSQLWait] :=

Скажите плиз.
  Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0470 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.