7 个非常好的免费 Delphi 组件集
1)JEDI - VCL
JEDI-VCL(JVCL) 库构建于 JEDI 社区捐赠的代码。他由超过 400 个可以在你的 Delphi 和 Kylix 项目中立即重用的组件构成。整个 JEDI VCL 在 Mozilla 公共许可证（MPL）条款下分发，他可以自由使用于免费软件和共享软件，以及开放源代码工程和商业项目。
网站：http://jvcl.sourceforge.net
(2)RXLib
RxLib 是用于 Borland Delphi 和 C++ Builder 的一整套组件集，他们可以构建灵活和丰富的用户界面，最重要的一点是他们完全免费。
网站：http://sourceforge.net/projects/rxlib
(3)LMD Tools - Special Edition（特别版）
LMD Tools 的免费版，将近 100 个组件，绝对免费。
网站：http://www.lmdinnovative.com
(4)Globus VCL Extensions Library(GVCL)
一个用于 Borland Delphi 3-7 和Borland C++ Builder 5 的组件和函数库，所有单元都包含源代码。这个特定的库是一个免费软件产品，在不更改安装文件内容和单元源代码的情况下可自由分发使用这个库。
网站：
http://cpr.biblio-globus.ru/GlobusLib.htm
http://www.spellabs.ru/gvclen.htm
(5)Pro VCL Extensions Library(ProLib)
用于 Borland Delphi 和 C++ Builder 的免费组件库，包含 28 个组件和几个有用的类、过程和函数。
网站：http://barabash.org/prolib/index.html
(6)Max’s Components for Delphi
15 个 Delphi 组件，全部包含源代码和帮助文件。
网站：http://www.maxcomponents.net
(7)About Delphi Programming VCL 集
超过 40 个组件，全部包含源代码。
网站：http://delphi.about.com/library/bluc/ucvcl.htm
相关文档：
输入验证码 一个文本框 24字母随机出4个字母 然后用户
输入所随机出的字母 输入正确 进入界面。。错误又随机下。。。
*/
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
lbl1: TLabel;
Edit1: TEdit; ......
implementation
uses ComOBJ;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var ExcelAPP1:Variant;
ExcelApp2:Variant;
I,j: Integer;
ID,IDX:string;
begin
try
ExcelAPP1:=CreateOleObject('Excel.Application');
E ......
读“Delphi2010,DELPHI的希望?”有感
原文：http://www.gowjq.com/forum-29-1.html
1） 盛大的主要开发工具是Delphi, 详见： http://act.sdo.com/Delphi/， 游戏是一种复杂交互界面的开发，Delphi可以胜任。同样作为企业应用的前端，用DELPHI开发也是很好的选择。
2） � ......
Delphi中截取文件名不含后缀部分 收藏
当文件名含有中文时，不能直接用LeftStr(FileName, Length(FileName - 4))或者用Pos来定位"."的位置来获取。因为中文一个字符相当与两个英文字符。这样截取往往还是把整个FileName都截下来了。
应当使用Copy函数，如下：
TmpFileLength := Pos(extFile, FileName); TmpFileName := ......
我使用delphi也不是很长时间，由于经常要用到SQL语句，总结了一些Delphi中使用SQL语句要注意的事项，归纳起来主要有一下几条：
一、空格不要漏：
我们经常要拼装SQL语句，特别是where条件句，在各个语句中别忘了头尾加上空格。因为在一个语句中我们会注意用空格分开关键字但是往往忘了头尾的空格。例如：
sSQL=' select ......
