diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-10-15 12:08:40 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-10-15 12:08:40 +0200 |
commit | e042d56b6bd9b2f2c49368919162e032be1b8808 (patch) | |
tree | dea993cbd98fbe0a53f944f3942a95c4a2747ae2 /src/gui/fpg_edit.pas | |
parent | 820ec55546aafe702e692d5c5e4f28d82ecaf162 (diff) | |
download | fpGUI-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.pas | 4 |
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 } |