ChangeSeparator( ... ) August 20, 2021 04:31PM |
Admin Registered: 5 years ago Posts: 502 |
PROCEDURE FindDecimalSeparator() MAX_BUFFER_SIZE is 2-byte int=100 LOCALE_USER_DEFAULT is 4-byte int=1024 LOCALE_SMONDECIMALSEP is 4-byte int=22 mApiReturn is 4-byte int mBuffer is string mBufferSize is 4-byte int mBuffer = RepeatString(Charact(0),MAX_BUFFER_SIZE) mBufferSize = MAX_BUFFER_SIZE - 1 mApiReturn = CallDLL32("kernel32","GetLocaleInfoA",LOCALE_USER_DEFAULT,LOCALE_SMONDECIMALSEP,&mBuffer,mBufferSize) mBuffer = Left(mBuffer,mApiReturn - 1) RESULT mBuffer
Re: ChangeSeparator( ... ) August 21, 2021 01:03PM |
Registered: 5 years ago Posts: 216 |
Re: ChangeSeparator( ... ) August 23, 2021 07:14AM |
Admin Registered: 5 years ago Posts: 502 |
Re: ChangeSeparator( ... ) August 23, 2021 09:48AM |
Registered: 5 years ago Posts: 216 |