Question

delphi 中利用adotable组件向mysql数据库中添加数据出错

错误提示：adotable1:cannot perform this operation on a closed dataset

程序为
procedure TForm3.BitBtn1Click(Sender: TObject);
begin
adotable1.Append ;
adotable1.FieldByName('USERID').AsString :=edit1.Text ;
adotable1.FieldByName('USERNAME').AsString :=edit2.Text ;
adotable1.fieldbyname('USERINI').AsString :=combobox1.text;
adotable1.fieldbyname('OTPCODE').asstring:=edit4.Text ;
adotable1.FieldByName('OTPSERIAL').AsString :=edit4.text;
adotable1.Post ;
adotable1.Refresh ;
form3.Close ;
end;

Answer 1

很显然，你要先设置好ATOTABLE的连接属性，并把ADOTABLE置于打开状态