summaryrefslogtreecommitdiff
path: root/src/gui/gui_progressbar.pas
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-08-13 14:27:15 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-08-13 14:27:15 +0000
commit771222e593d87849688ee4a2c24da57f15cf21a5 (patch)
tree079a6eb8d8e8cef084003ef7893b47093aabb464 /src/gui/gui_progressbar.pas
parent857be647b8fc273516f2a62aca3ede20eb925c02 (diff)
downloadfpGUI-771222e593d87849688ee4a2c24da57f15cf21a5.tar.xz
* Minor adjustment to clSelection color value.
* Minor fix in TfpgProgressBar font color. * Added missing clipboard unit to GDI package.
Diffstat (limited to 'src/gui/gui_progressbar.pas')
-rw-r--r--src/gui/gui_progressbar.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gui/gui_progressbar.pas b/src/gui/gui_progressbar.pas
index 62ce123d..4717efaa 100644
--- a/src/gui/gui_progressbar.pas
+++ b/src/gui/gui_progressbar.pas
@@ -182,7 +182,7 @@ begin
begin
x := (Width - FFont.TextWidth(txt)) div 2;
y := (Height - FFont.Height) div 2;
- Canvas.SetColor(clSelectionText);
+ Canvas.SetTextColor(clText1);
Canvas.Font := FFont;
Canvas.DrawString(x, y, txt);
end;