Unicode-Beschreibung eines Zeichen auslesen

[stz]

so, also jetzt nochmal richtig:

Delphi-Quellcode:

function GetUName(cCodwW: WideChar; pBufferW: PWideChar): integer;
  stdcall; external 'getuname.dll';

function GetUnicodeName(code: WideChar): String;
var
  buffer: PWideChar;
begin
  GetMem(buffer, 256 * SizeOf(WideChar));
  try
    GetUName(code, buffer);
    Result := buffer;
  finally
    FreeMem(buffer, sizeof(buffer^));
  end;
end;

Anbei ein Bild von der Anwendung (ist bzw. wird ein Teil von MEdit).

Gruß
Malte