Темы оформления (Styles)

Verevkin · Регистрация: 12.03.2015

Студворк — интернет-сервис помощи студентам

Как узнать цвет TProgressBar в текущем стиле оформления? В массиве цветов стандартных элементов этого значения нет, но где-то, ведь, он есть?

@D1973 · 14.04.2021, 14:17

А разве он, независимо от темы оформления, не имеет цвет, заданный где-то в ОС? (Проверить пока не на чем...)

Verevkin · 14.04.2021, 14:18 **[ТС]**

Сообщение от D1973

А разве он, независимо от темы оформления, не имеет цвет, заданный где-то в ОС? (Проверить пока не на чем...)

прислать прогу?

@D1973 · 14.04.2021, 14:35

Почему бы и нет, высылай... Все равно у компа со студией только завтра буду... Вот там и проверю...

Verevkin · 14.04.2021, 15:35 **[ТС]**

Сообщение от D1973

Почему бы и нет, высылай

Не думаю, что это поможет.

Verevkin · 15.04.2021, 14:05 **[ТС]**

Сообщение от D1973

Вот там и проверю...

ну и чаво? Результаты есть или ты забил?

DenNik · 15.04.2021, 14:34

Delphi
1
2
uses
  Vcl.Themes;

попробуй ковырнуть это

Delphi
1
StyleServices.GetElementColor()

Добавлено через 1 минуту
там в итоге задействован тип

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
type
  TThemedElement = (
    // Windows styles
    teButton,          // +
    teClock,           //
    teComboBox,        // +
    teDatePicker,      // new
    teEdit,            // +
    teExplorerBar,     //
    teFlyOut,          // new
    teHeader,          // +
    teLink,            // new
    teListView,        // +
    teMenu,            // +
    teMenuBand,        // new
    teMonthCal,        // new
    teNavigation,      // new
    tePage,            //
    teProgress,        // +
    teRebar,           // +
    teScrollBar,       // +
    teSpin,            //
    teStartPanel,      // +
    teStatus,          //
    teTab,             // +
    teTaskBand,        //
    teTaskBar,         // +
    teTaskDialog,      // new
    teTextStyle,       // new
    teToolBar,         // +
    teToolTip,         // +
    teTrackBar,        //
    teTrayNotify,      //
    teTreeview,        // +
    teWindow,          // +
    // VCL extensions
    teCategoryButtons,
    teCategoryPanelGroup,
    teCheckListBox,
    teControlBar,
    teDataNavButtons,
    teGrid,
    teHint,
    tePanel,
    teTabSet,
    teTextLabel,
    teMPlayerButtons
  );

Добавлено через 1 минуту
я сильно не юзал стили. использовал только
StyleServices.GetStyleFontColor();
при кастомной отрисовке таблицы со стилями

Verevkin · 15.04.2021, 14:45 **[ТС]**

Сообщение от DenNik

там в итоге задействован тип

Спасибо, бро.
Осталось разобраться с полями структуры TThemedElementDetails, которую принимает метод... Сижу гуглю.

@D1973 · 15.04.2021, 16:51

Сообщение от Verevkin

Результаты есть или ты забил?

Не, не забИл и не забЫл... Просто на месте сегодня так и не был...

Не по теме:

Думал, сегодня вернусь с командировки; оказалось даже не завтра - только в субботу вечером...

Verevkin · 15.04.2021, 17:07 **[ТС]**

Мне даже удалось отрисовать элемент прогрессбара на PaintBox, но метод StyleServices.GetElementColor() упорно не даёт этот цвет и возвращает false. ЧЯДНТ?

Verevkin · 15.04.2021, 20:32 **[ТС]**

DenNik, вся эта хрень, кстати, основана вот на этой проблеме. Помнишь, не? Ты участник был.

DenNik · 16.04.2021, 09:05

Verevkin, помню. Ты решил вручную рисовать ПБ?

Verevkin · 16.04.2021, 09:33 **[ТС]**

Сообщение от DenNik

Ты решил вручную рисовать ПБ?

Нет. Слишком много чести.
Я его заменил на левый компонент. Он хорош, но во всех темах выглядит одинаково. Я, почему-то, решил достать цвет прогресса текущей темы и присвоить этому компоненту, но вижу, что это не так просто.

Мож подскажешь альтернативу?

DenNik · 16.04.2021, 09:44

Сообщение от Verevkin

Мож подскажешь альтернативу?

