Changeset 390 for trunk/src/helpers/nls.c

Timestamp:

May 30, 2011, 5:44:18 PM (14 years ago)

Author:

pr

Message:

Add nlsThousandsLong to fix signed/unsigned display error.

File:

• trunk/src/helpers/nls.c (modified) (2 diffs)

trunk/src/helpers/nls.c

@@ -22 +22 @@
 
 /*
- *      Copyright (C) 1997-2010 Ulrich M”ller.
+ *      Copyright (C) 1997-2011 Ulrich M”ller.
  *      This file is part of the "XWorkplace helpers" source package.
  *      This is free software; you can redistribute it and/or modify
@@ -762 +762 @@
 
 /*
+ *@@ nlsThousandsLong:
+ *      signed version of above.
+ *
+ *@@added WarpIn V1.0.20 (2011-05-30) [pr]
+ */
+
+PSZ nlsThousandsLong(PSZ pszTarget,       // out: decimal as string
+                     LONG l,              // in: decimal to convert
+                     CHAR cThousands)     // in: separator char (e.g. '.')
+{
+    CHAR    szTemp[30];
+    USHORT  ust = 0,
+            uss,
+            usLen = sprintf(szTemp, "%ld", l);
+
+    for (uss = 0;
+         uss < usLen;
+         uss++)
+    {
+        if (uss)
+            if (((usLen - uss) % 3) == 0)
+            {
+                pszTarget[ust] = cThousands;
+                ust++;
+            }
+
+        pszTarget[ust++] = szTemp[uss];
+    }
+
+    pszTarget[ust] = '\0';
+
+    return pszTarget;
+}
+
+/*
  *@@ nlsThousandsDouble:
  *      like nlsThousandsULong, but for a "double"