With Data.ADOQ2 do
begin
Close;
SQL.Clear;
SQL.Add('select * from '+KM); //要记住这里哦
Open;
Edit;
FieldByName('学号').AsInteger:=StrToInt(Edit1.Text);//主键
FieldByName('姓名').AsString:=Trim(Edit2.Text);
FieldByName('期中考试成绩').AsString:=Trim(Edit5.Text);
FieldByName('期末考试成绩').AsString:=Trim(Edit6.Text);
post;
end;