TMessage消息结构 PMessage = ^TMessage; TMessage =packedrecord Msg: Cardinal; caseIntegerof...
发简信
IP属地：安徽
-
Delphi 自定义消息使用
-
Delphi 加载UTF8编码文件（XE适用）
直接使用字串流方式加载文件即可 stm := TStringStream.Create('', TEncoding.UTF8); stm.LoadFromFile(sFile...
-
Delphi 判断是否汉字
单字节字符：mbSingleByte双字节字符首字节：mbLeadByte //判断字符串第500位是不是汉字如果是截取的时候+1位或者-1位 usesSysUtils; i...
-
Delphi 数据提供程序或其他服务返回 E_FAIL 状态
Query操作提示“数据提供程序或其他服务返回 E_FAIL 状态。” -- 查询被锁表 select request_session_id spid,OBJECT_NAME...
-
把你家的私房菜谱分享给所有爱美食的人。
-
Delphi找不到 Tclientsocket控件
菜单component -->Install Packets Add按钮 选择delphi安装目录下bin里的dclsockets70.bpl(版本不同后面的数字不通 70 ...
-
Delphi 调用WebService 直接发送SOPA报文
有一些WebService使用D7的HTTPRIO控件已经不能正常调用了， 这个时候可以直接使用HTTPReqResp控件直接发送报文， 或者使用TIdHTTP控件 http...
-
Delphi AdoQuery动态添加Field
为ADOQuery1动态添加Field var sField:TStringField; sField:=TStringField.Create(Self); sFie...
-
Delphi Access violation at address 004040D2 in module 'XXX.exe'. Read of address 00000010问题
Access violation at address 004040D2 in module 'XXX.exe'. Read of address 00000010 通常是对...
-
Delphi 编写windows服务
如果使用到Ado控件，需要和线程一样初始化com环境，每初始化一个TService就初始化了个独立线程 通常ServiceStart里CoInitialize(nil);Se...
-
delphi 数据类型 varchar 和 text 在 equal to 运算符中不兼容
使用AdoQuery参数方式获取查询结果，如果赋值参数stt为空就会报：“数据类型 varchar 和 text 在 equal to 运算符中不兼容” 错误。 qQry...
-
delphi 身份证号信息获取
我们要用到VarToDateTime这个函数，以避免不同操作系统时间格式带来的格式化错误 先定义获取年龄和年龄单位的函数 function GetAgeInfo(dBirth...
-
3.SQL字符串截取技巧
有时我们会临时写一些SQL脚本来统计一些东西，或者是提供视图或者存储过程给第三方使用。但是有些内容是串联起来存在一个字段中的。 比如：sMZ（民族） sLx(联系方...
-
2.查询行转列小技巧
1.直接判断 SELECT XX, MAX(CASE iNo WHEN 1 THEN sCode ELSE '' END) AS sCode1, MAX(CASE i...
