Delphi
Mushroom_lb
系统架构 软件设计 全栈工程师
展开
-
Delphi 文件操作的封装
{----------------------------------------------------------------------------- Unit Name: FileOper Author: liubin Date: 2010-1原创 2011-10-18 06:31:07 · 783 阅读 · 0 评论 -
Delphi XE5 Firemonkey 创建windows 8 应用效果
效果很好,下面截两张图片展示一下:主界面 配置界面原创 2013-09-30 13:37:45 · 2782 阅读 · 0 评论 -
关于Delphi cxGrid主从表中从表只能编辑第一条记录的问题
在Delphi cxGrid主从表中从表只能编辑第一条记录,这个问题是由于设置主从关联字段错误造成的。 从表DBtableView2的keyfieldnames,DetailKeyFieldNames和MasterKeyFieldNames 是关键: MasterKeyFieldNames为主表关联字段, DetailKeyFiel原创 2012-03-05 18:56:32 · 2981 阅读 · 0 评论 -
Delphi 设置代理服务
本文说明了用delphi设置IE浏览器的代理服务。 参数说明: Proxy:代理服务器 IP 地址; Port:端口号; ByPass:对所有的协议均使用相同的代理服务器; bEnabled:是否使用代理服务器(代理服务器是否生效)、 // uses Wininet, registry; function ChangeProxy(c原创 2012-01-06 08:19:41 · 3385 阅读 · 0 评论 -
ACCESS数据库连接字符串
在开发桌面级应用程序时有时会使用ACCESS作为数据源,但是通过系统自动生成的字符串往往在发布后会报错。系统自动生成:Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False; Password=Psd;Data Source=filename.mdb该更为正确的连接方式:Provider=Microsoft.Jet.OLED原创 2011-12-13 19:34:37 · 868 阅读 · 0 评论 -
Delphi实现截屏功能
{********************************** ** 功能: 截取屏幕中的指定区域 ** 输入参数: ** LeftPos :左坐标 ** TopPos :上坐标 ** RightPos:右坐原创 2011-10-18 06:29:16 · 2942 阅读 · 0 评论 -
delphi 二进制 八进制 十进制 十六进制 进制转换
unit uConversion;interfaceusesSysUtils,Math;typeTConversion = classpublic //10 进制 to 2,8,16 进制 function inttoBitStr(原创 2011-10-18 06:32:40 · 3510 阅读 · 0 评论 -
Delphi utf8编码的解码
{******************************************************************* ** 功能: utf8编码的解码 ** 输入参数: ** 作者:liubin **日期:2011-02-15原创 2011-10-17 22:35:29 · 2979 阅读 · 0 评论 -
Delphi结束指定进程EndProcess
{------------------------------------------------------------------------------- 过程名: EndProcess 作者: liubin 日期: 2010-1原创 2011-10-17 22:32:14 · 1067 阅读 · 0 评论 -
Delphi 获取指定目录下文件的大小
这个函数可以获得指定目录下所有的文件路径+名称,能够递归搜索:procedure FindAllFile(const Dir: string;List: TStringlist);var hFindFile: THandle; FindFileData: WIN32原创 2011-10-18 21:53:40 · 979 阅读 · 0 评论 -
Delphi 屏蔽系统的Ctrl+Alt+Del
从网上搜集整理,直接调用函数RunFuckCAD屏蔽Ctrl+Alt+Del,一般在程序创建时调用,在程序退出时调用StopFuckCAD ,取消屏蔽Ctrl+Alt+Del。 {----------------------------------------------原创 2011-10-17 22:42:26 · 3222 阅读 · 0 评论 -
Delphi 判断一个字符串是否为数字
//***************************************************************************//函 数 名: IsDigit//返 回 值: boolean//日 期:2011-03-01/原创 2011-10-17 22:37:38 · 5889 阅读 · 1 评论 -
Mitsubish FX 3U PLC 串口 连接单元
前段时间遇到一个Mitsubish FX 3U PLC ,现将PLC连接单元分享一下,希望对其他人有所启示。unit PLC_MitsubishiFX;interfaceuses Windows, Messages, SysUtils, Classes, syncobjs,UnitCom, ACTPCCOMLib_TLB, PLC_Base, PLCCommonFunc;原创 2013-09-30 13:30:02 · 3305 阅读 · 0 评论