delphi 面向对象实用技能教学二,封装

面向对象编程手法,是一项综合技能,单独把谁拿出来说都不合适。本次重写 TSimpleThread ,使其能在 D7 下运行。

基于 TSimpleThread ,重磅推出 TSimpleUI.ExeProcInMainThread ,命名更精准,消除使用时的疑惑。详情如下:

1.TSimpleThread ,本博客线程教程中,已详细介绍。

2.TSimpleUI , 在 UI Thread 或称之为 MainThread 中执行 Proc 。

3.TManagementBase , 管理基类,用于编写线程程序,在此类中实现了 ThreadDispMsg(AMsg:string) 。

4.TElegantThread , 提供 Synchronize, Queue 函数来执行 Proc ,就是把 Proc 塞入线程中来执行。(未写实例)

本例演示,封装,让界面上的代码最少化。用事件传递参数,用List保存参数,何时释放 Pointer 等等

本例源代码下载(delphi7)