Delphi中TVarRec与varArray数组如何改写为长尾?