AUTOSIZE_delphi组件,亲测可用