|
01.02.2009, 21:06
|
#1
|
Оптимист
Регистрация: 07.01.2006
Сообщений: 961
Написано 105 полезных сообщений (для 259 пользователей)
|
Lib_effects : библиотека для применения различных эффектов к картинке
30.01.09
Автор: aNNiMON
function effect(img : Image; mode : integer) : Image;
public static Image effect(Image img, int mode) - применить эффект к картинке
img - исходная картинка;
mode - числовое значение для эффекта:
0 - Обесцвечивание;
1 - Негатив;
2 - Затемнение - каждый вызов метода затемняет цвета на 20;
3 - Осветление - каждый вызов метода осветляет цвета на 20;
4 - Сепия;
5 - Сглаживание;
6 - Искажение;
function change(img : Image; ch : integer; val : integer) : Image;
public static Image change (Image img, int ch, int val) - изменить канал изображения на величину val.
img - исходная картинка;
ch - канал:
0 - alpha;
1 - red;
2 - green;
3 - blue;
val - значение (может быть и отрицательным) для изменения канала.
function get(img : Image; x, y, ch : integer) : integer;
public static int get (Image img, int x, int y, int ch) - возвращает значение выбранного канала в данной точке изображения.
img - исходная картинка;
ch - канал:
0 - alpha;
1 - red;
2 - green;
3 - blue;
int x и int y - точка в изображении.
function saturation(img : Imagel val : integer) : Imaage;
public static Image saturation(Image img, int val) - уменьшение нассыщености.
img - исходная картинка;
val - значение от 0 до 255 чем выше значение, тем меньше уменьшение насыщености.
function changecolor(img : Image; r1, g1, b1, a2, r2, g2, b2 : integer): Image;
public static Image changecolor(Image img, int r1, int g1, int b1, int a2, int r2, int g2, int b2) - сменить цвет r1g1b1 на r2g2b2 с прозрачностью a2
img - исходная картинка;
r1,g1,b1,r2,g2,b2 - цвета
a2 - прозрачность
|
(Offline)
|
|
Эти 9 пользователя(ей) сказали Спасибо Piligrim за это полезное сообщение:
|
|
27.02.2009, 23:15
|
#2
|
AnyKey`щик
Регистрация: 20.12.2008
Сообщений: 13
Написано 4 полезных сообщений (для 12 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Обновил Lib_effects, описание в архиве.
Исправил сглаживание, добавил кучу фильтров для изображений.
Некоторые методы портировал с других языков.
__________________
Use a music as a weapon
|
(Offline)
|
|
Эти 5 пользователя(ей) сказали Спасибо aNNiMON за это полезное сообщение:
|
|
14.06.2009, 15:00
|
#3
|
Нуждающийся
Регистрация: 22.09.2008
Сообщений: 74
Написано 8 полезных сообщений (для 12 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Хм.. Чёто у меня МП ругается на обновлённую Effects, пишет что-то вроде "Failed to load Lib_effects". Первая работает нормально, а эта не хочет.
Точный лог: "newproject.mpsrc:2: error, error reading external library file"
Ошибка возникает сразу после добавления "effects" в строку Uses.
Последний раз редактировалось Cliffe Snake, 14.06.2009 в 15:06.
|
(Offline)
|
|
13.08.2009, 11:20
|
#4
|
Знающий
Регистрация: 26.07.2009
Адрес: Россия, Москва
Сообщений: 318
Написано 103 полезных сообщений (для 331 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Сообщение от Cliffe Snake
Хм.. Чёто у меня МП ругается на обновлённую Effects, пишет что-то вроде "Failed to load Lib_effects". Первая работает нормально, а эта не хочет.
Точный лог: "newproject.mpsrc:2: error, error reading external library file"
Ошибка возникает сразу после добавления "effects" в строку Uses.
|
Та же самая проблемма. У всех так?
|
(Offline)
|
|
13.08.2009, 20:42
|
#5
|
Нуждающийся
Регистрация: 30.07.2009
Сообщений: 61
Написано одно полезное сообщение
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
FAQ почитайте и тада ничё вылетать не будет. В совместимость с видной 98 ставьте.Только эмуль из МП командой Run запускаться не будет. Но это мелочи. А так либа прикольная Аффтару респект. Ща можно прогу для редактирования картинок наваять.
|
(Offline)
|
|
17.08.2009, 18:04
|
#6
|
Знающий
Регистрация: 26.07.2009
Адрес: Россия, Москва
Сообщений: 318
Написано 103 полезных сообщений (для 331 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Сообщение от Трава
FAQ почитайте и тада ничё вылетать не будет. В совместимость с видной 98 ставьте.Только эмуль из МП командой Run запускаться не будет. Но это мелочи. А так либа прикольная Аффтару респект. Ща можно прогу для редактирования картинок наваять.
|
Вы тоже внимательно почитайте, что в предыдущих сообщениях написано. MP не вылетает, а конкретно ругаеться: "newproject.mpsrc:2: error, error reading external library file". А Факи читали и совместимость установлена.
|
(Offline)
|
|
17.08.2009, 23:14
|
#7
|
Нуждающийся
Регистрация: 30.07.2009
Сообщений: 61
Написано одно полезное сообщение
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Тада хз... У меня работает. А какая у тя версия? В смысле, русская или англ? У меня англ и всё пашет.
__________________
Дави лыбу, ибо сие есть хорошо!
|
(Offline)
|
|
18.08.2009, 00:34
|
#8
|
Знающий
Регистрация: 26.07.2009
Адрес: Россия, Москва
Сообщений: 318
Написано 103 полезных сообщений (для 331 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Сообщение от Трава
Тада хз... У меня работает. А какая у тя версия? В смысле, русская или англ? У меня англ и всё пашет.
|
Английская. И вот эта прога у тебя пашет?:
program NewProject; uses effects; var img : image; begin SetColor(0,0,0); // Очищаем экран черным FillRect(0,0,GetWidth,GetHeight); SetColor(255,20,20); drawline(10,10,60,60); // Рисую линию img := ImageFromCanvas(0,0,70,70); // Грабим с конваса img := effect(img,1); //Негатив (инверсия) DrawImage(img,0,0); // Выводим что получилось Repaint; delay(2000); end.
У меня лично нет. Она выводит всю туже красную линию на черном. А должна по идее синию на белом. Такое ощущение, что effect возвращает в img NIL или что-то непотребное, поэтому DrawImage не выполняеться (выполняеться, но с кривыми параметрами). Или же effect вообще не выполняеться, а сразу выходит из процедуры. Что я делаю не так?
|
(Offline)
|
|
18.08.2009, 16:42
|
#9
|
Нуждающийся
Регистрация: 30.07.2009
Сообщений: 61
Написано одно полезное сообщение
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
МП при работе с либой ошибок не выдаёт. Я про это. А исходник не пашет
__________________
Дави лыбу, ибо сие есть хорошо!
|
(Offline)
|
|
18.08.2009, 18:22
|
#10
|
Знающий
Регистрация: 26.07.2009
Адрес: Россия, Москва
Сообщений: 318
Написано 103 полезных сообщений (для 331 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Сообщение от Трава
МП при работе с либой ошибок не выдаёт. Я про это. А исходник не пашет
|
А я говорю выдает. Я про ту либу, которая не в первом сообщении в этой теме, а где-то в 3-4. Которая в зипе занимает 5,1Kb.
|
(Offline)
|
|
18.08.2009, 20:54
|
#11
|
Нуждающийся
Регистрация: 30.07.2009
Сообщений: 61
Написано одно полезное сообщение
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Фак. Я про первую
__________________
Дави лыбу, ибо сие есть хорошо!
|
(Offline)
|
|
22.05.2011, 13:25
|
#12
|
Знающий
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений (для 13 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
Вторая либа не рабочая
__________________
G502, GT S5230w user!
|
(Offline)
|
|
22.05.2011, 16:29
|
#13
|
Знающий
Регистрация: 09.10.2009
Сообщений: 340
Написано 37 полезных сообщений (для 61 пользователей)
|
Ответ: Lib_effects : библиотека для применения различных эффектов к картинке
У меня при совместимости с 95(с 98-м тоже помоему катит) кнопочка Run отлично работает
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 05:41.
|