summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2012-02-21 16:13:44 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2012-02-21 16:13:44 +0200
commit13bb0967c7b6d94a6064c706a7a100f067026cd4 (patch)
tree7f2897b52209d6fc1257935a31539ab6916a3da2
parent1afe8cae42b4b5efc2049c589054b0f86d633b54 (diff)
downloadfpGUI-13bb0967c7b6d94a6064c706a7a100f067026cd4.tar.xz
merge with previous commit.
-rw-r--r--src/gui/fpg_edit.pas4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/gui/fpg_edit.pas b/src/gui/fpg_edit.pas
index 6ac32112..fe52655b 100644
--- a/src/gui/fpg_edit.pas
+++ b/src/gui/fpg_edit.pas
@@ -1830,8 +1830,10 @@ procedure TfpgBaseNumericEdit.SetTextColor(const AValue: TfpgColor);
begin
if FTextColor = AValue then
Exit; //==>
- FTextColor := AValue;
+ { Existing value might be negative so we must selectively change the
+ FTextColor values }
FOldColor := AValue;
+ AdjustColorForNegativeValues;
Repaint;
end;