2017年05月_紫松Win

12月 11月 10月 09月 08月 07月 06月 05月 04月 03月 02月 01月

原创 CxGrid 修改去除 no data to display 的两个方法

CxGrid在没有记录时会显示no data to display字样，如果想去除或修改方法一、在TcxGridDBTableView ==>optionsview==>nodatatodisplayinfo属性里去除或修改方法二、查找cxGridStrs.pas单元，我的是win7 在这个目录中有这个文件C:\Users\chen\Documents\DevExpress VCL\

2017-05-25 17:22:27 3962

原创数据集和JSON相互转换

使用DELPHI原生类实现数据集和JSON相互转换JSON二要素：数组和对象。对象可以包含数组，数组可以包含对象。无层数限制。OLEVARIANT也类似，OLEVARIANT的一个元素又可以是OLEVARIANT，且无层数限制。XML亦类似。这也是它们能序列一切对象的奥秒所在。JSON就是字符串，定义好序列后的字符串格式，甚至都不需要啥JSON类库，就可以自行组装JSON字符串和解析JSO

2017-05-24 14:12:26 3525

原创 Delphi 函数Shl与Shr

在Delphi中，有两个这样的函数：Shl与Shr；分别用来作按位左移和按位右移运算。格式：操作数 Shl/Shr 移动位数说明：操作数与返回值都是整数例子：16(10) = 10000(2) 16(10) Shr 1 = 10000(2) Shr 1 = 1000(2) = 8(10) 16(10) Shr 2 = 10000(2) Shr 2 = 10

2017-05-24 11:46:14 3958

原创如何在cxgrid用ADOQuery DataSource 显示数据

1:cxgridDBTableView的Datacontroller.datasource有没有指到datasource,datasource有没有连到ADOQuery1 2:cxgridDBTableView的columns有没有加对,每个columns对应的列名有没有指正确.

2017-05-24 10:44:20 2298

原创 delphi中Record 和Packed Record的区别

1、Record不带packed：结构体表明编译器编译时要求进行字对齐，占用内存大，但是速度快一点 2、Record带packed：结构体表明编译器编译该结构体时不需要进行字对齐，占用内存小，但是速度慢一点

2017-05-24 09:35:26 1072

原创 delphi连接access数据库的步骤(简介)

一、放置adoconnection控件（ADO组件板中）1、设置name属性：简单来说就是该控件的名字为以后在代码中调用他用的，也可以不更改。2、connectionstring属性：是设置连接字符串的，连接什么数据库都要用到。如果连接的是access数据库，连接方法如下：（1）单击connectionstring属性后面的省略号，出现如下图所示的对话框。（

2017-05-23 15:24:27 4324

前几天，有个网友刚开始学Delphi，想学一下Delphi连Access数据库，可是怎么都连不成功，我就答应给他做个图文教程，现在闲下来了，就来做一个教程。首先我们来确认一下所用到的环境Delphi7，然后就是Access2003。作为一个初学者，为了简化你的操作，我们将用.udl文件。首先介绍一下.udl文件，更详细找度娘。它是微软提供的一种数据库连接文件，你只要指定文件的位置，它会自动生成数据

2017-05-23 15:16:15 16741

原创 delphi LPT1端口打印与开钱箱

{设置打印机}Assignfile(RPrinter,'LPT1');{准备写文件}Rewrite(RPrinter);{向后倒纸}//Writeln(RPrinter,chr($b)+chr(27)+'K'+chr(40)); {打印}Writeln(RPrinter,'测试:****'+(Edit1.text));{向前进纸}Wr

2017-05-23 14:47:04 2488

原创将身份证中取出的生日赋值到TcxDateEdit空间上

1、先用copy取出身份证中的生日，然后拼接为一个字符串，如下； cxDateEdit1.Date := StrToDate('2017-05-22'); 这样就可以了！

2017-05-22 16:55:32 782

