Solved

Get DEFAULT language used in the operating system

Posted on 2004-03-25
5
163 Views
Last Modified: 2010-04-05
Is there any way to get the default language used in the OS,
from the Registry.

Are there some registry key/value i can read it from?

Thank you.
0
Comment
Question by:visexpert
5 Comments
 
LVL 17

Accepted Solution

by:
mokule earned 25 total points
ID: 10679237
In Delphi
   SysLocale: TSysLocale
In Registry (what I know)
   HKEY_CURRENT_USER\Control Panel\International
   sLanguage
0
 
LVL 11

Assisted Solution

by:shaneholmes
shaneholmes earned 25 total points
ID: 10679546

var
  Ident: Integer;
  defaultLang: PChar;
const
  Size: Integer = 250;
begin
  GetMem(defaultLang, Size);
  Ident:=GetSystemDefaultLangID;
  VerLanguageName(Ident, defaultLang, Size);  
  showmessage(StrPas(defaultLang));
 FreeMem(defaultLang);
end;

Shane
0

Featured Post

Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
This video shows how to use Hyena, from SystemTools Software, to bulk import 100 user accounts from an external text file. View in 1080p for best video quality.
Email security requires an ever evolving service that stays up to date with counter-evolving threats. The Email Laundry perform Research and Development to ensure their email security service evolves faster than cyber criminals. We apply our Threat…

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question