Да хз.. ставить левый компонент?
Я вот, к примеру, ради IPEdit весь комбайн JEDi установил, хотя сперва хотел заморочиться и сделать свой

Verevkin · 16.04.2021, 09:54 **[ТС]**

Сообщение от DenNik

Да хз.. ставить левый компонент?

Я его пока и юзаю. Я имел в виду, мож ты знаешь, где взять такой прогрессбар, который бы меня устроил.

DenNik · 16.04.2021, 10:05

К сожалению,

@qwertehok · 17.04.2021, 16:38

Сообщение от DenNik

Я вот, к примеру, ради IPEdit весь комбайн JEDi установил, хотя сперва хотел заморочиться и сделать свой

а что тебе от него нужно? самый простой это 4 эдита на панели)))

Verevkin, AlphaSkin смотрел? там можно менять все элементы скинами и частями скинов

@TFullControl · 18.04.2021, 16:49

Сообщение от Verevkin

В массиве цветов стандартных элементов этого значения нет, но где-то, ведь, он есть?

Это потому, что там не сплошной цвет, там небольшой градиент имеется
от
rgb(37, 95, 120);
до
rgb(39, 84, 106);

@TFullControl · 18.04.2021, 17:02

И Carbon не юзает цвета для своего стиля, он юзает готовый битмап из которого по разметке берет нужный кусок изображения, вот его начинка, как раз ProgressBar выделил (сохранил в jpg так как форум bmp не хочет загружать)

@TFullControl · 18.04.2021, 17:08

Сам делфи этот цвет определяет как $00705A26

Новые блоги и статьи Все статьи Все блоги /
Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip

Verevkin Злостный нарушитель 10357 / 5777 / 1275 Регистрация: 12.03.2015 Сообщений: 26,696

	Темы оформления (Styles) 14.04.2021, 13:42. Показов 5252. Ответов 37 Метки style, theme (Все метки) Как узнать цвет TProgressBar в текущем стиле оформления? В массиве цветов стандартных элементов этого значения нет, но где-то, ведь, он есть? 0

@D1973 Модератор 9924 / 6460 / 2457 Регистрация: 21.01.2014 Сообщений: 27,411 Записей в блоге: 3
	14.04.2021, 14:17
	А разве он, независимо от темы оформления, не имеет цвет, заданный где-то в ОС? (Проверить пока не на чем...) 0

@D1973 Модератор 9924 / 6460 / 2457 Регистрация: 21.01.2014 Сообщений: 27,411 Записей в блоге: 3
	14.04.2021, 14:35
	Почему бы и нет, высылай... Все равно у компа со студией только завтра буду... Вот там и проверю... 0

Verevkin Злостный нарушитель 10357 / 5777 / 1275 Регистрация: 12.03.2015 Сообщений: 26,696
	15.04.2021, 17:07 [ТС]
	Мне даже удалось отрисовать элемент прогрессбара на PaintBox, но метод StyleServices.GetElementColor() упорно не даёт этот цвет и возвращает false. ЧЯДНТ? 0

Verevkin Злостный нарушитель 10357 / 5777 / 1275 Регистрация: 12.03.2015 Сообщений: 26,696
	15.04.2021, 20:32 [ТС]
	DenNik, вся эта хрень, кстати, основана вот на этой проблеме. Помнишь, не? Ты участник был. 0

DenNik Житель Земли 3004 / 3026 / 390 Регистрация: 26.07.2011 Сообщений: 11,465 Записей в блоге: 1
	16.04.2021, 09:05
	Verevkin, помню. Ты решил вручную рисовать ПБ? 0

DenNik Житель Земли 3004 / 3026 / 390 Регистрация: 26.07.2011 Сообщений: 11,465 Записей в блоге: 1
	16.04.2021, 10:05
	К сожалению, 0

@TFullControl 500 / 346 / 200 Регистрация: 20.10.2016 Сообщений: 1,101
	18.04.2021, 17:02
	И Carbon не юзает цвета для своего стиля, он юзает готовый битмап из которого по разметке берет нужный кусок изображения, вот его начинка, как раз ProgressBar выделил (сохранил в jpg так как форум bmp не хочет загружать) Миниатюры 0

@TFullControl 500 / 346 / 200 Регистрация: 20.10.2016 Сообщений: 1,101
	18.04.2021, 17:08
	Сам делфи этот цвет определяет как $00705A26 0