[Uniq!]

StrToInt(str: string) проглатывает всё что имеет пачку нулей перед собой.
Т.е. StrToInt('0000000000002') вернёт двойку.

Если прикрутить сюда ещё Length('0000000000002') можно всегда узнать количество нулей, и само число.