Nº de decimales de config. regional de Panel de Control

[ciscu]

Hola a todos y feliz Halloween!

Veréis tengo un problema y a ver si podéis solucionarlo. Delphi tiene una función para reconocer los decimales que tiene la moneda, que se llama CurrencyDecimals, pero el problema es encontrar la función que supuestamente tiene Delphi para reconocer el nº de decimales para números "normales".

Es un poco urgente saberlo, pero en fin ... gracias de antemano.

[delphi.com.ar]

Aclaremos que CurrencyDecimals no es una función, es una variable que se carga en el initialization de la unit SysUtils.

Lo que tu quieres, puedes conseguirlo de esta manera:

GetLocaleStr(GetThreadLocale, LOCALE_IDIGITS, '0')

(No se si en alguna versión superior al Delphi 5, ha aparecido una nueva variable con este valor)

Saludos!