summaryrefslogtreecommitdiff
path: root/src/gui/fpg_edit.pas
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2010-10-15 12:08:40 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-10-15 12:08:40 +0200
commite042d56b6bd9b2f2c49368919162e032be1b8808 (patch)
treedea993cbd98fbe0a53f944f3942a95c4a2747ae2 /src/gui/fpg_edit.pas
parent820ec55546aafe702e692d5c5e4f28d82ecaf162 (diff)
downloadfpGUI-e042d56b6bd9b2f2c49368919162e032be1b8808.tar.xz
BaseNumericEdit NegativeColor property was used instead of field variable.
The property does more that just set the color. It calls FormatEdit, which changes the color of TextColor property. This meant the parent color was never stored in FOldColor field variable.
Diffstat (limited to 'src/gui/fpg_edit.pas')
-rw-r--r--src/gui/fpg_edit.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/gui/fpg_edit.pas b/src/gui/fpg_edit.pas
index 25a31a1d..f6c7e6b4 100644
--- a/src/gui/fpg_edit.pas
+++ b/src/gui/fpg_edit.pas
@@ -1803,8 +1803,8 @@ begin
FAlignment := taRightJustify;
FDecimalSeparator := DecimalSeparator;
FThousandSeparator := ThousandSeparator;
- NegativeColor := clRed;
- OldColor := TextColor;
+ FNegativeColor := clRed;
+ FOldColor := TextColor;
end;
{ TfpgEditInteger }