• 0
97mik

TButton [iOS] Как сделать цветную обводку кнопки в iOS?

Вопрос

Как поменять например стиль кнопки для iOS? Чтобы была например не синяя обводка, а зелёная.

Dai12lDymn1 понравилось это

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


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

2 ответа на этот вопрос

  • 0

Как поменять например стиль кнопки для iOS? Чтобы была например не синяя обводка, а зелёная.

 

Прикрепите, пожалуйста, скриншот, чтобы было понятно, что за "обводку" вы имеете в виду.

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


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

Теперь в RAD Studio XE6 для iOS и Андроид появилась поддержка Tint эффекта, который позволяет прямо в дизайнере менять цвет фона, обводки и заливки иконок кнопки.

 

Этот эффект позволяет легко менять оттенок фона и контура кнопки. Примеры для Андроид и iOS изображены ниже.

Смена фона кнопки на Android:

post-1-0-30678500-1397570881_thumb.png

Быстрая смена заливки кнопок с иконками на iOS:

post-1-0-64332400-1397571077_thumb.png

Быстрая смена контура кнопки, если он поддерживается стилем:

post-1-0-06154500-1397571365_thumb.png

 

Обратите внимание, что поддержка данного эффекта зависит от стиля. Если стиль поддерживает его, то в дизайнере появятся свойства редактирования цвета. Если стиль не поддерживает, то свойства Tint будут скрыты.

rareMax понравилось это

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


Ссылка на сообщение
Поделиться на других сайтах
Гость
Эта тема закрыта для публикации сообщений.

  • Похожие публикации

    • Автор: Dinkin
      Доброго!
      Есть ли аналог AllowAllUp для кнопок в FM?
    • Автор: Dozent
      Вообщем столкнулся с такой бедой и не знаю как решить!
      Мне нужно сделать в какой-то контейнер накидать лайауты, кнопки, имейджи, лейблы и тд.
      Потом нужно чтобы это всё можно было таскать по скролбоксу и создавать копию такого же контейнера! Казалось бы всё можно сделать но тут я в тупике, почему? 
      Я кинуть TCalloutRectangle на форму в нём расположил как мне нужно элементы и научил его двигаться в скролбоксе!! Сижу я тут такой радуюсь смотрю на код)
      procedure TForm1.crtPhaseMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); begin zX := X; zY := Y; zIsDragging := true; (Sender as TControl).BringToFront; (Sender as TShape).Fill.Color := TAlphaColorRec.Lightblue; (Sender as TShape).Root.Captured := (Sender as TShape); end; procedure TForm1.crtPhaseMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Single); begin if zIsDragging and (ssLeft in Shift) then begin (Sender as TControl).Position.X := (Sender as TControl).Position.X + X - zX; (Sender as TControl).Position.Y := (Sender as TControl).Position.Y + Y - zY; // (Sender as TShape).Fill end; end; Потом такой же радостный беру и копирую код из другого проекта где у меня прекрасно создавались копии накиданные мной .
      procedure TForm1.Button1Click(Sender: TObject); var Layout: TButton; begin Layout := TButton.Create(GridLayout1); Layout.Parent := GridLayout1; Layout.StyleLookup := 'MainStyle3'; Layout.Position.X := Layout1.Position.X + 10; Layout.Position.Y := Layout1.Position.Y + 10; Layout.Visible := true; GridLayout1.Height := GridLayout1.Height + Layout.Height; end; Сижу и думаю вот контрол сделал он по форме таскается круто шас ещё и научу его многожить)))
      Но тут горячая обезьянка подкидывает сурпрайз)
      У TCalloutRectangle  и ему подобным нет свойства LoockupStyle. А это значит что стиль я ему предать не могу) Но он хорошо передвигается по форме)
      Ок делаю кнопку он вроде как стиль применяет, корява но это возмно мой касяк) Но он не передвигается по форме, а при клике по нему выдаёт ошибку
       
      First chance exception at $773ADAE8. Exception class EInvalidCast with message 'Invalid class typecast'. Process RPScenarioEditor.exe (4084) Чта делать я в замешательстве!!! Подскажите пожалуйста....
    • Автор: Ra72
      Уважаемые эксперты!
      Хочу написать свой редактор стилей для мобильных платформ.
      Для полного счастья не хватает знаний каким образом из TStyleBook.Style выгрузить его изменения в TStyleBook.Resource для последующего сохранения в файл.
       
    • Автор: Ufomaster
      akRight для TButton в TTabControl не корректно работает, как это обойти? 
      При использовании якоря у кнопки, правый край кнопки уплывает за границу табпанели.

    • Автор: sviat9440
      Всем привет! Давно с вами не виделись)) Вот такая проблема есть: У меня Виндовс 10, и все корректно отображается. Я имею в виду стили. У меня на данный момент нет возможности протестировать приложение на Виндовс 7, но прилагаю скрины (Как должно/Как отображается). Вопрос: Проблема у меня? Или на стороне FireMonkey?
       
      Попутный вопрос: Если на стороне FireMonkey, то как узнать версию ОС, чтобы при запуске на вин7, сообщать пользователю что то типа "Твоя ОС не поддерживается"?
       
      Дополнительная информация: Используется Delphi XE 10 Seattle.


    • Автор: Ra72
      Следующий код не работает на Android. На Win32 в FBinary записывается примерно 100 килобайт, а на Android - 36 байт.
      FBinary := TMemoryStream.Create; TStyleStreaming.SaveToStream(AStyleBook.Style, FBinary, TStyleFormat.Binary);
    • Автор: Ra72
      Уважаемые эксперты!
      Подскажите, как сохранить StyleBook в текстовом формате *.style динамически (во время исполнения программы) ? Например:
      object TLayout Align = alClient Height = 715.000000000000000000 Position.Y = 33.000000000000000000 Width = 1162.000000000000000000 object TSwitchObject StyleName = 'switchstyle' ...
    • Автор: prodigone
      Имеется TImage, работает как кнопка. Можно ли создать анимацию её нажатия? Может быть реализовать плавную смену самой картинки на момент нажатия и обратная смена на исходную после того как палец отпустили? Подскажите как это можно описать
    • Автор: Валерий М.
      Здравствуйте, ситуация следующая, есть кнопка, для нее нужно в событии при наведении мышкой, показать справа и слева два всплывающих окна, или так сказать подсказки , в одном картинка этого предмета в другой его описание, функции showhint нет, как это правильно сделать?
    • Автор: rustam_d
      Вопрос по сабжу хотелось бы решить без использования стилей.
      На андроид работает вот это
                     Button1.TintColor := TAlphaColorRec.Blue На ИОС нет. Пробовал поиграть с StyleLookup...безрезультатно, фон прозрачный хоть тресни.
      Тех. характеристики в подписи.
       
       
       
       
  • Сейчас на странице   0 пользователей

    Нет пользователей, просматривающих эту страницу