Описание дополнительных библиотек
для программы MIDlet Pascal 2.02

A

alpha - Библиотека для работы с прозрачностью картинок anigif - Библиотека для отрисовки анимированных GIF-изображений

alpha - Библиотека для работы с прозрачностью картинок

integer GetAlphaLevels
Получить количество альфа-уровней, которые поддерживает телефон.
В норме должно возвращать значение 256, в старых телефонах без поддержки альфа-каналов вернется 2 или даже 0.
image SetOpaque (im: image; opaque: integer)
Установить прозрачность для картинки im. Функция возвращает переделанную картинку.
Прозрачность opaque может быть от 0 до 255.
(0 - картинка совершенно прозрачна и не видна, 255 - картинка абсолютно непрозрачна).
SetTransparentColor (r: integer; g: integer; b: integer)
Установить цвет, который будет восприниматься как абсолютно прозрачный при выполнении процедуры SetOpaque.
Скажем, у вас картинка на белом фоне. Делаем:
SetTransparentColor(255,255,255); im:=SetOpaque(im,255);
и получаем ту же картинку, но уже с прозрачным фоном.
image ReplaceColor (im: image; r: integer; g: integer; b: integer; r2: integer; g2: integer; b2: integer)
Функция производит поиск в картинке всех точек, имеющих RGB цвет (r, g, b) и заменяет этот цвет на (r2, g2, b2).
Внимание! Прозрачность (и полупрозрачность) при этом теряется.
Но её потом можно восстановить, используя функции SetTransparentColor и SetOpaque.

anigif - Библиотека для отрисовки анимированных GIF-изображений

load_gif (fname: string)
Инициализация библиотеки и загрузка GIF-файла с диска из папки, описанной в fname.
image get_frame
Функция возвращает следующий кадр изображения. Если предыдущий кадр был последним, возвращает первый.
integer get_delay
Функция возвращает указанную в файле задержку между прорисовкой кадров в миллисекундах.
ВНИМАНИЕ! Для правильной работы библиотеки необходимо добавить в ресурсы программы файлы GifFrame.class и GifImage.class


Специально для forum.boolean.name
Более свежий сборник библиотек, программу MIDlet Pascal RU edition, эмуляторы телефона можно найти на сайте odd.3dn.ru

2008 (c) odd