确认按钮的代码如何写

求助确认按钮的代码怎么写
我是做了个简单数据库
现在点击确认按钮保存我的修改能容
procedure TForm2.InitWindow(Query: TADOQuery);
begin
  if Fop = otAdd then
  begin
  ADD1.
  end;
  if Fop = otEdit then
  begin
 // showmessage(Query.FieldByName('SNAME').AsString);
  Edit1.Text := Query.FieldByName('XH').AsString;
  Edit2.text := Query.FieldByName('SNAME').AsString;
  Edit3.Text := Query.FieldByName('MARKS').AsString;
  ComboBox1.items.insert(0,query.fieldbyname('SEX').AsString);
  ComboBox1.ItemIndex:=0;

  end;
相关代码是这个
还有那个ADD 添加里边的代码怎么写
谢谢

------解决方案--------------------
ADD1.Append;