Do sad su normalno radile procedure
procedure TMip1023.PromjenaSeparatoraUTacku;
const cs1 : pchar = 'Windows';
begin
SetLocaleInfo( LOCALE_SYSTEM_DEFAULT, LOCALE_SDECIMAL,'.');
SendMessage( HWND_BROADCAST, WM_SETTINGCHANGE, 0, LongInt(cs1));
end;
procedure TMip1023.PromjenaSeparatoraUZarez;
const cs1 : pchar = 'Windows';
begin
SetLocaleInfo( LOCALE_SYSTEM_DEFAULT, LOCALE_SDECIMAL,',');
SendMessage( HWND_BROADCAST, WM_SETTINGCHANGE, 0, LongInt(cs1));
end;
Sa poslednjim verzijama windowsa ne funkcionira.
Jel ima netko kakvu ideju?