【求助】请问如何根据在一个文本框里输入的字符串动态建立一个同名的ADOQuery？ 谢谢

Question

在一个文本框里输入一个字符串 如“AAA”
怎样建立一个同名的ADOQuery 如“adoqAAA”？建立以后如何使用？还请指教 谢谢

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  ad:TADOQuery;
  s:string;
begin
  s:='ado'+form1.Edit1.Text;
  ad:=TADOQuery.Create(self);
  ad.Connection:=form1.ADOConnection1;
  ad.Name:=s;
end;
试试

Answer 2

那如果在别处要引用 该如何写？
如有个DataSource 要指定它的DataSet为该ADOQueryds1.DataSet := ???

Answer 3

那你把ad定义为全局变量,
dsl.dataset:=form1.ad

Answer 4

同意lovelymelon(小人物) ( )