1 2 3 4 5 6
function MB_CUR_MAX : longint; { return type might be wrong } begin MB_CUR_MAX:=__ctype_get_mb_cur_max; end;