| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
фон TProgressBar [D7, XP]
Цукор5 © (2008-09-19 12:34:00)При классической теме TProgressBar имеет серый фон. При других (WinXP) фон становится белым.
Как заставить TProgressBar принимать фон формы ???
TProgressBar не имеет собственного цвета, а использует ParentColor для заливки внутренней области.
Положил его на TPanel, выставил ParentColor=True , но что-то эффект тот же(белый).
Прошу помощи !
Заранее спасибо
han_malign (2008-09-19 15:13:00) [1]ParentBackground
{RASkov} (2008-09-19 12:55:00) [2]> [1] Цукор5 (19.09.08 12:52)
> Но при использовании TXPManifest эффект тот же
Потому что при использовании XPMan, некоторые контролы рисуются уже в другом месте и по своему, т.е. с учетом того самого манифеста. Он(манифест) для этого и придуман. Иначе уберай его и рисуй сам как хочешь...
Цукор5 (2008-09-19 12:52:00) [3]
type
TProgressBar = class(ComCtrls.TProgressBar)
public
property Color;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
TProgressBar(ProgressBar1).color:=clRed;
ProgressBar1.Position:=42;
end;
Такой "трюк" работает в разных темах. Но при использовании TXPManifest эффект тот же. Белый фон.
Какие будут мысли ???
| |
