Перейти к содержанию
  • Регистрация
  • 0
sviat9440

[TLabel] Почему при отключенном StyledSettings.FontColor, не меняется цвет текста в TLabel?

Вопрос

Почему в 10.1 цвет надписи тянется из стиля, хотя в StylledSettings галочка FontColor отключена?

photo_2016-10-13_16-06-43.jpg

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Рекомендуемые сообщения

  • 0

Ничего не меняется, все тянется из стилей. На галочки в StylledSettings абсолютно никакой реакции.

(Пробовал задать даже кастомный шрифт и размер, ноль реакции)

15 минут назад, Brovin Yaroslav сказал:

Есть какой-нибудь демо проект, чтобы проверить локально?

Секунду, щас

Изменено пользователем sviat

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
  • 0

На код прошу не ругаться. #какмагутакипишу )) главное что все работает...

2 минуты назад, Brovin Yaroslav сказал:

Есть какой-нибудь демо проект, чтобы проверить локально?

 

11.7z

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
  • 1

Судя по коду в компоненте TLabel в принципе не предусмотрено явно использование в стиле TText объекта, в качестве основы стиля. 

Другими словами, если вы в стиле для TLlabel "T1Style" перенесете TText внутрь TLayout, то у вас все будет работать.

Мне кажется, что это бага / фича реквест.

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
  • 0
2 минуты назад, Brovin Yaroslav сказал:

Судя по коду в компоненте TLabel в принципе не предусмотрено явно использование в стиле TText объекта, в качестве основы стиля. 

Другими словами, если вы в стиле для TLlabel "T1Style" перенесете TText внутрь TLayout, то у вас все будет работать.

Мне кажется, что это бага / фича реквест.

