Текущий архив: 2006.09.03;
Скачать: CL | DM;

Вниз

Как спрятать курсор   Найти похожие ветки 

← →
vain ©   (2006-08-12 17:45) [0]

Тоесть, чтобы он был невидим. Просто нарисовать прозрачный курсор не получается (его дельфя не признаёт)

---

← →
Юрий Зотов ©   (2006-08-12 18:01) [1]

ShowCursor(False) - спрятать
ShowCursor(True) - показать

---

← →
!_SM_!   (2006-08-12 18:28) [2]

А так можно убрать для конкретных контролов

procedure TForm1.FormCreate(Sender: TObject);
begin
 Panel1.Cursor:=crNone;
 Label1.Cursor:=crNone;
 Image1.Cursor:=crNone;
 Bevel1.Cursor:=crNone;
 Edit1.Cursor:=crNone;
end;

---

← →
vain ©   (2006-08-12 22:56) [3]

Спасибо

---

← →
Ketmar ©   (2006-08-12 22:59) [4]

> [0] vain ©   (12.08.06 17:45)
отчего же не получается? у меня получилось. я опять всё не так сделал? %-)

---

Страницы: 1 вся ветка

Текущий архив: 2006.09.03;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.535 c