Поиск по сайту

Результаты поиска по тегам 'шрифт'.

  • Поиск по тегам

    Введите теги через запятую.
  • Поиск по автору

Тип публикаций


Категории и разделы

  • Общие вопросы
    • Анимация
    • Графика
    • Стили
    • Базы данных и REST
    • Компоненты
    • Положение, размеры, выравнивание
    • Работа с текстом
    • Приложение и формы
    • Отладка
    • Развертывание приложений
    • Вопросы по языку Object Pascal и RTL
    • Общая информация о TControl
    • События
    • Прочие вопросы
  • Вопросы по платформам
    • Android
    • iOS
    • OSX
    • Windows
    • Windows Phone
    • Linux
  • Вопросы по использованию RAD Studio
    • Лицензирование
    • Сборка проектов
    • Multi-Device Designer
    • Редактор кода
    • Вопросы
  • Обучение
    • Основная информация
    • Вопросы
    • Отзывы
  • Поиск специалистов по FireMonkey
    • Консультации
    • Ищу подрядчика
  • API интернет сервисов
    • ВКонтакте API
    • Google Maps API
    • Yandex деньги
  • Дополнительные ресурсы по FireMonkey
    • Сторонние компоненты
    • Приложения, написанные с использованием FireMonkey
    • Примеры
    • Руководства
    • Шаблоны
    • Статьи и заметки
    • Информация о версиях RAD Studio
    • Новости
  • Организация работы данного форума
    • Правила форума
    • Нарушения правил форума
    • Предложения об организации форума
    • Проблемы
  • Видеокурсы
    • Основная информация
    • Курсы
    • Предложения и голосования за новые курсы
    • Вопросы

Категории

  • Курсы



Фильтр по количеству...

Найдено 4 результата

  1. в delphi xe4 и xe5 это осуществлялось вот так: procedure TForm1.FormCreate(Sender: TObject); var Col, Row: Integer; CellCtrl: TStyledControl; begin StringGrid1.Cells[ 0, 0 ] := 'Cell00'; StringGrid1.Cells[ 1, 0 ] := 'Cell10'; StringGrid1.Cells[ 0, 1 ] := 'Cell01'; StringGrid1.Cells[ 1, 1 ] := 'Cell11'; for Col := 0 to StringGrid1.ColumnCount - 1 do begin for Row := 0 to StringGrid1.RowCount - 1 do begin CellCtrl := TColumnAccess( StringGrid1.Columns[ Col ] ).CellControlByRow( Row ); if ( CellCtrl <> nil ) and ( CellCtrl is TTextCell ) then begin TTextCell( CellCtrl ).StyledSettings := []; TTextCell( CellCtrl ).FontColor := claBlueViolet; TTextCell( CellCtrl ).Font.Family := 'Times New Roman'; TTextCell( CellCtrl ).Font.Style := [ TFontStyle.fsBold ]; TTextCell( CellCtrl ).Font.Size := 14; end; end; end; end; в Delphi xe6 этот код ошибок не выдает, но и не чего не делает (( Подскажите, что не так?
  2. доброго времени сутки я хочу установить свой шрифт в приложение, пробовал так http://community.embarcadero.com/index.php/blogs/entry/true-type-font-iconography-for-android-and-ios-apps вроде все получается но есть одна проблема после того как устанавливаешь свои шрифт невозможно указать стиль то есть я указываю чтобы текст был жирным но в прилажение все равно показывает нормальным без стиля в чем проблема кто знает? Заранее спасибо
  3. Добрый день.! Выбираю в свойствах шрифт для лейбла. В винде все ок. На андройде/ios беда, ставится системный шрифт по умолчанию(Остальные свойства текста сохраняются). Как я понял это происходит из за того, что на устройстве нету выбранного шрифта. Как заставить работать шрифт который изначально доступен для выбора в FMX?
  4. Доброго времени суток. Создаю программно компоненты TLabel. Status1 := TLabel.Create(Form1); Status1.Name := 'LabelStatus1_'+idMachine.ToString; Status1.Parent := RectangleStatus; Status1.Align := TAlignLayout(9); Status1.TextSettings.HorzAlign := TTextAlign(0); //По умолчанию, при создании объекта TLabel, размер шрифта устанавливается в значение 12 Status1.TextSettings.Font.Size := 24; Status1.TextSettings.WordWrap := true; Status1.Text := 'Статус 1'; Status1.Visible := true; Изменяю значение размера шрифта: Status1.TextSettings.Font.Size := 24 Значение изменяется, но размер шрифта TLabel при отображении на форме остается прежним. Как можно, или нужно изменять размер шрифта компонента в RunTime?