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百度网盘真实地址解析

Delphi获取mac地址

Delphi listbox批量选中转移或删除

Delphi从excel读取数据存入数据库demo

Delphi 比较两个日期是否大于n天

Delphi中实现变长函数笔记

Delphi 自带单元字符md5加密

webbrowser自动填表模板

Delphi下cpu getcpuid实现（x86和x64）

Delphi 域名转ip并判断ip是否可以联通 复制代码

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

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