delphi实现数字和字母组合的字符串数字部分解决数值型长度不够时加1