xxhh07的专栏

Delphi更改IE首页代码2008-01-29 00:38uses registry;var   reg:Tregistry;////////////////////////////////////////////////////procedure changeIE;var   ret2:HKEY;begin   reg:=Tregistry.Create;   re

Borland DataSnap(MIDAS)三层架构编程中，DataSetProvider的Option属性DataSetProvider的Option属性 看看远端数据模块里的DataSetProvider的Option属性是否设置正确！Provider控件的Options属性值是一个集合，用于设置有关打包和传递的选项，像显示哪些字段、允许哪种更新方式等等。1.         poFetchBlobsOnDemand：若包含此项，则表示数据包中不包括BLOB字段。不过，如果客户端的TclientDat

<br />这应该不算是什么技巧，估计有数据库方面程序的Delphi程序员都知道；本来没有写想到<br /> 需要把它写成一篇贴子，但前不久看个别刚入门的兄弟的代码时。才发展他们还在刀<br /> 耕火种，为此才想把它写出来算是对入门的兄弟们的一点帮助，让大侠们见笑了；<br />  我们都知道TCLIENTDATASET有把对它其中的数据所做的修改记录下来的功能；如果需要还可以将<br />  修改回复到以前的某个状态，而且结合DATASETPROVIDER还可能自动完成改动到SQL映射，将改动成批提交到

<br />其实delphi优秀的数据集组件真不少，除了上诉的数据集组件，还有ZEOSDB、SQL Direct、UniDAC等，要是专业的数据集组件，更是百花盛开，如FIBPLUS、SDAC、ODAC、DOA等等，商业和开源不尽其中！这里只讨论UniDAC和ADO的一些比较。<br /><br />       Delphi能发展到现在，和一些著名的第三方控件厂商大力支持分不开，这其中包括Devart公司(Corelab)公司。Corelab公司做数据集驱动非常出名，就拿ODAC、SDAC和DBX驱动来说

<br />用DELPHI建立多线程COM服务器 <br /> <br />  <br />摘要：本文探讨了多线程COM服务器的原理，然后详细介绍利用DELPHI建立多线程COM服务器的方法和步骤，并给出了相应测试实例。<br />关键词：组件对象模型（COM）、单线程单元模式（STA）、应用程序服务器<br /> <br />本文从实践的角度，详细介绍了在delphi中建立多线程Apartment COM服务器的方法和步骤。有关线程和COM技术的详细内容，请读者参考有关书籍。为便于理解，这里对本文涉及的内

TClientDataSet与TTable、TQuery一样，TClientDataSet也是从TDataSet继承下来的，它通常用于多层体系结构的客户端。 TClientDataSet最大的特点是它不依赖于BDE(Borland Database Engine)，但

简介极限编程(Xtreme Program)的测试理念是，在开发程序的之前或者同时就要编写出相应的测试程序，而不是象通常那样等到测试阶段再来编写测试程序。 当程序完成时，它的测试程序也应该已经完成。从软件工程的普遍规律来看，每修正一个bug的同时会以20％的几率引入新的bug。而XP的测试方式是， 每当修改Bug或者重构代码后都要重复测试所有的测试案例，以免在修改代码时引入新的Bug，只有经过

Delphi中所有类都继承自TObject ,Create默认不是虚方法 ,Destroy默认是虚方法.VCL中组件继承的大多Create都被声明成虚方法了。在Delphi当中构造函数当中的create与析构函数destroy大部分都是虚方法.可以覆盖.被覆盖的函数必须是虚(virtual)的，或者是动态(dynamic)的. (Constructors)构造函数,  用来

TOSVersion类型     增加了一个记录类型：TOSVersion，看名字就知道它和版本功能有关，这比之前的函数好用多了，其实以前也没必要有它，这回是跨平台了才需要它。它可以获知当前运行环境是 x86，还是 x64，是 windows，还是 mac，并且还能得到操作系统的具体版本号，还可以方便的判断当前版本是否高于某个版本。它还有个叫 ToString() 的方法，它返回的结果符合

首先要解释下对像生存期(LifeCycle)  'Server'          对像在Server运行过程中全局存在, 对像的类成员变量都是线程不安全的, 多个客户连接都是共用它的  'Session'        对像在一个客户连接时建立/断开时释放, 类成员变量都是线程安全的, 全局变量仍然是线程不安全的  'Invocation'   对像在每个客户请求时建立(远程方法)/

