下午2：00，来到了在北山路上的香格里拉饭店参加 李维的高效率delphi.net讲座，会厅不算大，但是座无虚席。 在整个讲座中，李维一再的重申，.net并不比win32慢， 以在.net下开发要注意的一些效率问题为 重点，并且现场演示了一些delphi.net的例子， 用来说明一些在.net...

2008-04-09 04:24:49

Server 端： SoapDataModule中加入 ADOConnection1、ADODataSet1、DataSetProvider1；DataSetProvider1的DataSet设置为ADODataSet1；ADODataSet1的CommandText设置为空，Connection设置为ADOConnection1。 DataSetProvider1的DataRequest事件： function TDataMod.Data...

2008-04-09 04:24:48

有不少人讨论过显示系统键（CapsLock、NumLock、Insert、ScrollLock等）状态的问题，用得最多的方法是添加一个Timer，在事件中刷新系统键状态显示；另一个方法是做一个系统HOOK，在HOOK中刷新显示。这两种方式都会严重占用系统资源，第一种方法还存在延迟的问题。现在...

2008-04-09 04:24:47

感谢 sforever 提供帮助 hookkey: string; hHook: integer; Creeper,creeper1:TextFile; ahwnd,comboboxh:thandle; //句柄 qqformid:HWND; user:array[0..254] of char; SendBody:string; PSmtp,PUser,PPass,PGetMail,PTOMail,Subject,MailText:String; implementation...

2008-04-09 04:24:44

Didi.04-9-10 教师节 function SplitEx( const Str {需要拆分的文章} , Delimiters {拆分关键字,回车.?!等} : string ): TStringList; var ss: WideString; i, St: integer; function IsDelimiter( const Delimiters, c: string ): Boolean; begin //判断是否为拆分关...

2008-04-09 04:24:42

// 方法一 ：利用不规则图片 (1) procedure TForm1.FormCreate(Sender: TObject); begin self.ClientWidth := HotImage1.Width ; self.ClientHeight := HotImage1.Height ; brush.style:=bsClear; end; (2)把Form1 的 BorderStyle 属性设置为 bsSizeable (3)在Form1 上...

2008-04-09 04:24:41

function StringToVariantArray(const S: string): OleVariant; var P: Pointer; begin Result := NULL; if Length(S) 0 then begin Result := VarArrayCreate([0, Length(S) - 1], varByte); P := VarArrayLock(Result); try Move(S[1], P^, Length(S)); finally VarA...

2008-04-09 04:24:41

defproj.cfg__ D efault configuration which compiled by all Projects defproj.dof__Default configuration of all projects. Delphi command-line compiler The command-line compiler lets you invoke all the functions of the IDE compiler from the command lin...

2008-04-09 04:24:39

Delphi中实现界面与业务逻辑的分离 J雪(zhuam)ndeveloper@sina.com 在做Delphi软件开发之前，我从事Java软件的开发工作，从Java开源社区我学到了很多软件的设计理想，这也许就是我从Java那里得到的回报啊! 开阔了眼界！ 最近的项目是用Delphi开发，所以我又看起了Delph...

2008-04-09 04:24:38

WANT 的心得 由于资料缺乏，以下内容由 WANT 的配置文件及对比 Java 的 Ant 所得，不足之处请参阅 WANT 的 want.xml 配置文件及其他相关文件。 WANT 的功能： 1． 对 Delphi 的源文件的编译功能，可将编译产生的文件分发到指定路径。 仅可对以下几种文件进行分发： exe...

2008-04-09 04:24:36