-
mysql的替换函数replace()实现mysql替换字符串，很好用
Apr252013
-
关于Environ函数
Feb122009
我们经常接触的获取路径的API有GetWindowsDirectory()、GetSystemDirectory()，但是还有一个API叫SHGetFolderPath很少有人用，它可获取的系统路径更多，例如：
Option ExplicitPrivate Const MAX_PATH = 260
‘Return Values
Private Const S_FALSE = &H1
Private Const E_INVALIDARG = &H80070057‘Flags
Private Const SHGFP_TYPE_CURRENT = 0 ‘ current value for user, verify it exists
Private Const SHGFP_TYPE_DEFAULT = 1 ‘ default value, may not exist‘nFolder Value
阅读全文
Private Const CSIDL_DESKTOP = &H0 ‘
Private Const CSIDL_INTERNET = &H1 ‘ Internet Explorer (icon on desktop)
Private Const CSIDL_PROGRAMS = &H2 ‘ Start Menu\Programs
Private Const CSIDL_CONTROLS = &H3 ‘ My Computer\Control Panel
Private Const CSIDL_PRINTERS = &H4 ‘ My Computer\Printers
Private Const CSIDL_PERSONAL = &H5 ‘ My Documents
Private Const CSIDL_FAVORITES = &H6 ‘ \Favorites
Private Const CSIDL_STARTUP = &H7 ‘ Start Menu\Programs\Startup
Private Const CSIDL_RECENT = &H8 ‘ \Recent
Private Const CSIDL_SENDTO = &H9 ‘ \SendTo
-
reg命令使用详解
Feb122009
编辑注册表不当可能会严重损坏您的系统。在更改注册表之前，应备份计算机上任何有价值的数据。
只有在别无选择的情况下，才直接编辑注册表。注册表编辑器会忽略标准的安全措施，从而使得这些设置会降低性能、破坏系统，甚至要求用
户重新安装 Windows。可以利用“控制面板”或“Microsoft 管理控制台 (MMC)”中的程序安全更改多数
注册表设置。如果必须直接编辑注册表，则请首先将其备份。
使用 Reg 直接编辑本地或远程计算机的注册表。这些更改有可能造成计算机无法操作并需要重新安装操
作系统。所以不要直接编辑注册表，而
应尽可能利用“控制面板”或“Microsoft 管理控制台 (MMC)”更改注册表。
有些操作可以查看或配置本地或远程计算机的注册表项，而另外一些则只允许配置本地计算机的注册表设置。同时，远程访问注册表也可能会
限制用于某操作的参数。请检查每个操作的语法以便验证该操作可以用于远程计算机，以及验证可用于那
种情况下的参数。
reg命令是WindowsXP提供的,它可以添加、更改和显示注册表项中的注册表子项信息和值。
reg add
阅读全文
-
让Real Player从你的电脑走开
Oct072008
近自己用VB编写一个播放RM格式的影音文件播放器，打包后，兴冲冲的拿到朋友那去，结果老是报告“超出内存”。我倒！原来朋友的机器上没有装上Real Player，大跌脸面！急忙到网上查找关于Real Player的文章，结果一无所获! 看来只有俺亲自动手了！后来经过俺几天N2次的安装和卸载，外加方便面与白开水！终于让Real P ...
阅读全文作者：奇风 | 分类：设计代码 | 阅读：331 views | 标签：Real Player
-
delphi:QQ自动发消息源码
Oct072008
这里面有的到窗口句柄，输入框句柄和按钮句柄的方法！
阅读全文
你可以结合使用的到你想的到的功能！
这是一个qq自动发送的功能，你看看，应该有点用吧！：）
[code]
procedure TForm1.Button1Click(Sender: TObject);
var
hParent,hButton,hMemo: HWND;
begin
Memo1.CopyToClipboard;//把Memo中选中的语句拷贝到剪贴板中
try
//找发送消息的QQ窗口
hParent := FindWindow(nil, ‘发送消息’);
//然后找回话时用的编辑窗口,Point函数用于返回一个TPoint类型变量
hMemo := ChildWindowFromPointEx(hParent, Point(50, 100), CWP_ALL);
//找到“送讯息”按钮的句柄
hButton := FindWindowEx(hParent,0,nil,’送讯息(&S)’);
if (hParent = 0) or (hMemo = 0) or (hButton = 0) then
MessageBox(Handle,’没有找到发送窗口，请重试！’,’错误’,MB_ICONWARNING)
else
begin
//向发送消息中的回话编辑框发送粘贴消息
SendMessage(hMemo,WM_PASTE,0,0);
//向“送讯息”按钮送单击消息以模仿按键发送回话
SendMessage(hButton,BM_CLICK,0,0);
end;
except
//如果发生以外错误给出提示
-
Shockwaveflash 资料收集1
Oct072008
AlignMode(int型)和SAlign(WideString型) 控制动画的显示位置(把这两个属性列在一起说明它们是相互
关联的，改变一个另一个也会相应地改变，以下类似)。取值范围及含义如下:
0 空 当前位置
1 L 当前位置靠左
2 R 当前位置靠右
3 LR 当前位置居中
4 T 当前位置靠上
5 LT 左上
6 TR 右上
7 LTR 上方居中
8 B 当前位置靠下
9 LB 左下
10 RB 右下
11 LRB 下方居中
12 TB 当前位置垂直居中
13 LTB 靠左垂直居中
14 TRB 靠右垂直居中
15 LTRB 中央位置
【属性】BackgroundColor(int型)和BGColor(WideString型) 设置背景颜色，BackgroundColor为整型值，BGColor为它的HEX字符串。
【属性】Loop(bool型) 是否循环显示
【属性】Menu(bool型) 是否显示右键菜单，建议设为true，因为它可以完成对Flash动画的大部分控制工作，而不用我们写代码。
【属性】Movie(WideString型) Flash动画的文件名，可以在运行状态动态设置，要关闭一个动画只要把它设为空即可。
【属性】Quality(int型)和Quality2(WideString型) 控制动画的显示质量,一般将Quality设为1以获得高质量的显示效果。
【属性】ScaleMode(int型)和scale(WideString型) 控制动画的显示比例，取值范围及含义如下:
0 ShowAll 显示全部
1 NoBorder 无边框模式
2 ExactFit 拉伸到整个画面
3 空 原始大小【方法】PercentLoaded 返回动画已经加载的百分比，你可以建立一个进程条(ProgressBar)来显示
阅读全文
动画加载的进程。
-
delphi虚拟点击过360安全卫士
Sep202008
-
QQ聊天记录是如何加密的
Sep182008
-
delphi李维专栏\3D游戏编程入门\3D游戏开发大全 站点
Jan292007
delphi 李维专栏 http://www.delphifans.com/SoftList/Catalog_12_SoftTime_Desc_1.html 3D游戏编程入门经典 http://book.csdn.net/bookfiles/199/ 3D游戏开发大全 http://book.csdn.net/bookfiles/27/index.html Delphi 3D 网： http://www.delphi3d.net/index.php 主要有OPENGL和Didirect这两种，还有就是使用第三方 ...
阅读全文
-
DELPHI MD5加密算法
Jan292007
