From ea812a803e10cf17000c346a26b04f9a117b8444 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 20 Oct 2014 06:12:39 +0000
Subject: [PATCH] RxFPC - fix text TCurrencyEdit.ZeroEmpty = true

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3666 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/trunk/curredit.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/components/rx/trunk/curredit.pas b/components/rx/trunk/curredit.pas
index 5f74c14ec..ecd483632 100644
--- a/components/rx/trunk/curredit.pas
+++ b/components/rx/trunk/curredit.pas
@@ -657,6 +657,9 @@ function TCustomNumEdit.FormatDisplayText(Value: Extended): string;
 var
   Digits : integer;
 begin
+  if FZeroEmpty and (Value = 0) then
+    Result:=''
+  else
   if DisplayFormat <> '' then
     Result:=FormatFloat(DisplayFormat, Value)
   else