Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.04.2016, 10:44   #1
BLACK_RAIN
Форумчанин
 
Регистрация: 13.02.2012
Сообщений: 867
По умолчанию Не меняется курсор панели

Код:
procedure TForm1.PanelMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
    Panel1.Cursor := crDrag;
end;
Код:
procedure TForm1.PanelMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
    Panel1.Cursor := crDefault;
end;
Почему курсор в OnMouseDown не меняется? Обработчики назначены и срабатывают.
BLACK_RAIN вне форума Ответить с цитированием
Старый 10.04.2016, 11:44   #2
kropotkina-alice
Форумчанин
 
Аватар для kropotkina-alice
 
Регистрация: 27.10.2014
Сообщений: 594
По умолчанию

Screen.Cursor:=crDrag;
и
Screen.Cursor:=crDefault;
kropotkina-alice вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не меняется шрифт Гошик Microsoft Office Word 4 07.01.2020 17:58
Не меняется шрифт Хохол WPF, UWP, WinRT, XAML 2 17.03.2011 23:02
На Win7 не меняется курсор. Почему? Genco Общие вопросы Delphi 4 27.02.2011 03:20
Не меняется useragent Кинельски Работа с сетью в Delphi 0 16.02.2011 23:08
уберите курсор (в конце программы верните курсор), HECTOR.A. Паскаль, Turbo Pascal, PascalABC.NET 2 05.06.2009 20:10