昨天学到delphi指针,自己尝试用动态指针构造了一个链表,但是编译时出错,自己也是检查多次无果,求大家帮忙看看
程序实现部分如下:
implementation{$R *.dfm}
type
abc=^jl;
jl=record
mz:string[10];
nl:string[10];
next:abc;
end;
var
p,temp,start:^jl;procedure TForm1.btn1Click(Sender: TObject);
begin
New(p);
if start=nil then start:=p
else temp^.next:=p;//此处出错,提示类型不符合p^.mz:=edt1.Text ;
P^.nl:=edt2.text;
p^.next:=nil;temp:=p;//作为上一个节点的存档
end;procedure TForm1.FormCreate(Sender: TObject);
begin
start:=nil;
end;
程序实现部分如下:
implementation{$R *.dfm}
type
abc=^jl;
jl=record
mz:string[10];
nl:string[10];
next:abc;
end;
var
p,temp,start:^jl;procedure TForm1.btn1Click(Sender: TObject);
begin
New(p);
if start=nil then start:=p
else temp^.next:=p;//此处出错,提示类型不符合p^.mz:=edt1.Text ;
P^.nl:=edt2.text;
p^.next:=nil;temp:=p;//作为上一个节点的存档
end;procedure TForm1.FormCreate(Sender: TObject);
begin
start:=nil;
end;
解决方案 »
- 急。。delphi简单问题
- The sample of Remote Control with Canon SDK(ViewFinder part).
- 小弟新人学习为主!哪位大侠有计算器程序的原代码啊?收到给分!!(100)
- 紧急求助
- query问题(绝对简单,但一直没人帮解决,为什么呢?????)大侠们救救我啊!!!
- 各位,我现在准备编写项目技术开发文档,但是,我不知道这种文档的格式是怎样?谁能告诉我!(在线等待)
- 有用delphi做的甘特图控件?
- 高分请教ServerSocket和ClientSocket通信的问题,请高手看看,很详细。
- 在学习了2个月的delphi后,总结四大问题!
- 菜鸟问题:请问怎么声明日期、时间型变量?
- 怎样用delphi做一个搭积木的程序啊,积木是长方体即可。让占用的空间最小。
- 大TXT和大Excel文件的访问
type
abc=^jl;
jl=record
mz:string[10];
nl:string[10];
next:abc;
end;
var
// p,temp,start:^jl;改成下面的:
p,temp,start :abc;
procedure TForm1.btn1Click(Sender: TObject);
begin
New(p);
if start=nil then start:=p
else temp^.next:=p;//此处出错,提示类型不符合p^.mz:=edt1.Text ;
P^.nl:=edt2.text;
p^.next:=nil;temp:=p;//作为上一个节点的存档
end;