Благодарю

 

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.


  • Похожий контент

    • От slav_z
      Как сделать текст с подобными атрибутами? Очень просто!
      (Цвет текста не работает в XE8) Вот весь код:
      unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.UIConsts, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Controls.Presentation, FMX.StdCtrls, FMX.Objects, FMX.TextLayout; type TForm1 = class(TForm) Button1: TButton; Text1: TText; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.fmx} type TTextAccess = class(TText); procedure ClearTextAttribute(Text: TText); begin TTextAccess(Text).Layout.ClearAttributes; end; procedure AddTextAttribute(Text: TText; Pos,Length: Integer; FontStyles: TFontStyles; FontColor: TAlphaColor); var Font: TFont; begin Font:=TFont.Create; Font.Assign(Text.Font); Font.Style:=FontStyles; TTextAccess(Text).Layout.AddAttribute( TTextRange.Create(Pos,Length), TTextAttribute.Create(Font,FontColor)); end; procedure TForm1.Button1Click(Sender: TObject); begin AddTextAttribute(Text1,10,17,[TFontStyle.fsBold],claRed); AddTextAttribute(Text1,34,8,[TFontStyle.fsUnderline],claBlue); AddTextAttribute(Text1,47,8,[TFontStyle.fsStrikeOut],claGreen); Text1.Repaint; end; end.  
    • От ra.eremeev
      Добрый день!
      Нуждаюсь в помощи.
      Необходимо в TText вывести текст в Unicode, содержащий смайлы.
      На iOS проблем нет - смайлы отображаются. 
      На Android - монохромные значки (залитые черным) - .
      При этом, если выводить в ListView (через TListItemText), то смайлы выходят и на Android. Шрифт при этом тот же, что и для TText. 
      Но необходимо именно в TText
      Помогите, пожалуйста, как вывести смайлы на Andorid в TText?
       
    • От yooSee
      Привет Всем уважаемые! 
      Пытаюсь сделать растягивание по содержимому компонента. Как это реализовано в мессенджерах типа WhatsApp если большой текст то растягивает (выделяется) по содержимому большое поле, если короткий то малое. 
        Text2.Text := Memo1.Lines.Strings[4];   text2.Height := canvas.TextHeight(Text2.Text); //по высоте строки меняется т.к. там и есть одна строка в TText просто переносится WordWrap визуально.   text2.Height:=canvas.TextWidth(text2.Text); //  - так чушь  Как это вообще реализовано кто нибудь сталкивался?

    • От dim
      сейчас модно показывать аватарки круглыми, можно ли на XE10 у timage это сделать?
      не могу вспомнить, но вроде где-то  наталкивался, что толи настройками, толи стилями это делается легко
    • От x11
      Посмотрел это видео
       
      https://youtu.be/iM9lamNwmtc?t=20m51s
       
      Там же просто копипастинг. Чтобы подключить ещё 2-5-10 стилей, нужно заниматься копипастой. Именовать/переименовывать.
      Разве так можно?
      А нельзя как-то автоматизировать процесс добавления стилей в список, где их может выбирать пользователь в процессе работы?
    • От Ameta
      Доброе время суток. После создания/изменения (Edit Custom Style...) собственного стиля у Label1 (добавил в качестве фона прямоугольник) перестали обрабатываться события OnMouseMove, OnMouseDown и т.д. (Label1.HitTest:=True). До изменения стиля все работало. В чем причина? Спасибо за ответ...

    • От sviat9440
      Возникла вот такая непонятная ситуация: до этого момента я всегда считал что TLabel никак физически не может принять Tab Focus наравне с TRectangle и тому подобных. Судя по всему я ошибался. Ниже прилагаю скрин окна Tab Order, что там делает TLabel неясно. Ну да ладно. Вопрос в том как его оттуда убрать, чтобы он не жрал Tab Focus? Стандартных галочек TabStop и CanFocus в Tlabel нет.

      P.S. Я не помню чтобы я сталкивался с этой проблемой в предыдущих версиях RAD.
    • От Axbor
      Как исправит такой косяк с отображением текста TText? Если видно, там остатки от текста отображаются. Платформа андроид, Rad Studio XE 10.

    • От kidrock
      Всем привет. Как на мобилке для Делфи  сделать так, чтобы по клику на TLabel открывался браузер(не компонент) и, допустим, страница http://google.com?
    • От ra.eremeev
      Друзья, дошел до отчаяния!
       
      В моем приложении есть необходимость рассчитать высоту TListboxItem, в котором расположены компоненты TLabel.
      Расчет высоты производится на основании подсчета высоты компонента TLabel.
      Также, компоненты TLabel сами выстраиваются в столбец друг за другом (закончился один, отступ, выводим другой).
       
      Перерыл весь форум. Использовал все рекомендации:
      1. определял высоту текста в TLabel по канве (тема: http://fire-monkey.ru/topic/44-avtomaticheskii-perekhod-na-vtoruiu-stroku-tlabel/)
      2. принудительно загружал стили (тема: http://fire-monkey.ru/topic/726-pochemu-u-menia-dlia-tlabel-nepravilno-vychisliaetsia-raz/)
      3. опирался на свойства TLabel.Height.
       
      Что бы я ни делал, построить стабильный вывод компонентов не получается.
      Постоянно в самые непредсказуемые моменты компоненты либо расползаются, либо высота TListboxItem рассчитывается неверно.
       
      Самый стабильный результат дает третий способ. Но при первом выводе компонентов на экран, те, которые завязаны на расчет высоты TLable, расползаются; при последующих открытиях расчет работает стабильно. Думал, что стили не загружены, применял 2 способ, но тоже решения не дало
       
      Подскажите, пож-та, как получить реальную высоту текста в TLabel как при первом выводе компонентов на экран, так и при последующих?
       
      Также, не сочтите за наглость, но буду признателен за фрагмент кода, работающего при любых условиях для Listbox1.Height:=Label1.height+label2.Height+10
      Правда, веру в себя с этим выравниванием потерял
       

  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

×
×
  • Создать...