procedure TForm1.FormCreate(Sender: TObject);
var
str: string;
n1, n2, n3: Integer;
begin
str := 'ABC';
n1 := Low(string); // 1
n2 := Low(str); // 1
n3 := High(str); // 3
// ShowMessageFmt('%d, %d, %d', [n1, n2, n3]);
end;
转载于:https://my.oschina.net/hermer/blog/319353