SQL query to SQL Server 2005 remotely using Borland Delphi

Question

What is the simplest way to execute a SQL query to a SQL Server 2005, remotely, using Borland Delphi?

In this case, I am using Borland Delphi 7.

The simplest way means, if I must use 3rd party component, it should be integrated in the application (not separate/complicated installation).

The thing is, I want to be able to check if the remote SQL server is alive.

I know, we can use network "ping", but that does not mean the SQL server is fully accessible and functional.

Thanks in advance for any tips :)

Lieven Keersmaekers · Accepted Answer · 2011-06-27T08:25:17.747

3

Simplest

Drop a TADOQuerycomponent on your form.
Fill out the connectionstring property (or use the ... build button).
Put your SQL Statement in the SQL property.
Set your components Active property to True.

Better

Use a TDatamodule.
Use a TADOConnection component.
Link your TADOQuery component to the TADOConnection component.
Activate your query in runtime when needed io in Designtime. Active Connections or Queries in Designtime usually end up being a waste of CPU cycles when running your application.

Console Application

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.

edited Jun 27 '11 at 08:25

answered Jun 27 '11 at 08:16

Lieven Keersmaekers

57,207
13
112
146

Is this possible with a console app? Because my application is a console app. – Kawaii-Hachii Jun 27 '11 at 08:21
@ewlung: no it isn't. I have added a simple console application example to execute an update and select statement. – Lieven Keersmaekers Jun 27 '11 at 08:26
1

For a console application, make sure to call 'CoInitialize(nil);' (use ActiveX unit) to initialize OLE. Then again, since you use ADODB, the OLE system also gets initialized. – Wim ten Brink Jun 27 '11 at 11:24
I also found this is useful: http://stackoverflow.com/questions/2918016/delphi-7-ado-need-basic-coding-example – Kawaii-Hachii Jun 29 '11 at 13:14

SQL query to SQL Server 2005 remotely using Borland Delphi

1 Answers1

Simplest

Better

Console Application