нужно визуальными средствами делфи сделать заполнение списка, добавление и удаление звена

[ksenechka5]

у меня дана кнопка, на которую прописывается заполнение рандомными числами и выводятся они на Stringgrid, есть Edit где указывается кол-во элементов списка.

type Link=^zveno;
Zveno=Record
inf:integer;
sled:Link;
end;
var ele,beg,Pred,p:Link;

procedure TForm1.Button1Click(Sender: TObject);
begin
randomize;
new(ele);
ele^.inf:=random(100);
ele^.sled:=nil;
beg:=ele;
n:=strtoint(edit1.Text);
StringGrid1.Cells[0,0]:=inttostr(ele^.inf);
for i:=0 to n-1 do
begin
new(ele^.sled);
ele:=ele^.sled;
ele^.inf:=(random(100));
ele^.sled:=nil;
StringGrid1.Cells[i,0]:=inttostr(ele^.inf);
end;
{for i:=0 to strToInt(edit1.Text) do
stringgrid1.Cells[i,0]:=inttostr(random(100));}
end;
мне необходимо на кнопку2 и кнопку3 организовать ввод нового звена и удаление, задаваемых в Edit2 и edit3. непойму как это сделать, помогите пожалуйста