找了好久才找到delphi实例大全源代码，拿出来与大家分享。