代码大全 eVersion1.01 是的，书的自然的、不可遏止的志愿是离心的。它写出来就是要发表、传播、推广、被人买、被人读。那赫赫有名的作家的象牙之塔实为一座发射塔。总是要从那里回到作者，如同回到作家之不可或缺的合作者一样。一本书不是只有一个作者，而是有无数的...

2008-04-09 04:29:24

线程是进程内一个相对独立的、可调度的执行单元。一个应用可以有一个主线程，一个主线程可以有多个子线程，子线程还可以有自己的子线程，这样就构成了多线程应用了。由于多个线程往往会同时访问同一块内存区域，频繁的访问这块区域，将会增加产生线程冲突的概率。一旦...

2008-04-09 04:29:19

大家应该都非常熟悉控制面板吧，大家也都有操作过控制面板吧，但如何使用Delphi对控制面板进行编程呢？ 一、控制面板的原理 下面我就来讲讲控制面板的原理：控制面板在windows中的system目录下，其中所有以CPL为扩展名的，就都是我们的控制面板。要想对控制面板进行编...

2008-04-09 04:29:18

unit REdit; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TCustomREdit = class(TCustomEdit) private { Private declarations } FAlignment:TAlignment; procedure SetAlignment(Value: TAlignment);...

2008-04-09 04:29:18

一个很怪的现象，试试下面代码 1.在form上放一个TRichEdit 2.放一个TLabel 3.放一个TButton 4.在Button1的onlick事件里写下面的代码并执行 procedure TForm1.Button1Click(Sender: TObject);begin Label1.Parent := RichEdit1; Label1.Top := 20; Label1.Left := 20; R...

2008-04-09 04:29:17

如果将一个int64类型的变量作为一个需要浮点数为参数的函数的参数（如：ln,sin等）会报告类型不匹配，而不会自动进行转换，如下例 var X: Int64; Y: Extended; begin X := 1; Y := Ln(X); end; 解决办法：给参数加上0.0 var X: Int64; Y: Extended; begin X := 1; Y :=...

2008-04-09 04:29:17

delphi函数参考手册 ---------------------------------------------------------------------------------- abort 函数 引起放弃的意外处理 abs 函数 绝对值函数 addexitproc 函数 将一过程添加到运行时库的结束过程表中 addr 函数 返回指定对象的地址 adjustlinebrea...

2008-04-09 04:29:16

www.marcocantu.com Marco''''s Delphi Books Essential Pascal - Web Site Essential Pascal - Local Index PASCAL 精要 译文 周良勇 校稿 戴勤奋 阿波罗神在 Delphi 神庙膜拜 意大利十七世纪壁画 目录 第一章 : Pascal 历史回顾 第二章 : 编写 Pascal 代码 第三章 :...

2008-04-09 04:29:15

Web Application 開 發 利 器 - WebSnap! 第 七 章 、 深 入 Adapter 這 一 章 的 目 的 在 於 完 全 了 解 Adapter 在 WebSnap 中 所 代 表 的 意 義 及 更 深 入 的 使 用 她 們 ， 之 前 我 們 利 用 了 Adapter 與 AdapterField 來 處 理 簡 單 的 資 料 顯 示 ，...

2008-04-09 04:29:13

----问题二及解决方案 每一条导入表中的纪录除了ISO文件中的内容外，还需要有书的类型,期号,以及ID号，而TPgCSV在插入新纪录时只处理了同文本文件中的数据相关的字段,因此,这些字段的内容需要我们自己来加入。不用说,很自然的就会想到Table中的AfterInsert事件.但问题...

2008-04-09 04:29:11