怎么让Edit自增+1 很简单的有关问题 唉

如何让Edit自增+1 很简单的问题 唉!Edit中初始数据是:00000001当我点Button时如何让它变成00000002、000000

如何让Edit自增+1 很简单的问题 唉!
Edit   中初始数据是:00000001
当我点Button   时如何让它变成00000002、00000003、00000004。。。

[解决办法]
Edit1-> Text=IntToStr(StrToInt(Edit1-> Text)+1);