delphi FDConnection查看所有表包含用户表和系统表

本文整理自网络，侵删。

 
function TForm1.DBtableExists(sTableName: string;FDconn: TFDConnection): Boolean;
  var
    vTableNames:TStringList;
begin
  Result:=False;
  vTableNames:=TStringList.Create;
    try
      FDconn.GetTableNames('','','',vTableNames,[osMy],[tkTable]);
      if vTableNames.IndexOf(sTableName)>=0  then
          Result:=True;
    finally
      vTableNames.Free;
    end;
end; 

 

相关阅读 >>

Delphi xe5 unicodestring的由来

Delphi tapplication大全

Delphi列表控件tlistview定位到某一行

Delphi中读写txt文件的一段代码

Delphi 内存管理[4]

Delphi rest/post

Delphi listview的用法

Delphi 判断进程名是否存在，如果存在则结束进程

Delphi 从 exe 或 dll 中获取图标的函数

Delphi 中文姓名 合法性检查

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

转载请注明出处：木庄网络博客 » delphi FDConnection查看所有表包含用户表和系统表