<br />如果webbrowser由你创建<br />如果网页内容可知<br />用263举个例子<br />procedure   TForm1.FormCreate(Sender:   TObject);<br />begin<br />    b   :=   false;<br />    webbrowser1.Navigate('http://www.263.net');<br />end;<br />procedure   TForm1.WebBrowser1DocumentComplete

一般解决方法是在线程开始启用 CoInitialize(nil)，线程结束调用 CoUninitialize 。如果你使用多种数据库连接，比如三层中经常切换到MSSQL和Oracle，我们只需在判断 TUniConnection 的连接前事件 OnBeforeConnect 写下如下代码：procedure TServDBFunc.ServConnBeforeConnect(Sender: TObject);beginif (ServConn nil) and SameText(ServCon

让搜索框随表格位置变化在做一个数据录入的时候,经常用到,有些数据需要从代码表中进行录入,但一般的表格控件又不支持根据助记码进行搜索,保存编码,所以一般会设计成,选中某列以后,根据需要自动弹出代码列表供用户选择,下面的例子就是序代码表弹出的位置,可以处由变换的例子,当然可以根据自己需要修改什么时候可见,什么时候不可见:procedure TForm1.vwFocusedItemC

 终于将ADO达到DBX一样的速度，ADODataSet需要这样设置： CursorType=ctOpenForwardOnlyLockType=ltReadOnlyCrusorLoation=clUseServer 光设置CursorType和LockType是没什么用的，必须要设置CursorLoa

网上找来的 感觉对入门者很有启示 收藏一下了!No.1 判断逻辑类型 }var B: Boolean;beginB := Boolean(2); //这样只是为了调试//B := True;if B = True then ShowMessage(B = True); //不建议//不安全///////if B then ShowMessage(B); //建议//简短end;va

 分享一下ExpressQuantumGrid4的cxGrid的一些使用方法和经验　　 使用cxGrid有一些时间了，在这里总结一下使用cxGrid的一些方法，希望给刚开始接触cxGrid的人一些帮助。 　　1.简单介绍：cxGrid右下方的cxGrid1Level1是表示Grid表的层，cxGrid可以有多层，这相当于集合了PageControl的功能,而cxGrid1Lev

//检测U盘插入、拔出 测试通过1、新建工程；2、定义一个私有过程procedure WMDeviceChange(var Msg: TMessage); message WM_DEVICECHANGE;完整代码如下：unit Unit1;interfaceuses   Windows, Messages, SysUtils, Variants, Classes, Graphi

2005年7月一段控制摄像头的代码unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, ExtCtrls, StdCtrls;type  TForm1 = class(TForm)    btnStart:

cxGrid技巧汇总2009-04-01 12:48========================================================================== 在主从TableView中根据主TableView得到对应的从TableView var ADetailDC: TcxGridDataController; AView:

 2005年7月VideoCapture控件{------------------------------------------------------------------------------  Unit Name : VideoCapture  Author    : Liren Zhao  Email     : LirenZhao@tom.com  Msn   

大多数文章中都或多或少的讲到了三层架构。表示层，业务层，数据层。又把业务层再细分，分为外观服务层，主业务服务，及数据库库服务层。今天主要讨论一下业务层吧。举个最简单的例子。客户端获取数据。业务层要与表示层尽量解藕， 我的方法是：首先我们在中间层TLB_中定义一个接口 IBusinessService, 定义一个方法。getvoList，我要得到一个VO的列表， VO即ValueObject, 例如：TValueObject= class(TPersistent) priva

在过程、函数、事件内部， SHIFT+CTRL+向上的方向键 可跳跃到相应的过程、函数、事件的定义．相反，在过程、函数、事件的定义处，SHIFT+CTRL+向下的方向键 可跳跃到具体过程、函数、事件内部<br />CTRL+ SHIFT + C:编写申明或者补上函数. <br />如： <br />procedure TT.A(AA: string); //函数申明 <br />安下：CTRL+ SHIFT + C后，会写上 <br />procedure TT.A(AA: string); <br />b

绑定模式下，数据被存储在数据库系统中。要使scheduler工作在绑定模式下，应将TcxScheduler.Storage属性绑定到TcxSchedulerDBStorage部件。步骤如下：1.创建两个用以存储数据的表SchedulerTable、SchedulerResourcesTable，结构如下：create table schedulertable(ActualFinis