Example: Append, FieldValues, Post

This example appends a new record to a table when the user clicks a button. The two fields with names ALPHANUMERICFIELD and INTEGERFIELD are filled from the contents of two edit controls.

procedure TForm1.Button1Click(Sender: TObject);
begin
   EDBTable1.Append;
   EDBTable1.FieldValues['ALPHANUMERICFIELD'] := Edit1.text;
   EDBTable1.FieldValues['INTEGERFIELD'] := StrToInt(Edit2.text);
   EDBTable1.Post;
end;