Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Курсор "Лапа"

Автор: AlexV 13.11.2002, 15:41

Требуется, чтобы при ведении мышью над канвой TPaintBox курсор был в виде
лапы (не пальца). Лапа.ico у меня есть. Как ее подключить к TPaintBox, не загружая из файла?

Даже загрузить новый курсор я смог.
screen.cursors[5]:=LoadCursorFormFile('d:\lapa.ico');
PaintBox1.cursor:=5;

Но вот хотелось бы не подгружать из файла и не загружать его из ресурса, а
хранить курсор, например, в каком то компоненте на форме и оттуда его прицеплять.

Автор: man2002ua 13.11.2002, 21:27

исп. TImage для хранения "лапы"
---
а именно:
screen.cursors[5] := Image1.Picture.Icon.Handle;
ну и т.д.

Автор: Heathen 13.11.2002, 21:38

Если лапа стандартная, то в 'обджект инспектор' св-во курсор а если своя, то
сувай ее в ресурс и компилируй (не нужно тогда из файла грузить)

Автор: Heathen 13.11.2002, 21:41

Блин, невнимательно прочитал вопрос. Из ресурса не надо. Врпрос-а чем из ресурса то плохо?

Автор: AlexV 13.11.2002, 21:49

Из ресурса ?
А ресурс - это разве не файл ? Или он все равно в exe компануется и не требуется его с exe таскать ?

Автор: man2002ua 13.11.2002, 21:58

AlexV, чем неудовлетворяет мой ответ? Курсор/Иконка - нах. в компоненте TImage, как ты и хотел... :thumbs-up

Автор: Heathen 13.11.2002, 22:00

В самую точку. Ресурс таскать с собой не требуется. После компиляции он присоединяется к exe-шнику

Автор: Heathen 13.11.2002, 23:03

Вот ссылка на тему как запихнуть в ресурс 'чего-нибудь' (исходники)

http://src.fitkursk.ru/

Автор: Vit 13.11.2002, 23:10

Цитата(Heathen @ 13.11.2002, 06:03)

Вот ссылка на тему как запихнуть в ресурс 'чего-нибудь' (исходники)

http://src.fitkursk.ru/

Зачем так далеко ходить - у нас в FAQ есть тоже эта тема (между прочим первой стоит):
http://www.forum.vingrad.ru/cgi-bin/newforum/ikonboard.cgi?act=ST;f=32;t=831