简易版的HIS，delphi源码，供学习之用。