как стилями/в рантайме создать прозрачную кнопу с градиентным текстом... (будет )
пока смог нарисовать градиентный текст на белом фоне стилем - слой градиента (слой белый (черный текст и MaskToAlphaEffect))
дело осталось за малым - белый фон убрать... но добавление прочих эффектов все портит
object TRectangle
StyleName = 'bt0Gradient'
Align = Center
Fill.Color = claNull
object TRectangle
StyleName = 'Gradient'
Align = Contents
Fill.Kind = Gradient
Fill.Gradient.Points = <
item
Color = xFFF60404
Offset = 0.000000000000000000
end
item
Color = xFF1BFE5A
Offset = 0.354037255048751800
end
item
Color = xFFFEF60D
Offset = 0.642857134342193700
end
item
Color = xFF0035FF
Offset = 1.000000000000000000
end>
Fill.Gradient.StartPosition.Y = 0.500000000000000000
Fill.Gradient.StopPosition.X = 1.000000000000000000
Fill.Gradient.StopPosition.Y = 0.500000000000000000
end
object TRectangle
StyleName = 'white'
Align = Contents
Fill.Color = claWhite
object TText
StyleName = 'text'
Align = Contents
Text = 'TextTextText'
TextSettings.Font.Size = 40.000000000000000000
end
object TMaskToAlphaEffect
StyleName = 'MaskToAlphaEffect1Style'
end
end
end
Вопрос
Slym
как стилями/в рантайме создать прозрачную кнопу с градиентным текстом... (будет )
пока смог нарисовать градиентный текст на белом фоне стилем - слой градиента (слой белый (черный текст и MaskToAlphaEffect))
дело осталось за малым - белый фон убрать... но добавление прочих эффектов все портит
или как управлять применением фильтров?
Ссылка на комментарий
2 ответа на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.