以下是我參考C語言資料結構演算法改編的delphi 也有請教前輩;編譯也通過了 請問各位還有哪些地方需要改進的 請多多指正 謝謝大家~

unit Unit1;    interface    uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;    type
  TForm1 = class(TForm)
    Button1: TButton;
  private
    { Private declarations }
  public
    { Public declarations }
  end;    type              //宣告節點的資料結構
  pnode=^node;
  node=record
  key:integer;
  next:pnode;
  end;    var
  Form1: TForm1;
  z,list,ptr:pnode;      //宣告變數    implementation    {$R *.dfm}    procedure initial;      //初始化
begin
  new(z);
  z.key:=32767;
  z.next:=nil;
  new(list);
  list.key:=-1;
  list.next:=z;
end;    procedure listinsert(key:integer);  //加入節點
begin
  new(ptr);
  ptr.key:=key;
  ptr.next:=list.next;
  list.next:=ptr;
end;    procedure listdelete;    //刪除節點
begin
  ptr.next:=ptr.next.next;
end;    end.

何需Coding爭峰 千人指 萬人鋒 敢問Coding頂峰 三尺秋水塵不染 天下無雙 發表人 - inglong 於 2005/09/08 10:13:24 發表人 - inglong 於 2005/09/08 10:16:46

------
何需Coding爭峰
千人指 萬人鋒
敢問Coding頂峰
三尺秋水塵不染
天下無雙

將程式放在 ［ｃｏｄｅ］ (你的程式...) ［／ｃｏｄｅ］ 這樣就可以維持縮排, 以造福眾人...

1.要先處理串列連結的頭尾指標，才好控制另外新增的指標在串列中的位置。 2.指標成員刪除後，記憶體沒有歸還系統。 3.沒有增加新成員的程序。 4.沒有遍覽指標串列的功能。    網路上搜尋一下"Single Linked List"，範例很多。 ----------------------------------------------