ThemeExplorer

1,FlashWindow(Application.Handle, True) 让主程序在任务栏上的图标闪烁 2,FlashWindow(form.Handle, True) 让指定的form状态栏闪烁 3，对于在任务栏上没有图标的form，比如form2可以用下面这个过程模拟一下， procedure CreateParams(var Params: TCreateParams) override procedure TForm2.CreateParams(var Params: TCreateParams) begin inherited Params.WndParent := 0 //此段代码的意思是使窗口显示在任务栏中 end 此时FlashWindow(form2.Handle, True) 让form2在任务栏上的图标就会闪烁 (delphil flashform)

趣味拼音体汉字转拼音软件源码，Delphi 编程学习源码，很好的参考资料。(Fun Pinyin Chinese characters to Pinyin software source code, Delphi programming learning source, a good reference.)

vedos sockets used to make simple voice/video chat programs.

vc++中实现自动注册控件和卸载控件，测试通过，可直接调用程序。(vc++ in the automatic registration control and unloading control, test, call the program directly.)

socket 实现UDP通信 Delphi源码(socket UDP Delphi)

说明：  DarkATLSmtp(SMTP COM 组件原创代码),注册后可在Delphi中发邮件。(source code of smtp com object )

本人写的delphi例子，第一次写，请多指教(I write delphi example, the first writing, please enlighten)

listview 的使用 delphi 下打印listview 列表中的内容(listview and Printers Printer.GetPrinter(aDevice, aDriver, aPort, hDevMode) if hDevMode <> 0 then begin // 获取指向DeviceMode的指针 pDevMode := GlobalLock(hDevMode) if pDevMode <> nil then)

说明：  尺度控件. 本人精版 Ruler, Scale control. I refined version of Ruler(Scale control. I refined version of Ruler)

Delphi AE开发基本操作功能，包含放大、缩小、平移等常用工具 Delphi AE开发基本操作功能，包含放大、缩小、平移等常用工具(Delphi AE development of the basic operating functions, including zoom, pan and other commonly used tools for Delphi AE development of the basic operating functions, including zoom, pan and other commonly used tools for)