Подскажите пожалуйста, как можно однократно применить эффект TInnerGlowEffect к TImage? Вариант с созданием экземпляра TInnerGlowEffect и его присоединение к TImage не подходит. Другими словами, нужно на TImage отрисовать этот эффект, и далее используется эта сформированная картинка с данным эффектом.
Я смотрел пример ShaderFilters, идущий в комплекте с делфи, и накидал следующий код:
Вопрос
Tumaso
Подскажите пожалуйста, как можно однократно применить эффект TInnerGlowEffect к TImage? Вариант с созданием экземпляра TInnerGlowEffect и его присоединение к TImage не подходит. Другими словами, нужно на TImage отрисовать этот эффект, и далее используется эта сформированная картинка с данным эффектом.
Я смотрел пример ShaderFilters, идущий в комплекте с делфи, и накидал следующий код:
var LFilter: TFilter;
LFilter := TFilterManager.FilterByName('InnerGlowFilter');
LFilter.ValuesAsBitmap['Input'] := LSource.Bitmap; // исходная картинка
LFilter.ValuesAsColor['Color'] := PremultiplyAlpha(MakeColor(TAlphaColorRec.Red, 0.6));
LFilter.ValuesAsFloat['BlurAmount'] := 2;
LDest.Bitmap := LFilter.ValuesAsBitmap['output']; // результат
в итоге получаю только картинку, состоящую из одного черного фона. Что я делаю не так?
Ссылка на комментарий
4 ответа на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.