while not STD.Eof do
begin
if STD.FieldByName('selected').AsBoolean then
begin
if checkWenXian(STD.fieldbyname('A001').AsString) then
begin
ADOtable_WenXianChoose.Append;
ADOtable_WenXianChoose.FieldByName('STD').Value:=STD.FieldByName('A001').Value;
end;
end;
STD.Next;
end;
那样设属性的话,这样不会进数据库,现在我要写进数据库,怎么办.