delphi 面向对象基础示例 接口，覆盖，重载多态，抽象 静态方法 匿名事件属性 属性封装 事件属性 调用其他单元的函数不加类名前缀 程序间互传消息获取其它程序句柄 结构体复制 结构体也可以封装 结构体也可以过程或函数 结构体也可以有构造函数 delphi forward 提前声明