博文
配置文件的读写(2006-07-28 11:01:00)
摘要：配置文件的读和写操作是许多软件都必须得操作，Windows API为我们提供了两个函数进行配置文件的读和写操作，这大大方便了我们的软件开发。
首先来看看配置文件的格式，一个格式正确配置文件应该是和下面类似的[节点1]子键1=键值子键2=键值子键3=键值。。。。。。[节点2]子键1=键值子键2=键值。。。。。。[节点3]。。。。。。
节点可以有任意个，节点名也可以随意取，关键是“[]”不能省，子键也可以有任意个，注意等号右边直接写键值，如果是字符串也不要加双引号，默认的就是字符串。加了反倒会在字符串上多处双引号。
接着我们来看看怎么进行读写，Windows API 为我们提供的这两个函数是：读函数GetPrivateProfileString写函数WritePrivateProfileString他们的声明如下：Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As LongPublic Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long我们先来介绍下这两个函数，lpApplicationName 指的是节点名，注意这是一个String 类型，所以调用的时候我们必须加双引号比如“节点1”；lpKeyName是子键名，调用的时候也要加双引号；lpDefault 是默认值，如果填的话接受区内将是这个值；lpReturnedStr......
使用vb6.0实现无标题栏窗体的平滑移动(2006-07-27 18:10:00)
摘要：先说一下目前网络上流传的一种移动方法，这种方法的实现原理其实很简单，它是通过计算鼠标按下和放起的坐标差来确定移动后窗体的位置。首先在窗体的MouseDown事件中记录下移动前鼠标的位置，然后在MouseUp事件中也记录下鼠标的位置，通过计算这两个坐标的差值就可以确定窗体移动后的位置。这种方法的缺点是移动的时候跳跃感很明显，感觉比较别扭。
通过简单的API调用可以很好地实现无标题栏窗体的移动，可以不夸张地说没这种方法实现的效果比Microsoft做的还要好，而且实现也很简单，下面我们来看看这是怎么实现的。
使用的API函数Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long该函数可以获得鼠标在屏幕上的位置坐标，并把赋给一个POINTAPI类型变量。POINTAPI的定义如下Private Type POINTAPI X As Long Y As LongEnd Type
下面我们来实际的操作，首先建立一个标准EXE工程，把Form1的BorderStyle设为0-None，这样窗体的标题栏就没有了，进入窗体的代码界面输入下面的代码
'定义POINTAPI类型Private Type POINTAPI X As Long Y As LongEnd Type'API函数声明Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long'定义一个用于记录鼠标起始位置坐标的POINTAPI变量Dim scrPT As POINTAPI'在窗体的MouseDown事件中用API函数返回鼠标起始坐标Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Sin......