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

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

Создание алгоритма димминга


cosinus ©   (2002-11-18 10:58:00) 

Здраствуйте мастера. Мне нужно создать графический файл димминга
(то бишь плавного "разгорания" цвета от 0 в R-составляющей до 255),
высотой в 1 пиксел
в формате BMP. Входные данные:длинна будущего файла в пикселях.
Никак не могу прийти к единому алгоритму плавности. Объясню подробнее, что
у меня не получается, чтобы не было вопросов. Допустим, я хочу сгенерировать файл,
длинной в 250 пикселей-тут все понятно, не так ли? :) Первый пиксел
(R-состовляющая) 1, второй 2,..., 250 - 250 (это конечно не 255,
но разница минимальна и этим можно пренебречь). А теперь , допустим, я хочу, чтобы
выходной файл состоял из 120 или 310 или ... . Как решить эту задачу?
делать изменяемый шаг? По какому алгоритму? Может быть кто-нибудь
встречался с хотя бы отдаленной задачей? Помогите, плз.
Заранее благодарен, Vladislav .


Smithson   (2002-11-18 11:09:00) [1]


W: Integer; // Ширина строки
I: Integer;
Step: Double; // Шаг

...

R := 255/W;
for I := 0 to W-1 do
NextPixel := Round(R*I);


Примерно так


Наверх

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