Cara Insert Data ke Database dengan Delphi Menggunakan AdoQu

with AdoQuery1 do begin
  Close;
  SQL.Clear;
  SQL.Text:='INSERT INTO spp (nis,nama,tanggal_lhr) VALUES ("'+Edit1.Text+'","'+Edit2.Text+'","'+FormatDateTime('yyyy-mm-dd',DateTimePicker1.Date)+'")';
  ExecSQL;
  end;
with AdoQuery1 do begin
  Close;
  SQL.Clear;
  SQL.Text:='SELECT*FROM spp';
  Open;
end;