HyperLink
Bejelentkezés
E-mail: 
Jelszó: 





Skip Navigation Links
 

Operációs rendszer nyelvét meghatározó komponens


Példaprogram letöltése

4204 bájt

Sok program esetében szükséges lehet az az információ, hogy aktuálisan milyen nyelvű operációs rendszeren fut. Ennek könnyű és gyors eldöntéséhez hozzunk létre most egy komponenst, melyet igen egyszerű használni: csak fel kell tenni egy Form-ra és kiolvasni a DefaultLanguage property-ből ezt az információt.

A mellékelt példaprogram megnyitása előtt a SystemLanguage.pas-ban lévő komponenst telepítenie kell a Delphi alá. Ehhez válassza a Component - Install Component menüpontot.
A komponensben létrehozott DefaultLanguage property-hez készítünk egy read metódust GetDefaultLanguage névvel. Amikor tehát a property értéke kiolvasásra kerül, akkor meghívásra kerül ez a függvény, ahol meghatározhatjuk az adott nyelvet.
Ehhez a VerLanguageName függvényt használjuk, mely képes egy nyelvi azonosító alapján a kódhoz tartozó nyelvet szövegesen visszaadni. A kódot a GetSystemDefaultLangID függvény szolgáltatja, mely az operációs rendszer nyelvéhez tartozó kódot adja.
function TSystemLanguage.GetDefaultLanguage: string;
var
  lang: PChar;
begin
  GetMem(lang, 100);
  VerLanguageName(GetSystemDefaultLangID, lang, 100);
  result:=lang;
  FreeMem(lang);
end;

Könyv
Ez a cikk megtalálható ebben a könyvben: Delphi Software Offline 2002 évkönyv 365. oldal

Felhasználási feltételek
A Software Online szoftverfejlesztői magazin mindegyik cikke, minden megjelent képe, és egyéb publikált anyaga szerzői jog védelme alatt áll! Bármilyen formában történő másodlagos terjesztésük, közzétételük vagy felhasználásuk kizárólag a kiadó előzetes írásbeli engedélyével történhet!

Copyright © 1999-2012 Animare Software Kft. Minden jog fenntartva!
| Készült: Animare Stúdió | Adatvédelem | Kapcsolat |