09 2009 档案

DELPHI IDHTTP下载
摘要：type THttpThread = class(TThread) private FIdHTTP: TIdHTTP; FUrl: string; FSavePath: string; procedure Down(Url: string; SavePath: string); public constructor Create(CreateSuspended: Boolean; Url: str... 阅读全文
posted @ 2009-09-30 14:57 谭志宇 阅读(2209) 评论(0) 推荐(0) 编辑
套接字（TCP）
摘要：[代码] 阅读全文
posted @ 2009-09-26 23:53 谭志宇 阅读(175) 评论(0) 推荐(0) 编辑
内存池
摘要：[代码] 阅读全文
posted @ 2009-09-25 15:42 谭志宇 阅读(207) 评论(0) 推荐(0) 编辑
服务DEMO
该文被密码保护。
posted @ 2009-09-24 09:01 谭志宇 阅读(0) 评论(0) 推荐(0) 编辑
服务中取系统当前用户名
该文被密码保护。
posted @ 2009-09-23 16:20 谭志宇 阅读(4) 评论(0) 推荐(0) 编辑
动态注册OCX
摘要：Delphi中Ocx的动态注册方法方法1uses windows;type TDllRegisterServer = function: HResult; stdcall;function RegisterOCX(FileName: string): Boolean;var OCXHand: THandle; RegFunc: TDllRegisterServer;begin OCXHand :=... 阅读全文
posted @ 2009-09-23 08:49 谭志宇 阅读(880) 评论(0) 推荐(0) 编辑
DELPHI 常用文件路径
摘要：1 获得上级目录IncludeTrailingPathDelimiter(const S:String):String和IncludeTrailingBackslash是同样功能，不过根据delphi的帮助，我们现在应该使用IncludeTrailingPathDelimiter才对，前者只是为了向前兼容才保留的这个函数是将参数S提供的一个表示路径的末尾加上“\”符（如果是... 阅读全文
posted @ 2009-09-22 15:04 谭志宇 阅读(579) 评论(0) 推荐(0) 编辑
注册表操作
摘要：1 判断是否有键值（默认）var Reg: TRegistry;begin Reg := TRegistry.Create; Reg.RootKey := HKEY_LOCAL_MACHINE; Reg.OpenKey('SOFTWARE\RegisterFlags', False); if not Reg.ValueExists('Useid') then Reg.WriteInteger('U... 阅读全文
posted @ 2009-09-18 16:55 谭志宇 阅读(145) 评论(0) 推荐(0) 编辑
7种常用p2p共享协议
摘要：一、Napster：第一个大型的；中央集中式；倒闭了；二、Gnutella和Gnutella2：开源的；第一个真正非中心的。Gnutella2是对Gnutella的改进和扩展。三、FastTrack：第一个客户端是KazaA。协议与Gnutella类似。02－03年的最大用户网，05年退至第三名。衰退原因是这个网络无法应对众多用户同时使用，而且有版权拥有者polluation的行为，以及间谍软件的... 阅读全文
posted @ 2009-09-16 16:02 谭志宇 阅读(3203) 评论(0) 推荐(0) 编辑
快速排序（一个数组先做偶数排序后做奇数排序）
摘要：[代码]思路： 先用快速排序把偶数排前边，奇数排后边，这里只用快速排序算法第前半部分就可以完成一次遍历第2步是就是调用常规快速排序了 阅读全文
posted @ 2009-09-16 10:56 谭志宇 阅读(2024) 评论(1) 推荐(0) 编辑
动态数组和指针转换（DELPHI）
摘要：[代码] 阅读全文
posted @ 2009-09-16 10:52 谭志宇 阅读(1270) 评论(1) 推荐(1) 编辑
服务提升权限改注册表
该文被密码保护。
posted @ 2009-09-16 10:47 谭志宇 阅读(0) 评论(0) 推荐(0) 编辑
XML读写
摘要：[代码] 阅读全文
posted @ 2009-09-14 16:00 谭志宇 阅读(196) 评论(0) 推荐(0) 编辑
创建桌面快捷方式(1 类IE图标方式 2 普通快捷方式 3 根据快捷方式取路径)
该文被密码保护。
posted @ 2009-09-14 15:56 谭志宇 阅读(0) 评论(0) 推荐(0) 编辑
遍历修改INI文件
摘要：[代码] 阅读全文
posted @ 2009-09-14 10:59 谭志宇 阅读(574) 评论(0) 推荐(0) 编辑
多线程状态(DELPHI)
摘要：首先要明确,当线程处于Sleep(Suspended)状态下时,你需要唤醒(Resume),但是此时可能存在三种情况: 一、该线程对象不存在(Not Assigned),那么就需要明确是否需要再创建该线程对象,如果不需要,可能得抛出异常,给操作员或者主操作函数/过程一个异常(Exception); 二、该线程对象存在但是线程执行体已经结束执行，此时就需要进行CloseHandle(实际上使用TT... 阅读全文
posted @ 2009-09-13 13:25 谭志宇 阅读(1198) 评论(0) 推荐(0) 编辑
依次查找同类控件
摘要：handle1:=FindWindowEx(form1.handle,0,'TEdit',nil); handle2:=GetWindow(handle1,GW_HWNDNEXT); handle3:=GetWindow(handle2,GW_HWNDNEXT); 以此类推 阅读全文
posted @ 2009-09-12 05:15 谭志宇 阅读(135) 评论(0) 推荐(0) 编辑
DELPHI服务操作代码单元
该文被密码保护。
posted @ 2009-09-07 15:06 谭志宇 阅读(2) 评论(0) 推荐(0) 编辑
加密单元
该文被密码保护。
posted @ 2009-09-03 18:44 谭志宇 阅读(5) 评论(0) 推荐(0) 编辑
网络拓展单元（DELPHI）
该文被密码保护。
posted @ 2009-09-03 18:35 谭志宇 阅读(4) 评论(0) 推荐(0) 编辑
IO操作类
该文被密码保护。
posted @ 2009-09-03 17:41 谭志宇 阅读(5) 评论(0) 推荐(0) 编辑
下载函数
该文被密码保护。
posted @ 2009-09-03 11:40 谭志宇 阅读(4) 评论(0) 推荐(0) 编辑
拓展的注册表函数
该文被密码保护。
posted @ 2009-09-03 10:59 谭志宇 阅读(2) 评论(0) 推荐(0) 编辑
检查网络连接
该文被密码保护。
posted @ 2009-09-02 17:08 谭志宇 阅读(0) 评论(0) 推荐(0) 编辑
拓展的异常类
摘要：[代码] 阅读全文
posted @ 2009-09-02 11:49 谭志宇 阅读(125) 评论(0) 推荐(0) 编辑
硬件信息
该文被密码保护。
posted @ 2009-09-01 18:12 谭志宇 阅读(2) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示