Convertir caracteres de chino simplificado a tradicional



Existen 2 juegos de caracteres chinos: el simplificado y el tradicional.
Desde la revolución cultural china, los caracteres tradicionales se han simplificado (ya que son más fáciles de dibujar y de leer). El chino simplificado es el que se usa actualmente, mientras que el tradicional se utiliza en Hong-Kong y Taïwan.
En nuestro caso el truco está en utilizar la función LCMapStringW (unit Windows)

El código sería el siguiente:
function SimplificadoATradicional(Str:Widestring):Widestring;
begin
SetLength(Result,Length(Str));
LCMapStringW($404,LCMAP_TRADITIONAL_CHINESE,
PWideChar(Str),Length(Str),
PWideChar(Result),Length(Result));
Result:=Result;
end;

function TradicionalASimplificado(Str:Widestring):Widestring;
begin
SetLength(Result,Length(Str));
LCMapStringW($804,LCMAP_SIMPLIFIED_CHINESE,
PWideChar(Str),Length(Str),
PWideChar(Result),Length(Result));
end;

1 comentario:

  1. y para los que no hemos estudiado informatica, eso como se usa?

    ResponderEliminar