- 博客(52)
- 资源 (4)
- 收藏
- 关注
RSS订阅转载 TClientDataSet[5]: 读取数据
本例用到:-------------------------------------------------------------------------------- TClientDataSet.Fields[]; { 字段集合; 它比 FieldList 有更多功能, 如可获取嵌套字段 }TClientDataSet.FieldList[];
2013-01-03 21:53:09
214
转载 TClientDataSet[8]: 关于索引与排序
索引的目的有三: 快速定位、排序、建立主从表. 下面是相关属性与方法:-------------------------------------------------------------------------------- IndexDefs; { }IndexFieldCount; { }IndexFieldNames; { }IndexFields
2013-01-03 21:48:47
220
转载 TClientDataSet[9]: 计算字段和 State
TClientDataSet 中计算字段有两种: Calculated(计算字段)、InternalCalc(内部计算字段).两者区别是: Calculated 在每次需要时都要重新计算; InternalCalc 只需要计算一次. Calculated 需要计算的时间, InternalCalc 需要存取的时间; 当然后者快.计算字段不会被保存到文件.--------------
2013-01-03 21:47:34
248
转载 TClientDataSet[11]: 分组统计
设计时实现的分组统计: 运行时实现的分组统计:-------------------------------------------------------------------------------- //前期只需要添加 ClientDataSet1、DataSource1、DBGrid1; 事件只需要关联窗体的 OnCreateunit Unit1;inte
2013-01-03 21:45:17
185
转载 TClientDataSet[12]: 查找
方法有: 1、Locate: 根据字段列表和对应的字段值查找并定位, 找到返回 True. 2、Lookup: 根据字段列表和对应的字段值查找, 返回需要的字段值. 3、SetKey、GotoKey 或 SetKey、GotoNearest: 根据索引字段的值查找, 先切换状态再根据条件定位. 4、FindKey 或 FindNearest: 根据索引字段的值查找.其中的 Go
2013-01-03 21:43:55
181
转载 TClientDataSet[19]: 查找字段(fkLookup)
动态建立(其中的 School 字段是 Lookup 字段)://先在窗体上放置: DBGrid1、DataSource1、ClientDataSet1、ClientDataSet2; 其他全用代码实现:procedure TForm1.FormCreate(Sender: TObject);begin { 关联控件 } DBGrid1.DataSource :=
2013-01-03 21:38:04
312
转载 TClientDataSet[23]: 使用数据集字段(TDataSetField)
运行时的设计方法:设计时的准备工作:ClientDataSet1、DataSource1、DBGrid1 并关联, 这用于主表;ClientDataSet2、DataSource2、DBGrid2 并关联, 这将成为主表的一个字段(或叫嵌套表);还可以放个 Splitter1 来协调 DBGrid 的大小. procedure TForm1.FormCrea
2013-01-03 21:36:13
207
转载 TClientDataSet[22]: 数组字段与 ObjectView
数组字段(ftArray) 与 ADT 字段类似(设计过程一样), 定义数组字段时只需定义一个元素来说明元素类型.本例同时测试 ObjectView 为 True 和 False 时的不同效果.下面是在运行时实现的数组字段: //先在窗体上放置: DBGrid1、DataSource1、ClientDataSet1 并关联, 然后:procedure TFo
2013-01-03 21:33:11
200
转载 TClientDataSet[20]: 使用 Blob 字段
Blob(Binary Large Object) 字段包括:ftBlob, ftMemo, ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString,ftLargeint, ftADT, ftArray, ftReference,
2013-01-03 21:26:56
193
原创 一组 Delphi 快捷键
下面的快捷键大部分在Delphi 5.0的菜单中找不到，其中有一些还是非常有用的。 Ctrl+PageUp 将光标移至本屏的第一行，屏幕不滚动。 Ctrl+PageDown 将光标移至本屏的最后一行，屏幕不滚动。 Ctrl+↓ 向下滚动屏幕，光标跟随滚动不出本屏。 Ctrl+↑ 向上滚动屏幕，光标跟随滚动不出本屏。 Ctr
2012-11-17 16:53:26
158
转载 几个和当前路径相关的新函数
转自：http://www.cnblogs.com/del偶然从 SysUtils 里发现了几个路径相关的函数, 以前没见过, 可能是 2010 新增的:GetLocaleDirectory();GetLocaleFile();LocaleDirectoryExists();LocaleFileExists();应用测试:uses IOUtils
2012-11-17 13:48:48
303
转载 一句话复制整个文件夹(当然包括嵌套文件夹)
转自：http://www.cnblogs.com/del使用的是 Delphi 2010 下 IOUtils 单元的 TDirectory.Copy 函数:uses IOUtils;procedure TForm1.Button1Click(Sender: TObject);const SourceDir = 'C:\Temp\Folder1'; { 源文件
2012-11-17 13:46:22
173
转载 现在, Delphi 的多线程已经非常易用了!
转自：http://www.cnblogs.com/del先看一个非多线程的例子, 代码执行时不能进行其它操作(譬如拖动窗体):{自定义方法: 在窗体上绘制...}procedure MyMethod;var i: Integer;begin for i := 0 to 500000 do begin Form1.Canvas.Lock;
2012-11-17 13:34:09
317
转载 Application.Title在Win7下失效了？
Delphi XE会默认使用Mainform的Caption作为Application的title，就是你在任务栏上看到的标题。实际上这是为兼容Vista设计的，如果你要显示自定义的标题，需要修改项目文件, begin Application.Initialize; Application.MainFormOnTaskbar := False; //otherwise wi
2012-11-17 13:09:01
145
转载 Delphi中Frame的使用方法
Frame是组件面板上的第一个组件，但不是每个人都知道怎么用它，因为它不像Button和Label一样简单明了。实际上，Frame按钮只是打开一个Frame的列表，如果你没有创建任何的Frame，自然什么也不会看到。那么Frame到底是什么呢？简单来说：1. Frame是组件容器，类似Panel2. Frame在使用上类似Components组件，但并没有构造器
2012-11-17 13:08:10
811
转载 Delphi XE Refactor重构功能简单说明
如果要我只选一个升级到XE的原因，我会选重构。对用惯D7的朋友，这确实是一个非常实用的新功能，但如果你用过Visual Studio，就会发现微软早就实现了类似的功能。让人困惑的是，XE的重构子菜单有一长串，很多菜单很难直观地想像出其功能。别担心，这些都是给建模用的(比如把某个类方法转移到另外一个类），你常用到的只有几个，仔细的你会发现其实就是设了快捷键的那几个。1. Rena
2012-11-17 13:07:00
159
转载 sql中不存在则插入记录小技巧
以前都分两步，先判断记录数: select count(*) 如果值等于0则表示不存在，然后再插入数据。其实可以用insert ...select一步完成create procedure p_add_fav_task @taskid int,@opid varchar(10)as insert into task_fav(taskid,opid,opda
2012-11-17 13:05:44
258
转载 sql中不存在则插入记录小技巧
以前都分两步，先判断记录数: select count(*) 如果值等于0则表示不存在，然后再插入数据。其实可以用insert ...select一步完成create procedure p_add_fav_task @taskid int,@opid varchar(10)as insert into task_fav(taskid,opid,opda
2012-11-17 13:05:09
151
转载 TBalloonHint气泡提示的用法(How to use TBalloonHint)
XE中提供了一个非常简单实用的气泡提示组件TBalloonHint，但怎么个用法似乎没有详细的说明，下面给大家一段演示代码//代码段1, 加载系统默认图标 FImageList := TImageList.Create(AOwner); FImageList.Height := 24; FImageList.Width := 24; FIma
2012-11-17 13:04:09
307
转载 Parent属性的另类用法
Parent属性是用来控制控件的显示层次的，所有的TWinControl都有Parent属性，包括TForm。如果你设置TForm的Parent的为一个Panel，在整个Form就嵌入到Panel里了。举一个应用的例子，假设你有一个配置界面，一个有很多Page的PageControl, 又假设每个Page的逻辑不太相干，如果所有代码都写在同一个单元里，读起来就很吃力。可以利用Form的Pa
2012-11-17 13:02:46
137
JDK环境变量配置小工具
很多初学者都配置JDK环境变量有点麻烦. 这个工具帮你排忧解难.2步搞定.省时. 使用方法: 1.下载JDK,安装完毕后 2.运行EnvParamSet.exe工具,指定JAVA_HOME为JAVA安装目录.一般情况下其它路径无需更改. 保存即可. QQ:534788532Email:[email protected]...
2009-01-10 09:33:19
72
向已存Excel文件中导入数据小结
其实前面提到的导出数据到Excel文件中的写入流方法都是新建状态下的Excel文件，重新定位文件头和文件尾，会的损坏原文件。假如有一个已存Excel文件xlsFile.xls中，已有其它数据，只需向其中添加一引起数据，显然在前几种方法难解决。 现有办法解决，效率相对还过得去（还可以向其中写Excel公式）：大体方法以描述：定义一个 lst :TstringList ，向其中添加要写入Exc...
2008-08-21 18:36:15
62
原创 Delphi编程将数据库数据快速导入Excel
在开发数据库应用程序中，经常要将类型相同的数据导出来，放到Excel文件中，利用Excel强大的编辑功能，对数据作进一步的加工处理。这有许多的方法，我们可以使用OLE技术，在Delphi中创建一个自动化对象，通过该对象来传送数据。 也可以使用ADO，通过与Excel数据存储建立连接，使用ADO这种独立于数据库后端的技术来导出数据集的数据。 可这两种技术都有一个共同的缺点，那就是慢，数据量少还好...
2008-08-20 13:50:33
85
原创 快速导出数据到Excel（一）：利用剪贴板
快速导出数据到Excel（一）：利用剪贴板 将数据导出到Excel的方法有多种，速度有快慢之分，我用过三种方法，速度都比较快，下面的一种是通过剪贴板进行，不过在个别W2K以上的系统，由于字符集编码不同，中文内容导出到Excel后可能变成乱码。//显示进度条面板procedure ShowProgress(Min, Max, Position: integer);begin pnlProg...
2008-08-20 13:36:22
139
原创 Delphi自动化控制Excel
如何控制Excel程序来输出数据，插入公式并根据数据画出图表来呢？Delphi 5 提供了一组封装了Office 97和Office 2000的控件，这组控件位于控件面板的Servers页面上，它可以极大地简化对Office的调用。不过糟糕的是，Borland并没有为这些控件提供使用帮助，但实际上使用这些控件是非常简单的，并且Office的对象体系也在Office的帮助中有着详细的说明。 下面我...
2008-08-18 18:28:08
113
原创 http://blog.csdn.net/ycw/
http://blog.csdn.net/ycw/ 2004年09月05日 每日编译的入门实践daily-build night-build cvs,wincvs,cvsnt bugzilla,perl,bat阅读全文>发表于 @ 2004年09月05日 17:39:00|评论(9<script type="text/javascript"></scri...
2008-08-08 15:52:28
194
原创 ViewCVS Installation for Windows
Installing ViewCVS on Windows for Microsoft IISLast updated 16 Jan 2004 for ViewCVS 1.0-dev for Windows Release 5.ViewCVS or CVSWeb? ViewCVS has the following advantages:Doesn't require write acc...
2008-08-08 15:49:01
79
原创 用cvs实现复杂的权限控制
作者：张元一这篇文章的基础是：为CVS建立只读用户，如果你对CVS不太了解，我建议你在这篇文章之前先读一下那篇文章或者其他的介绍CVS的文章以对CVS有一个大致的了解。在上一篇文章中我们讲到了如何为CVS建立只读用户，但是在有些应用中，可能一个CVS服务器上存在有多个项目，也就是多个仓库，那么如何对这些项目进行权限管理呢？能不能让一个用户对这个项目具有写权限，而对其他项目只具有读取权限呢？答案是可...
2008-08-08 15:46:46
90
原创 CVS权限设置
不同用户设置不同的访问权限方法 DALANG 20040112关于权限管理的操作，我感觉不错的 假设有用户1：lxw ;用户2：zxh有用户1的模块::lxwdir;用户2的模块:zxhdir要求 lxw 只能访问lxwdir;zxh只能访问zxhdir第1步，设置CVS的库配置文件（模块CVSROOT）的访...
2008-08-08 15:43:36
73
原创 关于CVS在Window2000下的权限管理
一. CVS版本问题CVS分开客户端和服务器端两个程序，服务器端在Windows平台下用CVSNT，目前这个软件基本稳定，但速度和在Linux/Unix下相比,稍微慢些。但对于熟悉Windows应用程序的人来说，由于其操作简单，不失为一个好的选择。 注意:客户端和服务器端两方面的版本统一十分重要。本文挡建议使用：服务器：CVSNT2.0.34 在www.cvsnt.org下载...
2008-08-08 15:40:33
55
原创 软件开发项目管理的简单方法
有关项目管理的一点实践经验！（产品成形过程探讨） 引言 在论坛上经常看到很多人有关项目管理的经验，而且都是长篇大论，侃侃而谈；总是看得我晕头转向，总感觉，都是停留在人的作用上，总是强调管理中的人为因素，几乎很多条目都是带有很强的人为色彩，看完后，总是觉得这些经验很不错，但是自己往往却很难在自己的项目中具体实施。 想法 本人是一个实践主义者:)，自己在项目管理中...
2008-08-08 12:36:39
77
原创 数据感知控件之浮想联翩
Delphi制作数据感知控件之浮想联翩知识点本文共有6个关于控件的知识点：1、基本控件的制作；2、感知属性的添加；3、关联控件的销毁处理；4、事件方法的赋值； 5、属性页的制作； 6、组件包设计思想 关于制作感知控件的文章有不少，但涉及的内容大都比较单一，读者只能依照文章的陈述按部就班地操作，无法很好的理解控件的制作机制。本文试图通过讲解一个控件的制作流程来着重阐述制作感知控件的思路和...
2008-07-19 15:44:45
114
原创 SQL备份
备份： backupsql := 'backup database TBdate to disk = ''' + FormBackupData.BackupPath.Text + FormBackupData.BackupName.Text + '.bak''with Init'; try with dm.qrymain do begin dm.qrymain.Close; dm...
2008-07-17 10:01:50
49
原创 SQL导入/导出Excel
这是在CSDN上邹键的东西，推荐给大家。 从Excel文件中,导入数据到SQL数据库中,很简单,直接用下面的语句: /*===================================================================*/ --如果接受数据导入的表已经存在 insert into 表 select * from OPENROWSET(’MICRO...
2008-07-17 10:01:18
59
ARP攻击软件源码
/*************************************************************************** main.c - description ------------------- begin : 五 2月 14 20:00:42 CST 2003 copyright : (C) 2003 by root email : ***********...
2008-06-25 16:29:58
68
MD5破解相关MAKE.bat
信息来源：xfocusz:\md5coll>MAKE.batMicrosoft (R) 32-bit C/C++ Optimizing Compiler Version 12.00.8804 for 80x86Copyright (C) Microsoft Corp 1984-1998. All rights reserved.Microsoft (R) 32-bit C/C++...
2008-06-25 16:27:44
59
一段隐藏文件的C++程序源代码
#include <iostream>#include <string>#include <fstream>using namespace std;int injectfile(char *, char *, char *, char *);//隐藏文件函数int exportfile(char *, char *, char *, char *);//输出文件...
2008-06-25 16:25:49
128
简易Telnet后门源代码
////////////////////////////////////////////////////////////////////////////////// // Telnet Server. // // File : Tini2.cpp/////////VC 6.0编译通过///////////////////////////////////#include #include #prag...
2008-06-25 16:19:15
79
多线程下载
unit GetMM;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,IdTCPClient, IdHTTP;constUrl='[url]ht...
2008-06-25 16:03:51
71
Invalid command 'RewriteEngine' 解决办法
今天看zend framework tutorial时候，运行例子，apache log 中出现如下错误：Invalid command 'RewriteEngine', perhaps mis-spelled or defined by a module not included in the server configuration解决办法：打开httpd.conf ，取消 Load...
2008-06-22 09:34:59
216
Python3基础教程 (2018最新版带书签高清文字版)
2018-08-13
时间同步工具
2013-10-18
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人