s := IntToStr(a);===============================================补充,直接赋值当然不行,Pascal是强类型检测的。上面的函数就是将整数转换为字符串的函数。
chr(a div 10000)chr((a div 1000)mod 10)chr((a div 100)mod 100)chr((a div 10)mod 1000)chr(a mod 1000)每项+起来就行了