Provaz.cz
Reklama
Server
Delphi
PHP
Java script
 
Zvýraznění syntaxe
 
 
 
Makra PRIMARYLANGID, SUBLANGID a MAKELANGID
SekceProgramování - Delphi - Příklady
Klíčová slova: macro, PRIMARYLANGID, SUBLANGID, MAKELANGID, API
Obtížnost: 3

Pokud jste někdy narazili na potřebu využít v Delphi makra PRIMARYLANGID, SUBLANGID nebo MAKELANGID přináším vám přepis těchto maker. Původní zdroj těchto maker naleznete také na community.borland.com .

 

// makro PRIMARYLANGID
function PRIMARYLANGID(lgid : Word) : LongInt;
begin
  result := lgid and $3FF;
end;

// makro SUBLANGID
function SUBLANGID(lgid : Word) : LongInt;
begin
  result := lgid shr 10;
end;

// makro MAKELANGID
function MAKELANGID(sPrimaryLanguage : Word; sSubLanguage : Word) : Word;
begin
  result := (sSubLanguage shl 10) or sPrimaryLanguage;
end;

Zdroj: community.borland.com .
 

Datum akt.: 07.09.2006
Zobrazení: 2149/1243 (celkem/unikátních)