上学期学校开的DELPHI课,在课余时间自己写的程序,请大家指教。