delphi7 unit1 中写增加代码后面的会自动删除。就像word的改写模式。