原创 Delphi手动创建控件及拥有者和控制者的说明解析

var Fbutton2:Tbutton;//手动添加的两个button对象 Fbutton3:Tbutton;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin Fbutton2 := Tbutton.Create(form1); //创建对象

2017-05-22 15:02:36 845

原创 Delphi 的 Toolbar 的添加图片说明

这是个很早就有的组件，在Windows 界面风格上有相关应用，用它可以方便的构成菜单。在Toolbar内可以显示图片和文字，图片的放置方式需要images与一个imageList组件想关联。其中有几个概念：imageList 图片如何控制大小？其实imageList中的图片是可以整体控制大小的，默认是height×weight = 16×16 改成想要的尺寸就可以了imageLi

2017-05-19 17:50:16 2818

原创关于打开数据库时提示"对象打开时，不允许操作"，问题分析及解决办法

问题的原因可能： 1、在其他地方已经打开这里没有用close先进行关闭在open 2、如果你的程序是多线程的活，虽然也写了close但是还会报错。原因是当你这个线程到sql语句时程序跳到下一个线程执行了open，又回来执行前一个线程的open，就会报同样的错误解决办法： 1、单线程就将close在sql语句之前，先关闭再打开 2、多线程时尽量不要使用同一

2017-05-19 09:28:43 12083

原创关于Delphi使用Rewrite()报Invalid FileName错的问题

报错的原因：你可理解错了Rewrite（）真正的用法，它会创建不存在的文件但不包括文件夹当你想试图用这个方法创建一个新文件夹下的文件时就会报这个错误解决办法：先判断文件夹是否存在，不存在先创建文件夹，然后用这个方法创建文件这样就可以了var FlogfilePath: string; Fmylog: TextFile; FsysDir: string;

2017-05-18 17:47:51 2417

原创第一个小项目完成总结（sql数据库自动备份工具）

《本文仅自己作为总结使用》功能： 1、任意选择数据库实例的数据库进行备份 2、可以对单个或多个数据库进行备份 3、可以设置6个自动备份时间（到点进行备份） 4、可以删除规定时间内的备份以及日志文件 5、FTP文件的上传和下载 6、自动发送备份文件到邮箱 7、可以作为服务启动也可以开机自启动用到的技术： 1、sql数据库备份技术 2、

2017-05-17 15:21:08 773

原创 Delphi实现防止程序多次运行

//将此代码写入工程文件 var hmutex: hwnd; Ret: Integer;begin hmutex := CreateMutex(nil, False, 'MpSQL_Backup'); //更成文件名 Ret := GetlastError(); if Ret <> ERROR_ALREADY_EXISTS then begin Applicati

2017-05-17 14:34:53 1058

原创 Delphi中string数据类型的特殊用法（获取string字符串的单个字符）

var Fs:string;//声明一个字符串类型begin Fs := 'zisong';//字符串变量赋值 showmessage(Fs[1]+‘ ’+Fs[2]+‘ ’+Fs[3]+‘ ’+Fs[4]+‘ ’+Fs[5]+‘ ’+Fs[6]);end输出的结果应该是:z i s o n g

2017-05-17 14:09:50 3183

转载 delphi Inc函数和Dec函数的用法

[delphi] view plain copy print?inc自增函数 1.inc（i，n）；//i,n:integer;n为自增量相当于i：=i+n； 2.inc（i）；//i:integer; 相当于i:=i+1; dec自减函数 1.dec（i，n）；//i,n:integer;n为自减量相当于i：

2017-05-17 11:52:44 4094

转载怎么在自己电脑上搭建一个服务器，以便于外网访问呢？

前几天我要测试一个项目，这个是需要往服务器上放才可以测的，但后台太忙了，所以就说让我自己在自己电脑搭建个服务器，把项目代码放在里面测就可以，其实搭建服务器的方法有很多，之前我有用过一个XMAPP的软件它也是可以作为服务器承载代码，以供别人访问，不过我觉得比较流行的还是Tomcat服务器；其实我们偶尔也会写一下网页，javaweb程序，为了逼近现实，我们的项目发布后，都希望我们的项目能让更多的人

