diff options
author | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2017-09-01 10:54:07 +0000 |
---|---|---|
committer | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2017-09-01 10:54:07 +0000 |
commit | 88605298ec67adc6f266add3057a6a18187f6f9b (patch) | |
tree | 42ab9d85d76847a3e2bb58f7be5b9d6ad21cfa64 | |
parent | ad965bdd6935ec6deac1bad27229b6b36645c0db (diff) | |
download | fpc-88605298ec67adc6f266add3057a6a18187f6f9b.tar.gz |
--- Merging r35203 into '.':
U rtl/objpas/sysutils/sysstr.inc
--- Recording mergeinfo for merge of r35203 into '.':
U .
# revisions: 35203
git-svn-id: https://svn.freepascal.org/svn/fpc/branches/fixes_3_0@37097 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r-- | rtl/objpas/sysutils/sysstr.inc | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rtl/objpas/sysutils/sysstr.inc b/rtl/objpas/sysutils/sysstr.inc index 1e63437400..8f6ce90647 100644 --- a/rtl/objpas/sysutils/sysstr.inc +++ b/rtl/objpas/sysutils/sysstr.inc @@ -1134,6 +1134,7 @@ Begin P:=Pos(FormatSettings.DecimalSeparator,S); If (P<>0) Then S[P] := '.'; + s:=Trim(s); try case ValueType of fvCurrency: |