Delphi 获取Access中的表名

本文整理自网络，侵删。

 //声明变量：

lString,lTableName:TStrings;


//-----------获取表名信息-------------
lString:=TStringList.Create;
lTableName:=TStringList.Create;
DM_Conn.con_Access.GetTableNames(lString,True);
for i:=0 to lString.Count-1 do
begin
if (lString.Strings[i]<>'MSysACEs')
and (lString.Strings[i]<>'MSysObjects')
and (lString.Strings[i]<>'MSysQueries')
and (lString.Strings[i]<>'MSysRelationships') then
lTableName.Add(lString.Strings[i]);
end;
 

相关阅读 >>

Delphi shellexecute 打开文件夹

Delphi tstreamreader 和tstreamwriter

Delphi android gps服务

Delphi 用cxgrid显示联合查询数据和更改数据

Delphi wmi获取网卡mac

Delphi 小数点四舍五入问题

Delphi打开外部程序或文件

Delphi里实现多线程下载文件并且显示进度到界面

Delphi 正则表达式的匹配模式

Delphi 系统对话框（如浏览目录）被隐藏到主窗体后面造成程序无法操作的临时处理方式

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 获取Access中的表名