一个简单的DELPHI程序设计