2017-05-17 09:48:57 54224 3

转载 DELPHI编写服务程序总结

DELPHI编写服务程序总结一、服务程序和桌面程序的区别Windows 2000/XP/2003等支持一种叫做“系统服务程序”的进程，系统服务和桌面程序的区别是：系统服务不用登陆系统即可运行；系统服务是运行在System Idle Process/System/smss/winlogon/services下的，而桌面程序是运行在Explorer下的；系统服务拥有更高的权限，系统服务拥有

2017-05-17 09:15:42 4092 1

转载 Delphi 设置或者检查应用程序自动启动功能

1、// 调用此函数查找注册表中是否有指定的值，真：自动启动; 假：未自动启动 function TfrmMain.GetAutoRunValue: Boolean;var Reg: TRegistry;begin Reg := TRegistry.Create; //创建一个新键 try Reg.RootKey := HKEY_LOCAL_MACHIN

2017-05-11 22:47:04 655

转载 delphi 判断端口(Port)是否被占用

判断端口(Port)是否被占用在使用Socks编程时，有时需要判断某个端口是否被占用，也就是是否被其它程序使用。uses Winsock;function IsPortUsed(const aPort: Integer): Boolean;var _vSock : TSocket;_vWSAData : TWSAData;_vAddrIn : TSockAdd

2017-05-05 18:10:55 3113

转载 Delphi中Inputbox 和Inputquery 函数的使用

inputbox的返回值是，你在输入框中输入的文字。而inputquery的返回值是，你是否点击了确定按钮。它的返回值是布尔型的。如果你在inputbox中一样也不输入，就点击取消的话，就会提示出错，而inputquery就不会。它们前面的两个参数都是一样的，分别是输入框的标题，和提示信息。例:if inputbox('加法题','7+5','')='12' then showmes

2017-05-02 10:13:59 1051

Delphi的GZIP解压示例源代码（亲测可用）

一个Delphi的Gzip解压示例，内附完整源代码，在解压路上不迷路，本人已亲测可用，欢迎下载使用，有疑问请联系本人

2020-08-11

Delphi的ZLibEX控件（亲测可用）

一款好用的Delphi的Gzip解压代码，用ZlibEX轻松搞定，本人有例子代码资源，具体使用方法请翻看本人博客，博客有详细说明

2020-08-11

gds自带数据库

gds自带数据库dll文件

2017-06-20

vin32多线程程序设计（C++篇）

一本好的书籍能够让你的技术突飞猛进，这一本专门介绍线程的书籍，能够让你在线程编码中游刃有余！

2017-06-05

MD5加密技术

完美的MD5加密技术源码，让你的数据更加安全！

2017-06-03

indy in depth(高清中文版)

高清中文版Delphi讲解，让你更清楚什么是indy

2017-05-27

Delphi连接access数据库步骤

图文讲述Delphi如何连接access数据库，简单易懂！

2017-05-23

支付宝支付接口组件（Delphi版）

详细的注释，简练的代码，帮你实现轻松地支付！

2017-05-19

Delphi源码加密插件

这是一款Delphi源码加密工具，使自己的代码在其他人的电脑上只有输入密码才可代开源码！

2017-05-18

delphi谷歌地图

Delphi开发的多功能谷歌地图，附带源码！

2017-05-18

Delphi7实现FTP

代码原型让你分分钟搞定FTP文件传输，为工作和学习节省大量时间……

2017-05-17

(delphi)鼠标点击项目进行删除

点击树形节点就删除当前节点

2017-03-13

游标的使用

简单明了的用实际语句介绍什么是游标及游标的操作

2017-03-08

FInalbuilder使用说明

