![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Свой курсор [D6]
skiph © (2002-04-03 10:37:00)Ка добавить в список Cursor (свойство всех визуальных компонент) свой тип курсора.
Виктор Щербаков (2002-04-03 10:44:00) [1]Вот из хэлпа:
const
crMyCursor = 5;
procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.Cursors[crMyCursor] := LoadCursor(HInstance, "NewCursor");
Cursor := crMyCursor;
end;
Курсор предварительно нужно положить в ресурсы.