Delphi
文章平均质量分 58
iteye_20565
这个作者很懒,什么都没留下…
展开
-
Delphi7中ClientDataSet的排序
1、控件ClientDataSet的属性IndexFieldNames 这个属性是按照正序排序,多个排序用;号隔开。例如:ID;NAME。2、控件ClientDataSet的属性IndexDefs 这个属性可以设置正序和逆序。直接点击...新建一索引(如cdsIndex),在索引Fiels属性输入要排序的字段(如ID或ID,NAME),然后在件ClientDataSet...2011-08-05 19:59:13 · 704 阅读 · 0 评论 -
Delphi组件安装方法
Delphi组件安装方法由于组件提供的方式不同,所以安装的方法也是不一样的,下面就目前常见的各种形式的组件的安装方法介绍一下。 1、只有一个DCU文件的组件。DCU文件是编译好的单元文件,这样的组件是作者不想把源码公布。一般来说,作者必须说明此组件适合Delphi的哪种版本,如果版本不对,在安装时就会出现错误。也正是因为没有源码,给使用者带来了不便,那就是一旦Delphi版本升...原创 2011-08-06 23:53:26 · 108 阅读 · 0 评论 -
Delphi中ClientDataSet的用法小结
TClientDataSet控件继承自TDataSet,其数据存储文件格式扩展名为 .cds,是基于文件型数据存储和操作的控件。该控件封装了对数据进行操作处理的接口和功能,而本身并不依赖上述几种数据库驱动程序,基本上能满足单机"瘦"数据库应用程序的需要。 一、TClientDataSet的基本属性和方法介绍 1、FieldDefs: 字段定义列表属性 ...原创 2011-08-09 20:20:17 · 635 阅读 · 0 评论 -
Delphi中ClientDataSet的数据查找
ClientDataSet的数据查找。我所介绍的心得和技巧都是用ClientDataSet来做范例,也可以应用于其他的一些DataSet。废话就不多说了。我们还是先看代码,让后再总结。1.Scanning 扫描数据查找这是最简单最直接也是最慢的一种方法,遍历所有数据:procedure TForm1.ScanBtnClick(Sender: TObject);varFound: Boolean;b...原创 2011-08-09 20:36:44 · 159 阅读 · 0 评论 -
Delphi中ClientDataSet浅析
与一般的数据集组件不同,TClientDataSet使用的技术比较特别,本着高速度、低存储需求的原则TClientDataSet的内部使用了两个数据存储源。第一个是其Data属性,这是当前内存数据的视图,反映了所有的数据改变。如果用户从数据中删除一条记录,则此记录将从Data中消失,相应地,加入一条新记录后,此记录便存在Data属性中了。另一个数据源是Delta属性,故名思义,即增量...原创 2011-08-10 12:23:38 · 343 阅读 · 1 评论 -
Delphi中Indy 10的安装和老版本的卸载
Indy 10的安装和老版本的卸载Indy 10下载地址:http://www.indyproject.org/downloads/10/indy10.0.52_source.zipIndy 10 安装步骤 1、解压压缩包。 2、打开\System\IndySystem70.dpk,点Compile。 3、打开\Core\IndyCore70.dpk,点Compile。 4、打开\...原创 2011-08-10 15:25:43 · 393 阅读 · 0 评论 -
Delphi中IdTcpServer 用户掉线检测方法
正常情况下,当登陆用户异常掉线并不会通知服务器,这时服务器一直以为用户在线,解决这种问题有以下两种方法:一、轮训检测连接情况,需要Timer轮训检测,如下代码:procedure TMainForm.Timer1Timer(Sender: TObject);begin CheckForDisconnect();end;procedure TMainForm.CheckFo...原创 2011-08-10 21:53:09 · 555 阅读 · 0 评论 -
Delphi中ExtractFilePath()及其相近函数用法
ExtractFilePath() 功能:返回完整文件名中的路径 函数原型如下: AnsiString __fastcall ExtractFilePath; ExtractFilePath和相近函数: ExtractFileDrive :返回完整文件名中的驱动器,如"C:" ExtractFilePath:返回完整文件名中的路径,最后带“\”,如"C:\zhu\" ...原创 2011-08-11 15:09:12 · 391 阅读 · 0 评论 -
Delphi7中WebBrowser控件HTML源码的读写
写入:procedure TForm1.LoadStream(WebBrowser:TWebBrowser; Stream:TStream);var PersistStreamInit: IPersistStreamInit; StreamAdapter: IStream; MemoryStream: TMemoryStream;begin WebBrowser...原创 2011-08-23 10:15:29 · 408 阅读 · 0 评论 -
DataSnap Stream 传递大数据
DataSnap可以直接传递和返回TStream类型的参数,这点是很方便的。但是很多人发现好像大小稍微大点就工作不正常了,就变相使用其它类型转换来转换去,这样便利性就失去了。 官方有篇博客很详细的介绍了stream的使用,英文好的可以去看下DataSnap Server Method Stream Parameters DataSnap默认的缓存...原创 2012-05-03 17:08:25 · 510 阅读 · 0 评论 -
WinAPI: ShellExecute打开外部程序或文件
ShellExecute( hWnd: HWND; {指定父窗口句柄} Operation: PChar; {指定动作, 譬如: open、print} FileName: PChar; {指定要打开的文件或程序} Parameters: PChar; {给要打开的程序指定参数; 如果打开的是文件这里应该是 nil} Directory: PC...原创 2012-05-18 12:50:47 · 166 阅读 · 0 评论 -
简述个人知识体系建立
自互联网在中国普及开始,我们就不停地听到这么一句话–“我们生活在一个信息爆炸的时代”。的确,我们可以通过电脑和手机轻而易举的获得各种知识,但是你有没有觉得“我们生活在信息的海洋里,却忍受着知识的饥渴”?我们习惯在看到认为好的内容时将其收藏,但是收藏的数量总是远远超过阅读的数量。网站越看越多,但是在需要某些资料的时候却无法找到。随着时代的发展,在这个“知识就是力量”的社会,知识管理逐渐成为一...原创 2012-05-18 12:58:24 · 226 阅读 · 0 评论 -
Delphi 中StringList带空格分割
正常情况下,用Delimiter进行分格时,无论分割符为什么,空格都自动转成分割符处理.在代码中加入:stringlist.StrictDelimiter := True;可以避免这种情况.示例代码:procedure TForm1.btn1Click(Sender: TObject);vars : TStringList;begins := TStringList.Create;...原创 2012-05-20 15:00:45 · 890 阅读 · 0 评论 -
Delphi中TStringList的用法
TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的。 常规的用法大家都知道,现在来讨论它的一些高级的用法。 先把要讨论的几个属性列出来: 1、CommaText 2、Delimiter & DelimitedText 3、Names & Values & ValueFromIndex 一、CommaText 用法var st...原创 2011-08-06 23:52:33 · 261 阅读 · 0 评论 -
Delphi7控件FastReport的安装方法
系统环境: Windows XP 标装版 Delphi7 控件版本: FastReport 4.3安装前请册除原有的FR控件。1、 "Tools|Environmet options..."中的"Library"标签面下"Library path"添加FastReport路径。 FastReport 4.3\FastQB FastReport 4.3\FastScript Fas...2011-08-06 22:28:55 · 1124 阅读 · 0 评论 -
Delphi7中cxGrid控件自动编号
在cxGrid的GridView属性设置事件onGridCustomDrawIndicatorCell,事件关键代码如下: procedure TfrmHidden_Trouble.GridCustomDrawIndicatorCell( Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGrid...2011-08-05 20:04:06 · 226 阅读 · 0 评论 -
Delphi7获取本机名称的代码
function GetComputerNameEx: string; //获取本机名称var ComputerName: PChar; size: DWord;begin GetMem(ComputerName, 255); size := 255; // 获取计算机名称 if GetComputerName(ComputerName, s...2011-08-05 20:07:43 · 208 阅读 · 0 评论 -
Delphi中idHttp的基本用法
一、IDHTTP的基本用法 IDHttp和WebBrowser一样,都可以实现抓取远端网页的功能,但是http方式更快、更节约资源,缺点是需要手动维护cook,连接等IDHttp的创建,需要引入IDHttpprocedure InitHttp();begin http := TIdHTTP.Create(nil); http.ReadTimeout := 3...原创 2011-08-06 13:33:47 · 248 阅读 · 0 评论 -
Delphi中destroy, free, freeAndNil, release用法和区别
这片文章转自CSDN某博客,以前用Free和freeAndNil比较多,但没细分析过。看完以后觉得对自己也很有启发。博主也是转自别处,我当了一次二传手。------------------------------------------------------------------------------------------------------------------------...原创 2011-08-06 13:35:16 · 126 阅读 · 0 评论 -
Delphi 显示图片
我們知道BLOB在数据库的表中实际上是以二进制数据的形式存放的。由于BLOB的特殊性,一般的程序都无法处理它。比如,如果在一张表中存在BLOB, 当用數據顯示控件打开它时,BLOB列将只显示BLOB字样。至于该列中实际存的是什么数据是一般的數據顯示控件无法知到的。如果在我们编制的程序中,用 DBGrid控件打开一个有BLOB字段的表,效果也一样。我们的程序无法直接显示、编辑以及插入BL...原创 2011-08-06 14:41:17 · 284 阅读 · 0 评论 -
Delphi控件RzSizePanel的打开与关闭
Delphi控件RzSizePanel的打开与关闭的方法 RzSizePanel1.CloseHotSpot; //关闭 RzSizePanel1.RestoreHotSpot;//打开原创 2011-08-06 16:40:32 · 426 阅读 · 0 评论 -
Delphi连接Oracle控件ODAC的安装及使用
Delphi连接Oracle有很多种方式,但大多要在客户机上安装Oracle那庞大的客户端,比较的不方便,使用ODAC控件连接Oracle则免去了这等麻烦.ODAC也是Oracle公司开发的控件.有for Delphi 6- Delphi 2007的版本,最新的ODAC版本已经到了ODAC 11.1.0.6.21版本了,不过对于我们来说,版本不一定要最新的,够用最好,不是么?Oracle 数据...原创 2011-08-06 16:44:54 · 539 阅读 · 0 评论 -
Delphi控件cxGrid数据录入
一、数据录入 1、 在TcxGridDBTableView中,设定属性NewItemRow.Visible = True 2 、在cxgrid中输入数据怎样回车换行 在TcxGridDBTableView中设置属性OptionsBehavior.FocusFirstCellOnNewRecord = True OptionsBehavior.GoToNextCell...原创 2011-08-06 16:50:46 · 1036 阅读 · 0 评论 -
Delphi控件cxGrid 如何动态创建列?
var i: Integer; Column: TcxGridDBColumn; cxView: TcxGridDBTableView; begin cxView := Self.Levels[0].GridView as TcxGridDBTableView; if cxView.DataController.DataSource <> nil then...原创 2011-08-06 16:52:31 · 572 阅读 · 1 评论 -
Delphi获取计算机名称及IP地址
[code="Delphi"]function GetComputerName:String; //获取计算机名称var wVersionRequested : WORD; wsaData : TWSAData; p : PHostEnt; s : array[0..128] of char;begin try wVersionRequested :=...原创 2011-08-06 16:59:49 · 415 阅读 · 0 评论 -
Delphi得到汉字的首字母
function GetPYIndexChar( hzchar:string):Char;begin case WORD(hzchar[1]) shl 8 + WORD(hzchar[2]) of $B0A1..$B0C4 : result := 'A'; $B0C5..$B2C0 : result := 'B'; $B2C1..$B4ED : result...2011-08-06 17:03:04 · 168 阅读 · 0 评论 -
Delphi中扩展的字符串操作函数
{*****************************扩展的字符串操作函数*****************************}procedure SwapStr(var s1, s2: string); // 交换字串function StrRight(Str: String; Len: Integer): String; //返回字符串右边的字符 Examples: Str...原创 2011-08-06 17:05:16 · 222 阅读 · 0 评论 -
Delphi版RC4加密算法
{=============================================================================== 函数名: Rc4_StrEncrypt() 描 述: RC4 Based string encryption 参 数: i_Encrypt ——为 1 是加密, 0 是解密(integer类型); ...原创 2012-05-27 00:54:36 · 1064 阅读 · 0 评论