delphidirectui做界面的一个例子，源码版，支持Unicode。