一个Delphi的小闹钟代码

Crlab公司用来连接MySQL数据库的控件-Crlab company used to connect MySQL database controls

说明：  千年登录器源码 网上资源 有兴趣的可以看看(Millennium Logger Source Online Resources)

人事档案管理，可运行的DELPHI源程序，对于初学者来说有很高的参考价值，-Personnel file management, source code can be run DELPHI, for beginners, has high reference value,

Delphi编程 通过程序自动生成Treeview控件中的节点-Delphi Treeview

Delphi 获取磁盘序号，获取序号非磁盘编号，也不是序列号。运行后的效果如图所示，应该是所选择的磁盘在我的电脑中的排列序号。 　　操作时，只需选择对应的盘符，然后单击按钮即可，请参见测试截图所示。

complete source code for teechart 7

Myn rat source code screen capture

一个简单的dll编写和dll调用，实用方便，给初学者看看！( )

TLsDirComboBox 及 TLsFileListView 是类似资源管理器 ( File Explorer ) 式样的加强版 TComboBox 构件-TLsDirComboBox and TLsFileListView is similar resource management (File Explorer) type of enhanced version TComboBox Component

Delphi 获取拖动到窗体中的文件的路径，这实际上是一个拖放打开文件的例子，这只不是其中的一个步骤，拖放打开是把文件拖放到本窗口中，直接打开该文件，而拖放得到路径是把文件的路径显示在窗口中，和打开文件其实难易程序是一样的。拖放后获取文件路径，代码如下： 　　procedure TForm1.FileIsDropped(var Msg: TMessage); 　　var 　　 NumFiles : longint; 　　 i : longint; 　　 FName : array[0..255] of char; 　　begin 　　 SetForegroundWindow(Handle); 　　 NumFiles := DragQueryFile(Msg.WParam,$FFFFFFFF,nil,0); 　　 for i := 0 to (NumFiles - 1) do 　　 begin 　　 DragQueryFile(Msg.WParam,i,FName,sizeof(FName)); 　　 Memo1.Lines.Add(FName); 　　 end; 　　end;