🚀 go-pugleaf

It is returning a value >0 so i am assuming it supposed to be working, but i 
have a euro friend that says it doesn't..

here's the actual code i am using.
SetToDecimal check is done on opening the app.
usingeuro determines whether the SetToComma function is called on closing 
app.

void __fastcall TMainForm::SetToDecimal(void)
{

   char buff [100];
    GetLocaleInfo(MAKELCID(MAKELANGID(LANG_NEUTRAL, 
SUBLANG_NEUTRAL),SORT_DEFAULT),
                     LOCALE_SDECIMAL,buff,100);
   if(StrPas(buff) == ",")
          {
       if(!SetLocaleInfo(MAKELCID(MAKELANGID(LANG_NEUTRAL, 
SUBLANG_NEUTRAL),SORT_DEFAULT),
                      LOCALE_SDECIMAL,"."))
       ShowMessage("Unable to set correct decimal settings.");
       SendMessage (HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0);
       usingeuro = true;
          }
}

void __fastcall TMainForm::SetToComma(void)
{
    char buff [100];
    GetLocaleInfo(MAKELCID(MAKELANGID(LANG_NEUTRAL, 
SUBLANG_NEUTRAL),SORT_DEFAULT),
                     LOCALE_SDECIMAL,buff,100);
   if(StrPas(buff) == ".")
          {
       SetLocaleInfo(LOCALE_USER_DEFAULT,LOCALE_SDECIMAL,",");
       usingeuro = false;
          }
     SendMessage (HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0);
}

thanks