自己定义的类型，过程怎样使用这个类型？_Delphi_编程问答 jrs看球网直播吧_低调看直播体育app软件下载

问题：自己定义的类型，过程怎样使用这个类型？
描述:

自定义类型

Type
  PSimpleNode = ^TSimpleNode;
  TSimpleNode = Record
    Next : PSimpleNode;
    Data : Integer;
  end;
procedure InsertNode(DataValue : Integer; const LinkedList PSimpleNode;
                     InsertIndex : Integer);
var
  NewNode : TSimpleNode;
  TempNode : PSimpleNode;
  i : Integer;
Begin
  NewNode.Data := DataValue;
  TempNode := LinkedList;
  for i := 1 to InsertIndex-1 do begin
    TempNode := TempNode^.Next;
  end;
  NewNode.Next := TempNode^.Next;
  TempNode^.Next := Newnode;
  TempNode^.next := nil;
End;

解决方案1:

我能说你的const LinkedList PSimpleNode;这里少了一个冒号吗？

解决方案2:

Type
  PSimpleNode = ^TSimpleNode;
  TSimpleNode = Record
    Next : PSimpleNode;
    Data : Integer;
  end;
类型声明出错：PSimpleNode出现循环定义，错误行为。
  TSimpleNode = Record
    Next : PSimpleNode;  // 此处要定义为基本类型，或源自基本类型的其它类型
    Data : Integer;
  end;

上一篇：求教，DELPHI在中文输入法状态，输入框输入第一个字符返回英文，第二个字符才进入输入法
下一篇：怎么获得对象的地址

明星图片

相关文章

《自己定义的类型，过程怎样使用这个类型？》由码蚁之家搜集整理于网络，
联系邮箱：mxgf168#qq.com(#改为@)