代码如下
procedure TForm1.FormShow(Sender: TObject);
begin
Memo1.Clear;
datasource1.DataSet:=adotable1;
dbgrid1.DataSource:=datasource1;
adotable1.TableName:='studentinfo';
adotable1.open;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.SQL.Clear;
adoquery1.SQL.Add(memo1.Text);
adoquery1.ExecSQL;
adotable1.Refresh;
end;
dataset设置的是adotable1,执行sql语句的是adoquery1,在Memo1中输入sql语句刷新显示的是adotable1,为什么啊
procedure TForm1.FormShow(Sender: TObject);
begin
Memo1.Clear;
datasource1.DataSet:=adotable1;
dbgrid1.DataSource:=datasource1;
adotable1.TableName:='studentinfo';
adotable1.open;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.SQL.Clear;
adoquery1.SQL.Add(memo1.Text);
adoquery1.ExecSQL;
adotable1.Refresh;
end;
dataset设置的是adotable1,执行sql语句的是adoquery1,在Memo1中输入sql语句刷新显示的是adotable1,为什么啊
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货