2017-02-16

TlistBox选中全部

2017-02-06

Navicat Premium

oracle、SqlServer、MySQL等通用的数据库操作工具

2017-01-18

tails2.7.1

2016-12-07

磁盘加密软件

互联网时代，你的电脑上一定有宝贵的资源，所以用这个软件来保护它吧！

2016-12-05

prey(远程监控)

仅限Windows用户，为你的电脑加上防护盾，百毒不侵！

2016-12-05

delphi对话跨程序及源代码

不断学习，不断进步！

2016-12-02

FastReport 2D Codebar.zip

一个好的控件可以使工作事半功倍，支持中文方法

2021-06-22

Desktop.zip

一个好的第三方控件，可以使你的工作量倍上加倍，cxgrid相比大家都不陌生，在现在的Delphi中有举足轻重的地位，能更好的使用他，加快产品的产出，占据有利时间先机

2019-12-17

editPlus5.733带注册码

自测editPlus5.733正常使用中，并自带汉化包和注册名注册码，自留使用！

2018-11-29

sql server数据库置疑修复方法

详细的数据库修复方法和步骤，除了SQL server 2000以外，还有SQL server 2005的修复方法，本人亲测有效！

2018-08-31

只能还原ms sql 数据库

用Delphi7编写的数据库还原工具，且附带源码，可以轻松高效不应打开数据库应用程序即可还原数据库的一款工具及代码

2018-06-28

GIF动画生成器

一个简单的小工具，在给对方演示上增色不少，可以大大减少工作量！

2018-03-20

sqlserver2008R2应用添加实例步骤

一片好的操作步骤文档，能够解决你再数据库中添加实例是遇到的问题，让工作更加顺畅！

2017-11-30

一键解决sql server2000评估出错及服务启动不起来问题

SQL server 2000使用120天后再次启动MSSQLSERVER‘本地计算机上的 MSSQLSERVER 服务启动后停止。某些服务在未由其他服务或程序使用时将自动停止。’这是因为你的SQL server 2000试用版到期了，如何解决呢？下载此文件放置到开始——》所有程序——》启动这个文件夹下，如果有安全软件的话请添加信任，接下来重启电脑就可以了！只使用中如果出现以上的问题，双击此文件就可以了！

2017-11-15

sql数据库还原和备份工具

该工具用Delphi程序进行编写，快捷方便的进行数据库的还原和备份，里面附有完整源码

2017-10-27

Delphi网络通信协议分析与应用实现

本书介绍如何利用Delphi开发网络与通信应用程序，本书主要针对目前流行的FTP、HTTP、E-mail、Telnet、网络监控、Modem串口通信编程、拨号网络编程、传真编程等Internet协议与网络通信高级编程开发进行详细的讲解，并结合大量的实例使读者能够深入的了解各种网络应用程序的开发技巧。本书适合中高级Delphi程序员阅读、参考。

2017-10-19

SQL Prompt

SQL脚本越写越多，总是觉得编写效率太过于低下，这和打字速度无关。在我个人编写SQL脚本时，至少会把SQL的格式排列成易于阅读的，因为其他人会阅读到你的SQL，无论是在程序中或是脚本文件中，良好的排版不仅让人看起来赏心悦目，在和他人之间做交流时也省时省力，不会因为揉成一团的sql去询问Team Member：您能帮我解释一下这么一大段sql是做什么的吗？虽然微软至SQL 2008以上的版本提供了SQL智能提示，但是它的反应实在是过于迟钝，等提示出来我们早就可以敲出一行语句了。而且它没有提供sql代码格式化的功能，咱们只能自己做手动格式化，手动格式化sql总是需要花费不少时间的。它也是一款拥有智能提示的sql编程工具，而且小巧灵活。总而言之，它也是一款能够提高sql编程效率的工具。注释：内附破解教程doc。和keygen，欢迎免费下载

2017-10-11

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人