Page 1 of 1
Regional & language options ...
Posted: Mon Oct 23, 2006 2:21 pm
by Rimantas
Hi !
How to detect from system what settings are for decimal symbol and digit grouping ? Any DLL or registry call ? It's some problem with other programs with that , so I'll be thankfull for any help .
With best regards !
Re: Regional & language options ...
Posted: Mon Oct 23, 2006 5:15 pm
by Rimantas
Rimantas wrote:Hi !
How to detect from system what settings are for decimal symbol and digit grouping ? Any DLL or registry call ? It's some problem with other programs with that , so I'll be thankfull for any help .
With best regards !
Hi , again !
I found solution for that . Sample :
Code: Select all
function read_reg()
local uVar
local aRet := {}
local oReg
#define HKEY_CURRENT_USER 2147483649
oReg := TReg32():New( HKEY_CURRENT_USER, "Control Panel\International" )
uVar := oReg:Get( "sMonDecimalSep", " " )
if uVar # NIL
aadd( aRet, uVar )
uVar := oReg:Get( "sMonThousandSep", " " )
aadd( aRet, uVar )
endif
oReg:Close()
return( aRet )
Works fine .
Regards !
Posted: Tue Oct 24, 2006 4:51 pm
by James Bott
Rimantas,
Thanks for posting your solution.
James
Posted: Wed Oct 25, 2006 3:58 am
by Rimantas
James Bott wrote:Rimantas,
Thanks for posting your solution.
James
Oh ! I did mistake
! After some test I found that this is correct :
Code: Select all
function read_reg()
local aRet := {}
local oReg := TReg32():New( 2147483649, "Control Panel\International" )
aadd( aRet, alltrim( oReg:Get( "sDecimal", " " ) ) )
aadd( aRet, alltrim( oReg:Get( "sThousand", " " ) ) )
oReg:Close()
return( aRet )
It must be sDecimal & sThousand .
Regards !