本文整理自网络,侵删。
ADOConnection1.Close;
ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='
+ Edit1.Text + ';Persist Security Info=False';
ADOConnection1.Open;
ADOConnection1.GetTableNames(ComboBox1.Items);
ComboBox1.ItemIndex := 0;
相关阅读 >>
Delphi10.3构造一个json数据的第三种方法,并格式化输出
Delphi2010中使用pchar时e2010 incompatible types: 'char' and 'ansichar' 错误的处理
更多相关阅读请进入《Delphi》频道 >>