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，请不要模仿，因为谈不上转型；如果你用delphi已经成习惯，并且熟悉html语言、有BS结构基础、对JAVA语法没有障碍（如果你看不懂简单的基础JAVA代码，建议你还是继续你的d吧），希望这段内容对你有所帮助，此话题不讨论具体技术，只说说我的学习步骤和心得。
1、 � ......
Delphi 中流的使用(1) 用 TMemoryStream(内存流) 入门
前言:
所谓"流", 就是一段数据或是一块内存;
在进行流操作时, 我们不必关心流中的数据到底是什么; 只需要知道流的大小和当前的指针位置. 所以流只有两个属性:
Size、Position.
对流的操作, 不过就是读取和写入. 所以流最主要的方法就是 Read 和 Write.
在很多� ......
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 ......
Delphi中 Round函数有个Bug
一旦参数是形如 XXX.5这样的数时
如果 XXX 是奇数 那么就会 Round up
如果 XXX 是偶数 那么就会 Round down
例如 Round(17.5)=18
但是 Round(12.5)=12
下面的函数即可纠正这个 Bug 但是是临时性的
执行 DoRound(12.5) 结果为 13 正确
function DoRound(Value: Extended): Int64;
......
Delphi中DLL初始化和退出处理
choysan
2010-01-08 8:56:43
<1>利用Unit的Initalization与Finalization这两个小节
可以在Unit的这两个小节中安排Unit的进入和退出，但是
Program与Library并没有这两个部分，所以只能写在Unit中。
<2>利用ExitProc变量
在Library的begin..end.中间是可以写代码的� ......
