Farbe einer TProgressbar ändern |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Die Farbe des Fortschrittsbalken einer TProgressbar lässt sich nicht im Objektinspektor einstellen. Nur über eine bestimmte Botschaft lässt sich die Farbe der Progressbar ändern:
uses
CommCtrl;
procedure TForm1.Button1Click(Sender: TObject);
begin
ProgressBar1.Perform(PBM_SETBARCOLOR, 0, clRed);
end;
In diesem Beispiel wird der Fortschrittsbalken rot gefärbt.In älteren Delphi-Versionen ist die Konstante PBM_SETBARCOLOR noch nicht deklariert. Die Konstante hat den Wert $0409.
Ähnliche Seiten: