![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Курсоры [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]сегодня был такой вопрос. Ищите