Скачать: CL | DM;

Как работать с 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 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.038 c