Delphi指针类型浅析(附件)
附件资料
*指针的使用（代码）
示例：简单的指针应用
代码：
procedure TForm1.Button2Click(Sender: TObject);
var
a: Integer;
p: ^Integer;
begin
with self.Memo1.Lines do
begin
a := 100;
Add('数据内容：' + inttostr(a));
//---
p := @a;
Add('数据地址：' + inttostr(Integer(p)));
//---
Add('数据地址指向的内容：' + inttostr(p^));
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
type
PInteger = ^Integer;
PPInteger = ^PInteger;
var
a: Integer;
p: PInteger;
pp: PPInteger;
begin
with self.Memo1.Lines do
begin
a := 100;
Add('Integer数据内容：' + inttostr(a));
//---
p := @a;
Add('Integer指针内容：' + inttostr(Integer(p)));
Add('Integer指针指向的数据：' + inttostr(p^));
//---
pp := @p;
Add('PInteger指针内容：' + inttostr(Integer(pp)));
Add('PInteger指针指向的数据：' + inttostr(Integer(pp^)));
end;
end;
*指针的使用（汇编）
示例：简单的指针应用
说明：
对于编译器来说，指针的类型可以用来标明地址所指向区域的大小、所指向的类型（整型、对象、方法），以及进行指针�
相关文档：
本书以实例为主线，辅以必要的技术背景要点来讲解Delphi 6．0编程的精髓；本书实例偏重于多媒体和网络程序开发，其中涉及到OpenGL、Indy组件、XML、Web Broker和WebSnap等技术。本书还讲述了Delphi中的SQL编程，在两个短小精练的程序中充分运用了Delphi数据开发技术，包括BDE组件的ADO组件的使用。通过本书，让读者在编程� ......
Delphi 中将对象作为参数传递的使用 举例分析
2009-07-24 13:40
下面的单击事件，将要调用一个以对象为参数的方法，并将结果显示出来。
procedure TForm1.btn1Click(Sender: TObject);
var
lStrings: TStrings;
begin
lStrings:= TStringList.Create;
try
lStrings.Add('chen');
&nbs ......
数组是可以通过索引来引用的同类型数据的列表。按照存储空间的获取方式，Delphi
支持的数组类型有两种，即静态数组和动态数组。所谓静态数组就是在声明时就已经确定大小的数组类型，而动态数组是指其大小在声明时不能确定的数组，动态数组的大小在使用时确定。
声明静态数组的方式非常简单，只要指明数组长度和数据类型 ......
之前做一个程序，用ListBox读入一个文本文件，但文本中有空行，为了删除其中的空行，折腾了好长时间。
先给出一段代码给大家看
var
i:Integer;
begin
ListBox1.Items.LoadfromFile('data.txt');
for i:=0 to ListBox1.Count - 1 do
begin
......
procedure frmMain.CLS; //主窗体自定义事件CLS
var i:integer;
begin
for i:=0 to panel5.ControlCount -1 do
begin
if panel5.Controls[i] is TEdit then //Edit组件
begin
((panel5.Contro ......
