Připojení Delphi na Linuxu k SQL Serveru

RAD Studio vám umožňuje vytvořit aplikaci Delphi pro platformy Windows i Linux. Můžete například vytvořit aplikaci ODBC, která používá ovladač Microsoft ODBC v systému Windows a ovladač Easysoft ODBC v systému Linux. V následujícím kurzu, který popisuje, jak vytvořit konzolovou aplikaci pro Linux, která načítá data SQL Serveru, jsou tyto součásti:

Windows Machine
---------------
RAD Studio

Linux Machine
-------------
Platform Assistant Server
Delphi Application
unixODBC Driver Manager
SQL Server ODBC Driver

Windows Machine
---------------
SQL Server

program SQLServer;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils, FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Error,
  FireDAC.UI.Intf, FireDAC.Phys.Intf, FireDAC.Stan.Def, FireDAC.Stan.Pool,
  FireDAC.Stan.Async, FireDAC.Phys, FireDAC.Phys.ODBC, FireDAC.Phys.ODBCDef,
  FireDAC.DApt, Data.DB, FireDAC.Comp.Client, FireDAC.ConsoleUI.Wait;

var
    RHConnection: TFDConnection;
    RHQuery: TFDQuery;
    sValue: String;

begin
  try
    RHConnection:=TFDConnection.Create(nil);
    RHConnection.Params.Add('DriverID=ODBC');
    RHConnection.Params.Add('DataSource=SQLSERVER_SAMPLE');
    RHConnection.Connected:=true;

    sValue := RHConnection.ExecSQLScalar('select ''SQL Server from Linux'' as test_col');
    Writeln(sValue);

    ReadLn;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

1. Stáhněte si ovladač SQL Server ODBC pro 64bitové platformy Linux. (Je nutná registrace.)
2. Nainstalujte a licencujte ovladač SQL Server ODBC na počítači, kde je nebo bude nainstalován Platform Assistant (PA Server).

   Pokyny k instalaci naleznete v dokumentaci ovladače ODBC.

   Poznámka Na vašem počítači potřebujete nainstalovaný unixODBC Driver Manager. Distribuce Easysoft obsahuje verzi unixODBC Driver Manager, se kterou byl testován ovladač Easysoft SQL Server ODBC. Instalační program ovladače Easysoft vám dává možnost nainstalovat unixODBC.

3. Vytvořte zdroj dat ODBC v /etc/odbc.ini, který se připojí k databázi SQL Server, ke které chcete přistupovat z Delphi. Například:

   [SQLSERVER_SAMPLE]
   Driver          = Easysoft ODBC-SQL Server
   Server          = my_machine\SQLEXPRESS
   User            = my_domain\my_user
   Password        = my_password
   # If the database you want to connect to is the default
   # for the SQL Server login, omit this attribute
   Database        = Northwind
   

4. K testování nového zdroje dat použijte isql. Například:

   cd /usr/local/easysoft/unixODBC/bin
   ./isql.sh -v SQLSERVER_SAMPLE
   

   Na výzvu zadejte "help" pro zobrazení seznamu tabulek. Pro ukončení stiskněte return v prázdném řádku s výzvou.

   Pokud se nemůžete připojit, vyhledejte pomoc v tomto článku a ve znalostní databázi SQL Server ODBC Driver Knowledge Base.

1. Pokud jste tak ještě neučinili, nainstalujte server PA do počítače, kde jste nainstalovali ovladač SQL Server ODBC.
2. Nastavte prostředí na tomto počítači tak, aby váš program Delphi mohl načíst ovladač SQL Server ODBC. Například:

   LD_LIBRARY_PATH=$LD_LIBRARY_PATH:/usr/local/easysoft/sqlserver:/usr/local/easysoft/lib:
   /usr/local/easysoft/unixODBC/lib
   export $LD_LIBRARY_PATH
   

   Spusťte server PA. Například:

   cd ~/PAServer-19.0
   ./paserver
   

   Pokud jste nenainstalovali unixODBC Driver Manager, který je součástí distribuce ovladačů SQL Server ODBC, vynechejte /usr/local/easysoft/unixODBC/lib z hodnoty proměnné prostředí.

3. V RAD Studiu vytvořte novou konzolovou aplikaci Delphi.
4. Nastavte cílovou platformu aplikace na 64bitový Linux.
5. Upravte vlastnosti profilu pro vaši cílovou platformu a určete podrobnosti pro váš server PA.
6. Vložte do aplikace kód zobrazený na začátku tohoto výukového programu.
7. Spusťte aplikaci.