2019独角兽企业重金招聘Python工程师标准>>>
function GetNBytesChar(s: Ansistring; n: Integer): string;
var
aStr: AnsiString;
bStr: WideString;
begin
aStr := Copy(s, 1, n);
bStr := aStr;
if aStr = bStr then
Result := astr
else
Result := Copy(s, 1, n-1);
end;