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 TStringList 用法详解
//TStringList 常用方法与属性
:
var
List: TStringList;
i: Integer;
begin
List := TStringList.Create;
List.Add('Strings1'); {添加}
List.Add('Strings2');
List.Exch ......
之前做一个程序，用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 ......
Delphi从6.0就开始支持Web Services的开发和应用了，本文通过使用Delphi 7.0调用新浪发送短信的Web Service进行短信应用程序开发这一实例详细的介绍在Delphi中如何开发基于Web Services的应用系统。
第一步，准备工作，了解新浪短信Web Service。新浪发送短信的Web Service地址是http://smsinter.sina.com.cn/ws/smswebs ......
