对话框用户界面程序的编写，如何向对话框控件联接数据成员及其实现机理，如何向对话框控关联控件类，如何利用对话框类的成员函数向控件发送消息和获取对话框控件的类指针，如何直接利用对话框控件类操纵对话框控件（发送消息和直接调用成员函数）。如何在程序运行时产生和销毁控件。对话框控件的几种操作方式的优劣比较分析。如何实现对话框的部分收缩和展开。如何让对话框上的文本框在程序启动后立即获得焦点，如何利用SetWindowLong改变窗口的回调函数，通过改变文本框的默认回车处理方式进行演示。实现多个输入文本框间通

孙鑫老师VC视频第七课代码：对话框用户界面程序的编写，如何向对话框控件关联数据成员及其实现机理，如何利用对话框类的成员函数向控件发送消息和获取对话框控件的类指针，如何直接利用对话框控件类操纵对话框控件（发送消息和直接调用成员函数）。如何在程序运行时产生和销毁控件。对话框控件的几种操作方式的优劣比较分析。如何实现对话框的部分收缩和展开。如何让对话框上的文本框在程序启动后立即获得焦点，如何利用SetWindowLong改变窗口的回调函数，通过改变文本框的默认回车处理方式进行演示。实现多个输入文本框间

hook function procedure HookWindow(hWnd: HWND) var Item: PItem begin if FindWindowProc(hWnd, HandleList) = nil then begin GetMem(Item,Sizeof(TItem)) Item.hWnd:= hWnd Item.Next:= HandleList Item.WndProc:= Pointer(Set