delphi数组之菜鸟篇
数组是可以通过索引来引用的同类型数据的列表。按照存储空间的获取方式，Delphi
支持的数组类型有两种，即静态数组和动态数组。所谓静态数组就是在声明时就已经确定大小的数组类型，而动态数组是指其大小在声明时不能确定的数组，动态数组的大小在使用时确定。
声明静态数组的方式非常简单，只要指明数组长度和数据类型即可，下面就是声明了一个用来存放字符的数组：
var Hello: array[0..5] of
char;
容易看出，数组的声明明显包含3
个部分，关键词array
表明这是一个数组变量，而[x..y]
表明数组的索引是从x
到y
，而of
char
表明数组的成员是字符类型。按照类似的方法还可以声明其他类型的数组，下面就是这样的示例代码：
var ScoreList: array[1..25] of
Integer;
var NameList: array[1..35] of
String;
声明了数组后，可以通过索引引用数组的元素(
成员)
。而使用数组成员的方法与使用这种类型的普通变量类似，下面就是一段使用字符数组的示例代码：
var Hello: array[0..5] of
char;
begin
Hello[0] := ‘H’;
Hello[1] := ‘e’;
Hello[2] := ‘l’;
Hello[3] := ‘l’;
Hello[4] := ‘o’;
Hello[5] := Chr(0);
ShowMessage(Hello);
end;
这里声明了几个数组，它们都是只包含一个索引参数的数组，即一维数组。Delphi支持具有更多索引参数的数组，即多维数组。下面给出一段声明二维数组的示例代码：
var Hello: array[0..5][1..10] of char;
访问二维数组成员的方式与访问一维数组的方式相似，只要按照类似的方式指定两个索引就可以访问二维数组的成员，下面就是使用二维数组的示例代码：
var Hello: array[0..5] of array[0..10] of char;
begin
Hello[0][0] := ‘H’;
Hello[0][1] := ‘e’;
Hello[0][2] := ‘l’;
Hello[0][3] := ‘l’;
Hello[0][4] := ‘o’;
Hello[0][5] := Chr(0);
ShowMessage(Hello[0]);
end;
按照类似的方法还可以声明具有更高维数的数组，这里不再给出实例。另外，Delphi还支持访问二维数组成员的另外一种方法，下面就是示例代码：
var Hello: array[0..5] of array[0..10] of char;
begin
Hello[0,0] := ‘H’;
Hello[0,1] := ‘e&r
相关文档：
delphi编码规范文档
目录
1、前言 3
2、源程序书写规范 3
2.1通用源代码格式规范 3
2.1.1缩进 3
2.1.2边距 3
2.1.3 Begin…End语句 3
2.1.4注释 4
2.2 OBJECT PASCAL语句格式书写规范与用法 4
2.2.1括号 4
2.2.2保留字和关键字 4
2.2.3过程和函数 5
2.2.4变量 5
2.2.5类型 6
2.2.6语句 6
2.2.7结构� ......
//声明:
GetWindowText(
hWnd: HWND; {窗口句柄}
lpString: PChar; {接收文本的缓冲区的指针}
nMaxCount: Integer {指定缓冲区大小, 其中包含NULL字符; 如果文本超出，会被被截断}
): Integer; {返回字符个数, 不包括中断的空字符; 如果标题为空或句柄无效, 则返回零}
//举例:
var
arr: ......
附件资料
*类的内存信息（代码）
示例：获取类信息
说明：比对通过类地址以及通过类方法获取信息的效果。
代码：
type
TMyObject = class(TObject)
private
FData: Integer;
protected
......
Delphi 中将对象作为参数传递的使用 举例分析
2009-07-24 13:40
下面的单击事件，将要调用一个以对象为参数的方法，并将结果显示出来。
procedure TForm1.btn1Click(Sender: TObject);
var
lStrings: TStrings;
begin
lStrings:= TStringList.Create;
try
lStrings.Add('chen');
&nbs ......
(一) 使用动态创建的方法
首先创建 Excel 对象，使用ComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' );
1) 显示当前窗口：
ExcelApp.Visible := True;
2) 更改 Excel 标题栏：
ExcelApp.Caption := '应用程序调用 Microsoft Excel';
3) 添加新工作簿：
ExcelApp.WorkBooks.Add ......
