if Table1.CanModify=True then
begin
Table1.Append;
Table1.FieldValues['ALPHANUMERIC'] := Edit1.text;
Table1.FieldValues['INTEGER'] := StrToInt(Edit2.text);
Table1.Post;
end;
begin
Table1.Append;
Table1.FieldValues['ALPHANUMERIC'] := Edit1.text;
Table1.FieldValues['INTEGER'] := StrToInt(Edit2.text);
Table1.Post;
end;
begin
table.append;(table.edit;)
...
table.post;
end;
提交要写post的
用Append.
然后FieldByName('字段名'):='';
再 Post.