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

Узкий ScrollBar у TScrollBox

Вопрос

Здравствуйте!

 

Как реализовать узкие скролбары у TScrollBox по умолчанию. Помнится в XE3 было специальное свойство, но с появлением AniCalculations всё кудато пропало.

Спасибо.

 

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


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

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

  • 0
procedure EnableScrollSmooth(Sender: TObject; AHorhValue, ABounds, AShowing: Boolean);
begin
  if Assigned(TScrollBox(Sender)) then
    with TScrollBox(Sender).AniCalculations do
    begin
      Animation := True;
      AutoShowing := AShowing;
      BoundsAnimation := ABounds;
      if not AHorhValue then
        TouchTracking := TouchTracking - [ttHorizontal];
    end;
end;

ну и переключайте например так:

EnableScrollSmooth({ваш TScrollBox}, False, False, True);

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


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

Я имею ввиду отображение узких скролбаров по умолчанию. Т.е. они узкие всегда и не исчезают. А про AniCalculations я вкурсе )))).

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


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

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

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

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

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

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

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

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

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

Авторизация  

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

    • От MrAnderson
      Добрый вечер.
      Не подскажите в чем может проблема быть.
      Не отображает содержимое на Андройде при повороте на 180 градусов т.е.(RotationAngle:=180).TScrollBox или TPresentedScrollBox и TVertScollBox.
      Под Win все Ок.
      Delphi XE 10.2 Update 3
    • От zekelive
      Добрый день, друзья. Начал заниматься вопросом описанным в шапке и столкнулся со множеством непонятных для меня проблем. Как примерно должно выглядеть на Рис. ниже. Знаю, что сам список барабан выполнен в TlistBox. Есть хорошая ссылка на блог Ярослава тут. Пошерстил файлы в FMX, и не нашел ключа для своего дела. Может кто занимался этим? Я изначально брал TScrollBox, кидал на него Tlayout и в него TLabel. Но думаю, видимо не то совсем.

    • От Mars M
      Загружаю большой список в ListView, время загрузки где то 5-7 секунд.
      Это много, по этому переделал что бы список загружался динамически, как к концу пролистывается, подгружаются новые данные.
      Все бы хорошо, но вот ScrollBar при загрузке новых данных меняет размер и позицию. 
      Это не очень нравиться
      Можно как то заранее настроить его размер под конечное число итемов?
      Или может как то по другому сделать.
    • От Вадим Смоленский
      Компонент TScrollBox в VCL имеет свойства VertScrollBar и HorzScrollBar, каждое из которых, в свою очередь, снабжено свойством Increment, определяющим количество пикселей, перемещаемых при нажатии на кнопку прокрутки. В FMX я ничего похожего найти не смог. Есть ли способ поменять принятые по умолчанию установки?
    • От Barbanel
      Здравствуйте уважаемые,
      есть форма с множеством TEdit, при этом они не помещаются на один экран и помещена на TScrollBox.
      При скороллинге если скроллить нажимая на подложку (т.е. сам TScrollBox) все работает идеально, если же нажимать на сам TEdit и таким образом скроллить, то выезжает клавиатура, что вобщемто неудобно.
      Вопрос: как настроить приложение/форму/ТСкроллБокс так, чтобы при зажатии и движении пальца вверх/вниз на ТЕдите клавиатура не выезжала?
      На нативных приложениях описанного выше поведения я не замечал.
       
      Заранее спасибо!
       
    • От Gingercat
      Доброго времени суток. Заранее извиняюсь, за вероятно странный вопрос, но - как пользоваться padding-ом у VerticalScrollBox. Может чего не так делаю, но весьма странно - наружный margin работает, а вот padding. В хелпе ничего умного.
      Простейший пример VerticalScrollBox, внутри кнопка совершенно не реагирует на отступ. Игрался и с привязкой, и с анкорами - бесполезно. Кнопка дочерняя - что может быть не так? XE-7.
      Спасибо заранее за ответы
      PS - или понятие Padding отличается от привычного CSS-вского? Или кнопка не реагирует на подобные действия?
    • От Schekhovtsov
      Объясню чуть подробнее, пример смотреть в любом приложение с material design'ом (например, inbox). В скроллбоксе находится список и тулбар. При прокрутке вниз, тулбар вместе со списком уходит вверх за экран,но если немного вернуть список сверху, то тулбар сразу «приедет» обратно. Понятно объяснил? Можно такое провернуть на delphi?
    • От ivadimos
      При работе на Android ScrollBox заметно подлагивает. Если же сравнить со скроллингом контактов в телегрме, то разница очень ощутима.
      Кто-нибудь сталкивался с этой проблемой?
  • Последние посетители   0 пользователей онлайн

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

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