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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.06.2007, 18:08   #1
Teen4jump
Пользователь
 
Аватар для Teen4jump
 
Регистрация: 19.06.2007
Сообщений: 88
По умолчанию Как сделать курсор невидимым???

Как сделать, что бы курсор присутствовал, но его не было видно? Помогите!!!
Teen4jump вне форума Ответить с цитированием
Старый 22.06.2007, 18:21   #2
Alar
Александр
Администратор
 
Аватар для Alar
 
Регистрация: 28.10.2006
Сообщений: 17,501
По умолчанию

курсор можно сделать любым, думаю, можно сделать и невидимым
Alar вне форума Ответить с цитированием
Старый 22.06.2007, 20:21   #3
rpy3uH
добрый няша
Старожил
 
Аватар для rpy3uH
 
Регистрация: 29.10.2006
Сообщений: 4,804
По умолчанию

Screen.Cursor:=crNone
но действует только на твоей форме
rpy3uH вне форума Ответить с цитированием
Старый 23.06.2007, 02:59   #4
Teen4jump
Пользователь
 
Аватар для Teen4jump
 
Регистрация: 19.06.2007
Сообщений: 88
По умолчанию

Ещё вопрос:
Как ограничить движение курсора по форме???
Teen4jump вне форума Ответить с цитированием
Старый 23.06.2007, 03:22   #5
Carbon
JAVA BEAN
Участник клуба
 
Аватар для Carbon
 
Регистрация: 22.04.2007
Сообщений: 1,329
По умолчанию

Цитата:
Как сделать, что бы курсор присутствовал, но его не было видно?
ShowCursor(false);

Цитата:
Как ограничить движение курсора по форме???
Код:
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var p:TPoint;
begin
  GetCursorPos(p);
  if p.X<Left+20 then SetCursorPos(Left+20,p.Y)
  else
    if p.X>Left+Width-20 then SetCursorPos(Left+Width-20,p.Y);
  if p.Y<Top+40 then SetCursorPos(p.X,Top+40)
  else
    if p.Y>Top+Height-20 then SetCursorPos(p.X,Top+Height-20);
end;
Carbon вне форума Ответить с цитированием
Старый 23.06.2007, 20:32   #6
zetrix
Delphi/C++/C#
Участник клуба
 
Аватар для zetrix
 
Регистрация: 29.10.2006
Сообщений: 1,972
По умолчанию

Цитата:
Ещё вопрос:
Как ограничить движение курсора по форме???
Код:
var cr:TRect;
...
with cr do
 begin
 Left:=1;
 top:=1;
 right:=2;
 bottom:=2;
 end;
ClipCursor(@cr);//ограничение области перемещения курсора
zetrix вне форума Ответить с цитированием
Старый 27.06.2007, 01:57   #7
Shuraken
Форумчанин
 
Аватар для Shuraken
 
Регистрация: 16.04.2007
Сообщений: 298
По умолчанию

SetCursor(0)
Не надо ничего усложнять. Все достаточно тривиально.
Shuraken вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Анимированый курсор Gromsky Мультимедиа в Delphi 9 04.11.2008 09:04
Курсор RealSHELS Общие вопросы Delphi 2 12.05.2008 12:51
курсор в мемо Чуча Помощь студентам 7 05.03.2008 15:44
Есть менюшка. Нужно сделать чтобы курсор был самой строкой. Небесный Паскаль, Turbo Pascal, PascalABC.NET 5 03.10.2007 19:46
курсор steck Общие вопросы Delphi 2 02.04.2007 22:45