Source position: flcUnicodeCodecs.pas line 1063
public function TIBM500Codec.EncodeChar(
const Ch: WideChar
):ByteChar; override;