- 博客(31)
- 资源 (4)
- 收藏
- 关注
RSS订阅转载 XE :IOUtils单元TDirectory的其他功能
Delphi 2010 新增功能之: IOUtils 单元: TDirectory 的其他功能Delphi 2010 新增功能: TDirectory 的其他功能TDirectory.CreateDirectory(); {建立新目录}TDirectory.Exists(); {判断文件夹是否存在}TDirectory.IsEmpt
2015-03-10 15:49:10
1404
转载 xe Tpath
//较常用的方法:TPath.GetTempPath; {获取临时文件夹路径}TPath.GetTempFileName; {获取一个临时文件名}TPath.GetPathRoot(); {提取盘符, 如: c:\}TPath.GetDirectoryName(); {提取
2015-03-10 15:47:33
1345
转载 delphi 从http 上下载文件的几种方法
1、利用函数 ：unit downloadTest; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,UrlMon; type TForm1 = class
2013-11-18 09:21:12
5110
转载 DELPHI控制摄像头照相
DELPHI控制摄像头照相 说明 ：这里存在一个问题是，只能对于有驱动的摄像头进行控制，对于无驱摄像头，无法进行操作。同时使用的是微软提供的库文件进行操作。2009-01-24 15:49:41| 分类： 工作笔记|字号 订阅使用MS的AVICAP32.DLL实现对摄像头编程，实现一个视屏聊天就不成什么问题了。下面代码：const W
2013-10-31 11:50:10
1484
转载 dll的动态调用
第一章 为什么要使用动态链接库（DLL） top 提起DLL您一定不会陌生，在Windows中有着大量的以DLL为后缀的文件，它们是保证Windows正常运行和维护升级的重要保证。（举个例子，笔者的Win95 System目录下尽有500多个DLL文件。）其实，DLL是一种特殊的可执行文件。说它特殊主要是因为一般它都不能直接运行，需要宿主程序比如*.EXE程序或其他DLL的动态调用才能够使用。
2011-11-24 11:07:55
420
原创 delphi 获取文件创建,修改时间
<br />function CovFileDate(Fd:_FileTime):TDateTime;<br />{ 转换文件的时间格式 }<br />var<br />Tct:_SystemTime;<br />Temp:_FileTime;<br />begin<br />FileTimeToLocalFileTime(Fd,Temp);<br />FileTimeToSystemTime(Temp,Tct);<br />CovFileDate:=SystemTimeToDateTime(Tct);<b
2011-04-07 15:56:00
3998
原创 delphi 获取鼠标当前位置的相对坐标
delphi 获取鼠标当前位置的相对坐标unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;typeTForm1 = class(TForm) procedure FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TS
2011-04-07 15:46:00
2506
原创 Delphi+Cell组件
Delphi+Cell组件<br />delphi2008-03-18 16:24:46阅读72评论0 字号：大中小 订阅<br /> <br />“聪明的程序员用Delphi”，因为Delphi易学易用，很快能够开发出高质量的软件来，备受程序员们青睐。<br /> “最聪明的程序员用Delphi+Cell组件”，因为Cell组件是一款优秀的国产报表控件，在Delphi下使用，制作报表更加得心应手、如虎添翼。<br /> 让我们来看看如何在Delphi中使用Cell组件做简单的报表（即让程序打开一个C
2011-03-16 18:40:00
2177
转载 Delphi 代码优化
<br /><br /> Come from: http://www.optimalcode.com<br />文章编目 [显示隐藏] <br />1. 字符串优化 <br />1.1. 不重复初始化 <br />1.2. 使用SetLength预分配长字符串（AnsiString） <br />1.3. 字符串与动态数组的线程安全(Thread Safety) <br />1.4. 避免使用短字符串 <br />1.5. 避免使用copy函数 <br />1.6. 总是使用长字符串，必要时转换为pcha
2011-03-16 17:03:00
533
原创 加密狗装置的读取与应用
<br />unit untMain;<br />interface<br />uses<br /> Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,<br /> Dialogs, OleCtrls, SHDocVw, StdCtrls,DAMPlusAppApis,NB30,WinSock,<br /> AppEvnts,ActiveX;<br />type<br /> PASTAT = ^TAST
2010-11-01 09:34:00
1073
原创 加密狗装置的读取与应用
<br />unit untMain;<br />interface<br />uses<br /> Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,<br /> Dialogs, OleCtrls, SHDocVw, StdCtrls,DAMPlusAppApis,NB30,WinSock,<br /> AppEvnts,ActiveX;<br />type<br /> PASTAT = ^TAST
2010-11-01 09:34:00
1238
原创 内存操作
<br />[ 1 ]: 给字符指针分配内存<br />马上能想到的函数有: <br />________________________________________<br />GetMem<br />AllocMem<br />ReallocMem<br />FreeMem<br />GetMemory<br />ReallocMemory<br />FreeMemory<br />New<br />Dispose<br />NewStr<br />DisposeStr<br />StrNew<br
2010-08-31 09:56:00
534
原创 流类的应用
<br />所谓"流", 就是一段数据或是一块内存;<br />在进行流操作时, 我们不必关心流中的数据到底是什么; 只需要知道流的大小和当前的指针位置. 所以流只有两个属性: <br />Size、Position.<br />对流的操作, 不过就是读取和写入. 所以流最主要的方法就是 Read 和 Write.<br />在很多控件的使用中, 读取主要用 LoadFromStream; 写入主要用 SaveToStream. <br /><br />举个例子: (建立新工程, 添加两个 Memo、两个
2010-06-18 14:23:00
320
转载 ClientDataSet的用法
<br />ClientDataSet的用法（转） TClientDataSet控件继承自TDataSet，其数据存储文件格式扩展名为 .cds，是基于文件型数据存储和操作的控件。该控件封装了对数据进行操作处理的接口和功能，而本身并不依赖上述几种数据库驱动程序，基本上能满足单机"瘦"数据库应用程序的需要。 1．TClientDataSet的基本属性和方法介绍 1)．FieldDefs: 字段定义列表属性 开发者可通过单击属性编辑器中该属性编辑按钮，或在该控件上单击右键选择弹出菜单中的"Field
2010-06-17 17:30:00
522
原创 dunit 测试应用
<br />今天 用DUNIT来进行单元测试，发现测试不通过。可是如果代码量太大，那么从中找到ERROR，是不可想象的。后来发现在DUNIT里面可以测试跳转到错误代码行，不错，终于发现错误，是这样的。这只是一个小测试，可以看出，DUNIT对测试单元的优点，及方便性。<br />unit Project1TestCases;<br />interface<br />uses<br /> TestFramework;<br /> type<br /> TTestCaseFirst = class(TT
2010-06-05 17:58:00
454
原创 看客
<br />8点半，开始上班了，今天和往常一样，按照自己的安排开始了一天的工作。先看一下工作台记录，哦。开始工作吧。先看了一下游标，以前看过，不过有点忘了，更是没有用过。开始，编写，测试，。。。。。。呵呵，真的成功了。原来游标也可以这样用。让大家看一下我写的游标。<br />use voice<br />declare my_cursor cursor scroll dynamic for <br />select callee from fu_dianhuayingxiao where beizhu <
2010-06-04 18:51:00
398
原创 delphi 消息的实现
<br /> delhpi 中定义了很多消息，今天想去学习一下。可是看了将近一上午的时间，还是没有看明白，到底是怎么样去传递消息，以及接收消息。挺失败，不过，知道的是DELPHI中有很多消息，根据不同的事件就会响应不同的消息。
2010-06-03 17:44:00
345
原创 06月02日，工作学习日志
今天 没有具体的工作，来到公司后，打开电脑，就开始一天的工作，首先列了一下今天 都要做什么，然后开始了我一天的工作。 对数据库的一个学习，以前有好多东西都有些忘了，所以得快点把数据库通一下，看了一下存储过程，及以些连接语句的查询。东西还是老东西，但是每看一次都会有新的收获。也许这就是温故而知新吧。 然后就是DELPHI操作注册表的一种方法，利用DELPHI操作注册表，可以把系统的大部分设置进行修改及以些信息的配置，都可以保存到数据库中。ROOTKEY / OPENKEY / WRITESTR
2010-06-02 18:05:00
327
原创 注册表的读出与写入
在操作注册表时，首先要定义一个TREGESTRY对像，然后可以通过OPENKEY打开注册表，看一下代码 可以把一些系统的临时信息及配置信息写入到注册表里面了，这样就可以当成配置文件了。不再需求自己去新建一个配置文件。看一下代码吧。procedure TForm1.Button1Click(Sender: TObject);begin myregedit:=TRegistry.Create; myregedit.RootKey:=HKEY_CURRENT_USER; IF myregedit.Open
2010-06-02 15:25:00
663
1
原创 delphi 细节总汇
<br /> 今天把以前做的项目带过来了，上午就看了一下我的项目的功能，以及细节性的东西，从中发现在还有很多不合理的地方，以及很多技术点用的不是怎么熟练。不过也有从中可以值的学习的。看了一下源吗？又看了一下其它方面的东西，是啊，我还有很多东西要学。<br /> 中午休息了一会，到了下午，看了一下注册表的有关操作， 很久时间不有了，有点忘了。了解了一下有关文件的操作。关于如何得到操作数据库的进度，也许这对于我来说今天是一个没有解决的问题。看了一下别人写的源码，是乎并不怎么理解。测试。。。。失败！哎
2010-06-01 18:09:00
456
转载 delphi动态调用DLL的方法与技巧
<br />第一章 为什么要使用动态链接库（DLL） top 提起DLL您一定不会陌生，在Windows中有着大量的以DLL为后缀的文件，它们是保证Windows正常运行和维护升级的重要保证。（举个例子，笔者的Win95 System目录下尽有500多个DLL文件。）其实，DLL是一种特殊的可执行文件。说它特殊主要是因为一般它都不能直接运行，需要宿主程序比如*.EXE程序或其他DLL的动态调用才能够使用。简单的说，在通常情况下DLL是经过编译的函数和过程的集合。 使用DLL技术主要有以下几个原因： 一、减小
2010-06-01 13:56:00
882
原创 delphi 编写DLL与实际调用小案例
<br />本文简单介绍了一下在delphi 7中对dll文件得调用和dll文件得生成！<br />unit Unit1;<br />interface<br />uses<br /> Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,<br /> Dialogs, StdCtrls;<br />type<br /> TForm1 = class(TForm)<br /> Label1: TLabe
2010-06-01 11:55:00
406
原创 简单的Delphi三层程序开发
<br />所谓三层：<br />(1) 客户端<br />(2) 服务器端<br />(3) 数据库<br /> 在数据访问时，使得客户端必须通过服务器来访问数据库。提高了系统的安全性。<br /> 在Delphi中可以使用Socket或者Dcom来连接他们相互间的通讯。如果使用Scocket在系统使用时必须提供Scocket连接器，而Dcom则不用。客户端和服务器的连接需要Broker来联系。<br /><br /><br />环境为winxp sp2 + delphi 7 + db7.
2010-05-31 14:07:00
489
原创 分页测试
<br />最近做了一个分页的小系统，但在分页过程中，不能够真正的移动页面记录。不知道怎么办，后来就语句实现，写了存储过程，真正实现了分布。存储过程如下，<br />create proc SqlPager<br />@sqlstr nvarchar(4000),--查询字符串<br />@currentpage int,--第N页<br />@pagesize int,--每页行数<br />@pagecount int output --总页数<br />as<br />set nocount on<b
2010-05-31 11:01:00
402
原创 分页的存储过程，很好用的。
create proc SqlPager@sqlstr nvarchar(4000),--查询字符串@currentpage int,--第N页@pagesize int,--每页行数@pagecount int output --总页数asset nocount ondeclare @P1 int,--P1是游标的id@rowcount intexec sp_cursoropen @P1 out
2010-05-31 10:49:00
312
原创 INI file 详解。
INI fileFrom Wikipedia, the free encyclopediaJump to:navigation, search The INI file format is a de facto standard for configuration files. INI files are simple text files with a basic s
2010-05-27 15:26:00
1576
转载 猫与虎——浅谈开源协议与开源精神
本周对中国开源界影响最大的事件是什么？我想，莫过于射手播放器开发日志中关于"射手播放器项目公开谴责腾讯违反开源协议"（原文地址：http://blog.splayer.org/?p=1960 ）一文的发表了。 曾几何时，某些业界知名的巨鳄大佬，元勋宿旧们，或自觉或不自觉地纷纷加入"山寨大军"，多少年来不能自拔。本来嘛，"嚼人吃过的馍不香"，是连三岁娃娃也懂得的浅显道理，有理性的成年人更是不
2010-04-08 16:12:00
618
转载 sql 大全，来看看吧。
一、基础1、说明：创建数据库CREATE DATABASE database-name 2、说明：删除数据库drop database dbname3、说明：备份sql server--- 创建 备份数据的 deviceUSE masterEXEC sp_addumpdevice disk, testBack, c:/mssql7backup/MyNwind_1.dat--- 开始
2010-03-27 10:09:00
293
原创 用序列号觖决安全问题
今天做了一个数据库用户的安全问题，发现可以得到硬盘的序列号，做为登录账号的唯一标识，用户安全也大体都实用这种方式。但要获取CPU的序列号就不那么容易了。要真正的嵌入低级的编程语言了。 elphi 获取硬盘 序列号function GetIdeNum: String;type TSrbIoControl = packed record HeaderLength : ULON
2010-03-22 16:30:00
348
转载 The history 0f Borland
历史 Borland名称的由来与公司的创立 Borland - A Little History of the Name -- David Intersimone 1981年8月，3个丹麦人Danish citiz
2010-03-11 15:55:00
548
原创 TRegware的应用
今天本来是用TREGWARE 来做软件的安全注册，可以现都是一些全英的信息，没有太多有价值的技术性东西。但还得解决共享软件的安全问题，又开始让我头痛的英语时代了。 TRegware 3.22 - WAK ProductionsDelphi / Compression, Encryption This program helps developers of shareware i
2010-03-11 15:28:00
1264
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人