使用 Borland Delphi 远程查询 SQL Server 2005

Question

使用 Borland Delphi 远程对 SQL Server 2005 执行 SQL 查询的最简单方法是什么？

在这种情况下，我使用的是 Borland Delphi 7。

最简单的方法意味着，如果我必须使用 3rd 方组件，它应该集成到应用程序中(而不是单独/复杂的安装)。

问题是，我希望能够检查远程 SQL 服务器是否处于事件状态。

我知道，我们可以使用网络“ping”，但这并不意味着 SQL 服务器是完全可访问和正常运行的。

提前感谢您的任何提示:)

Answer 1

最简单的

删除 TADOQuery表单上的组件。

填写connectionstring属性(或使用 ... 构建按钮)。

将您的 SQL 语句放入 SQL属性(property)。

设置您的组件 Active属性(property)给 True .

更好的

使用 TDatamodule .

使用 TADOConnection零件。

链接您的TADOQuery TADOConnection 的组件零件。

在设计时需要 io 时在运行时激活您的查询。运行应用程序时，设计时的事件连接或查询通常最终会浪费 CPU 周期。

控制台应用程序

program SimpleSQL;

{$APPTYPE CONSOLE}

uses
  ADODB,
  SysUtils;

var
  qry: TADOQuery;
begin
  qry := TADOQuery.Create(nil);
  try
    qry.ConnectionString := 'AConnectionString';

    // Update
    qry.SQL.Text := 'UPDATE YourTable SET FieldX = FieldY';
    qry.ExecSQL;

    // Select
    qry.SQL.Text := 'SELECT FieldX FROM dbo.YourTable';
    qry.Open;
    qry.First;
    while not qry.Eof do
    begin
      Output(qry.Fields[0].AsString);
      qry.Next;
    end;
    qry.Close;    

  finally
    qry.Free;
  end;
end.