delphi7源码100例，适合初学者使用。