Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Курсоры [Delphi, C++ Builder, Windows]


Анат ©   (2002-11-10 19:04:00) 

Delphi 5 вообще понимает цветные и анимированные курсоры ?
А если понимает, то как загрузить курсор в программу?


apay   (2002-11-15 01:28:00) [1]

цветные курсоры через ресурсы еще как грузянся, а анимированные к сожалению нет


icWasya   (2002-11-12 19:17:00) [2]

через ресурсы - нельзя
а через файлы примерно так



const crDinosaur=1001;// или что там хотите

//---------- инициализация
procedure InitDinosaur;
begin
Screen.Cursors[crDinosaur]:=LoadCursorFromFile (PChar("C:\Windows\Cursors\Dinosaur.ani"));
end;

//------------- использование
procedure TForm1.ChangeCursor;
begin
Edit1.Cursor:=crDinosaur;
end;


Stucker   (2002-11-10 20:18:00) [3]

Удалено модератором


Андрей Прокофьев   (2002-11-10 19:07:00) [4]

сегодня был такой вопрос. Ищите


Наверх

Титульная страница Поиск, карта сайта Написать письмо