Скачать: CL | DM;

фон TProgressBar   Найти похожие ветки 

← →
Цукор5   (2008-09-19 12:34) [0]

При классической теме TProgressBar имеет серый фон. При других (WinXP) фон становится белым.
Как заставить TProgressBar  принимать фон формы ???

TProgressBar не имеет собственного цвета, а использует ParentColor для заливки внутренней области.
Положил его на TPanel, выставил ParentColor=True , но что-то эффект тот же(белый).

Прошу помощи !
Заранее спасибо

---

← →
Цукор5   (2008-09-19 12:52) [1]


type
 TProgressBar = class(ComCtrls.TProgressBar)
public
 property Color;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 TProgressBar(ProgressBar1).color:=clRed;
 ProgressBar1.Position:=42;
end;


Такой "трюк" работает в разных темах. Но при использовании TXPManifest эффект тот же. Белый фон.
Какие будут мысли ???

---

← →
{RASkov} ©   (2008-09-19 12:55) [2]

> [1] Цукор5   (19.09.08 12:52)
> Но при использовании TXPManifest эффект тот же

Потому что при использовании XPMan, некоторые контролы рисуются уже в другом месте и по своему, т.е. с учетом того самого манифеста. Он(манифест) для этого и придуман. Иначе уберай его и рисуй сам как хочешь...

---

← →
han_malign ©   (2008-09-19 15:13) [3]

ParentBackground

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c