Скачать: CL | DM;

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

← →
Dy1   (2009-09-25 19:18) [0]

у формы есть св-во Cursor, как его поменять динамически?

---

← →
MTsv DN   (2009-09-25 20:32) [1]

WinAPI - LoadCursor

---

← →
Dy1   (2009-09-25 22:32) [2]

а как стандартные? Которые можно поставить в редакторе. Кстати, в ресурсах никаких курсоров не нашлось

---

← →
CSS   (2009-09-27 18:35) [3]

>>> у формы есть св-во Cursor

Поясните что именно вам нужно... =)
Просто изменить "вид" курсора, или поставить свой собственный рисунок заместо курсора? =))

Просто вид меняется просто:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Cursor:=crSQLWait;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Form1.Cursor:=crHourGlass;
end;

Но! При таком способе курсор изменится только для формы - на других контролах он останется прежним...
Поэтому советую изменять курсор у объекта Screen:
procedure TForm1.Button3Click(Sender: TObject);
begin
Screen.Cursor:=crHourGlass;
end;

---

← →
MTsv DN   (2009-09-27 19:28) [4]

Уважаемый, CSS...

Вы подфорумом ошиблись. Здесь только KOL.

---

← →
Dy1   (2009-09-28 10:11) [5]

проблема оказалась в Form.Perform(WM_SYSCOMMAND, $F012, 0); Оно мешало смене. Проблема (как бы) решилась заменой KOLForm1MouseUp на KOLForm1Click, и в периодических глюках Делфи или Винды (тот же код то работает, то нет).

---

← →
D[u]fa   (2009-09-28 15:03) [6]

Form.Perform(WM_SYSCOMMAND, $F012, 0);

а где такое было? и чем мешало

---

← →
Dy1   (2009-09-29 13:38) [7]

было и есть в маусдауне после смены курсора. Двигает форму не за заголовок

---

← →
CSS   (2009-10-13 14:24) [8]

Ой...
Извеняюсь... =(

Я на эту тему из Яндекса вышел, не посмотрел на раздел... =(

---

← →
Barloggg   (2009-10-13 16:03) [9]

однако вопрос все же актуален.
как это делается в КОЛ? причем без МСК...
что такое Hicon и как его сделать из битмапа?

---

← →
Dy1   (2009-10-14 09:23) [10]

в кол примерно так же, как с помощью мцк. Form.Cursor := LoadCursor(0, IDC_HAND); должно быть.

Hicon - при расшифровывании было получено "хендл иконки" :)
были какие-то ф-ии, но что-то сейчас не могу их найти.

---

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

Скачать: CL | DM;



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