Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.02.26;
Скачать: [xml.tar.bz2];

Вниз

Как работать с ani-курсорами?   Найти похожие ветки 

 
Ани   (2006-02-07 01:32) [0]

Можно мне из bmp-картинок с кадрами анимации собрать ani-курсор, и загрузить его? Если да, то как?
Я не нашёл в Дельфи ни классов, ни записей, ни вообще ничего, чтобы с анимированными курсорами работать. Как же быть?


 
Fay ©   (2006-02-07 03:36) [1]

http://www.aha-soft.com/rus/artcursors/index.htm
З.Ы.
Курсоры подключать через ресурсы, которые компиллировать RC.exe от MS.
М.б. есть способ попроще, но я его не знаю.


 
Ани   (2006-02-07 05:04) [2]

1) Я не спрашивал через что подключить курсоры.
2) Я не просил рекламировать всякие платные эдиторы.


 
Fay ©   (2006-02-07 05:45) [3]

2  Ани   (07.02.06 05:04) [2]
ОК. Тогда пиши, что значит "собрать ani-курсор" и "с анимированными курсорами работать".


 
Fay ©   (2006-02-07 05:47) [4]

> Я не просил рекламировать всякие платные эдиторы
Да, там просто жуткие цены.


 
Ани   (2006-02-09 02:08) [5]

Никто не знает?

Хоть какие нибудь мысли по теме?


 
Gero ©   (2006-02-09 02:14) [6]

Ищи описание ani-формата, пиши свой класс.


 
Ани   (2006-02-09 04:28) [7]

Что класс-то? Загрузить то как?

В Дельфи и так есть структура TIconInfo
Заполняешь её, и отсылаешь через CreateIconIndirect. И готов курсор. Только обычный. Не анимированный. Вот я и спрашиваю, а как анимированный то сделать?

Ещё есть стурутура TDIBSection, через которую можно получить всякую информацию про анимированный курсор. Но то, получить. А загрузить то как?


 
Гарри Поттер ©   (2006-02-09 11:20) [8]

Ты это чтоли хочешь?

const crMyCursor = 1;

procedure TForm1.FormCreate(Sender: TObject);
begin
 // Загружаем курсор.
 Screen.Cursors[crMyCursor] :=LoadCursorFromFile("c1.ani");
 // Используем курсор
 Cursor := crMyCursor;
end;


 
Ани   (2006-02-10 01:33) [9]

> Гарри Поттер ©   (09.02.06 11:20) [8]
> Ты это чтоли хочешь?
> const crMyCursor = 1;
>
> procedure TForm1.FormCreate(Sender: TObject);
> begin
>  // Загружаем курсор.
>  Screen.Cursors[crMyCursor] :=LoadCursorFromFile("c1.ani");
>  // Используем курсор
>  Cursor := crMyCursor;
> end;

Вчера впервые загрузил Дельфи ? ;)

См. Постинг 7.

А вообще грустно, что никто них... не знает.


 
Джо ©   (2006-02-10 01:37) [10]

> [9] Ани   (10.02.06 01:33)
> А вообще грустно, что никто них... не знает.

За то время, что тут жалуешься, ругаешься и грустишь, уже  бы давно раскопал описание формата анимированных курсоров. Или ты думаешь, что в VCL каждый твой чих предусмотрен и сделан для него "класс"?


 
Fay ©   (2006-02-10 02:10) [11]

http://pascal.sources.ru/cgi-bin/forum/YaBB.cgi?board=delphi;action=display;num=1029683466


 
DevilDevil   (2006-02-10 23:58) [12]

Всем здрасте! Зашёл на www.punto.ru - поисковик, ввёл TAniFile и получил ссылку, которой несумел воспользоваться. В общем, такой класс уже есть, осталось только найти. Получится - скиньте мне на мыло!


 
Курсор   (2006-02-11 02:31) [13]

Компоненты для Дельфи 1 и 2. 1997 год. Где только такое отрыл то?
http://ftp.sunet.se/delphi/ftp/d20free/


 
Курсор   (2006-02-11 02:44) [14]

И ещё раз повторю загрузка курсоров из файлов и ресурсов меня не интересует.



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

Форум: "Начинающим";
Текущий архив: 2006.02.26;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.039 c
5-1125672759
Match
2005-09-02 18:52
2006.02.26
Как заставить появиться в OI published свойства формы?


15-1138860173
Ega23
2006-02-02 09:02
2006.02.26
С Днём рождения! 2 февраля


15-1139185823
DimonS
2006-02-06 03:30
2006.02.26
Тут такой вопросец наметился насчет выбора принтера...


2-1139154304
parovoZZ
2006-02-05 18:45
2006.02.26
Ошибка при добавлении записи


2-1139299456
Creative
2006-02-07 11:04
2006.02.26
Full Screen Mode





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский