自己用delphi写的,很不错的学习资料