Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
 
cesium
0 / 0 / 0
Регистрация: 25.12.2013
Сообщений: 120
#1

Как изменить цвет ProgressBar - Delphi

27.02.2016, 19:36. Просмотров 1942. Ответов 35
Метки нет (Все метки)

Нашел в гугле

PostMessage(ProgressBar1.Handle, $0409, 0, clGreen);

Но куда вставлять эту строку или, может, есть другие способы?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.02.2016, 19:36
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Как изменить цвет ProgressBar (Delphi):

Как можно изменить цвет квадратиков ProgressBar?
Как можно изменить цвет квадратиков ProgressBar?

Как изменить цвет PageControl
вопрос в заголовке темы, помогите

Как изменить цвет фрагмента Label?
Как изменить цвет фрагмента Label (одного слова)? К примеру: Label1.Caption:=...

Как изменить цвет нарисованного отрезка?
Подскажите как изменить цвет уже нарисованного отрезка. Подскажите, что нужно...

Как изменить цвет фона TabSheet?
Есть PageControl, на котором размещено несколько TabSheet, нужно окрасить фон...

Как изменить цвет элементов матрицы?
Как изменить цвет элементов матрицы? только не всех элементов,а...

35
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
27.02.2016, 22:16 #21
Есть!!! Перейдите на форму,кликните по ней дважды мышью или в инспекторе объектов выберите событие "OnCreate"!!
Вы в архив смотрели?
0
cesium
0 / 0 / 0
Регистрация: 25.12.2013
Сообщений: 120
27.02.2016, 23:31  [ТС] #22
Получилось, спасибо. А как сделать другой цвет при "остановке работы" в моей программе(теперь при любом действии процесс зеленый).
0
qwertehok
2195 / 2185 / 597
Регистрация: 29.08.2013
Сообщений: 14,593
27.02.2016, 23:36 #23
clGreen ни на что не наводит?
0
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
27.02.2016, 23:39 #24
Цитата Сообщение от cesium Посмотреть сообщение
как сделать другой цвет при "остановке работы" в моей программе
назначить соответствующий цвет после выполнения конкретной операции.

См. цветовые константы в Delphi
0
cesium
0 / 0 / 0
Регистрация: 25.12.2013
Сообщений: 120
27.02.2016, 23:54  [ТС] #25
Хорошо, а как в текст программы вставить определенный символ, который он не распознает. Знаю, что например так:Form.Caption := #$394#$3A0 + Form.Caption;
Но мне надо вставить этот текст в MainMenu.
0
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
27.02.2016, 23:57 #26
cesium, поставьте одну из последних версий Delphi с поддержкой юникода.
0
cesium
0 / 0 / 0
Регистрация: 25.12.2013
Сообщений: 120
28.02.2016, 00:11  [ТС] #27
Цитата Сообщение от droider Посмотреть сообщение
поставьте одну из последних версий Delphi с поддержкой юникода.
на 7 windows проблематично поставить делфи вообще) И так с горем пополам поставил какой-то. Других способов нету?

Добавлено через 4 минуты
может можно как-то создать текстовый документ и там записать символы, а кодом направить на открытие этих символов?
0
unifikator
490 / 348 / 229
Регистрация: 29.03.2015
Сообщений: 675
28.02.2016, 07:45 #28
Других способов нет. И с помощью текстового документа тоже не получится.
0
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
28.02.2016, 18:14 #29
Цитата Сообщение от cesium Посмотреть сообщение
на 7 windows проблематично поставить делфи вообще
старая сказка. Delphi всегда ставится без проблем, хоть на Windows 10.
Цитата Сообщение от cesium Посмотреть сообщение
с горем пополам поставил какой-то
В этом проблема, а не в Delphi
0
AHBAR
238 / 238 / 167
Регистрация: 05.04.2013
Сообщений: 1,099
28.02.2016, 18:45 #30
cesium,
Цитата Сообщение от cesium Посмотреть сообщение
Поставил так, но progressbar все равно синего цвета.
кинь компонент XPManifest на форму
0
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
28.02.2016, 19:11 #31
Цитата Сообщение от AHBAR Посмотреть сообщение
кинь компонент XPManifest на форму
Это лишнее. Вопрос уже закрыт
Цитата Сообщение от cesium Посмотреть сообщение
Получилось, спасибо
Вы не прочитали тему до конца.
0
артист
94 / 20 / 20
Регистрация: 17.09.2014
Сообщений: 1,184
Завершенные тесты: 2
13.11.2017, 21:31 #32
Почему-то не хочет меняться цвет:

Delphi
1
2
3
4
5
procedure TForm1.OnMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  Progressbar1.Brush.Color := clWindow;
  SendMessage(ProgressBar1.Handle, PBM_SETBARCOLOR, 0, rgb(255, 153, 0));
end;
Зарегал на ProgressBar1.

Когда ставил код просто перед его показом - работало, но криво.
Цвет менялся только со второго раза, и не всегда.
0
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
14.11.2017, 09:38 #33
артист, я уже давал эту сслыку в данной теме. Еще раз http://www.cyberforum.ru/delphi-beginners/thread919499-page2.html

Добавлено через 2 минуты
для старших версий см. код от volvo.
1
артист
94 / 20 / 20
Регистрация: 17.09.2014
Сообщений: 1,184
Завершенные тесты: 2
14.11.2017, 17:39 #34
А как выключить темы оформления?
0
qwertehok
2195 / 2185 / 597
Регистрация: 29.08.2013
Сообщений: 14,593
14.11.2017, 20:04 #35
для какой версии Delphi?
1
droider
Universal
Эксперт Pascal/Delphi
4384 / 2432 / 762
Регистрация: 04.10.2012
Сообщений: 8,847
14.11.2017, 20:47 #36
Цитата Сообщение от артист Посмотреть сообщение
как выключить темы оформления?
Зайти в меню проекта: Project > Options > Application. Снять галочку с опции "Enable Runtime Themes".

Добавлено через 3 минуты
Volvo здесь уже даже отвечал на этот вопрос http://www.cyberforum.ru/delphi-begi...l#post11711154
1
14.11.2017, 20:47
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.11.2017, 20:47
Привет! Вот еще темы с решениями:

Как изменить шрифт и цвет заголовка окна?
Помогите, пожалуйста, мне надо изменить цвет и шрифт заголовка окна. Это можна...

Как изменить цвет Border и его размер
Подскажите, как изменить цвет синей строки вверху окна и ее размер.

Как изменить цвет фона (BackColor) в TMainMenu?
Добрый день. Кто знает, как изменить задний цвет (BackColor) в TMainMenu? Чтобы...

Как в StringGrid1 изменить цвет строки или столбца
Нужно изменить цвет именно самих ячеек, а не текста, но не получается. ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
36
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru