Cara Edit dan Delete Data di Database dengan Delphi RAD Meng

with AdoQuery1 do begin
  Close;
  SQL.Clear;
  //SQL.Text:='DELETE from spp WHERE nis="'+Edit1.Text+'"';
  SQL.Text:='DELETE from spp WHERE nis=:parNIS';
  parameters.ParamByName('parNIS').Value:= Edit1.Text;
  ExecSQL;
  end;
with AdoQuery1 do begin
  Close;
  SQL.Clear;
  SQL.Text:='SELECT*FROM spp';
  Open;
end;