Podłączanie Delphi w systemie Linux do SQL Server

RAD Studio umożliwia zbudowanie aplikacji Delphi na platformy Windows i Linux. Można na przykład zbudować aplikację ODBC, która korzysta ze sterownika Microsoft ODBC w systemie Windows i sterownika Easysoft ODBC w systemie Linux. W poniższym samouczku, który opisuje, jak stworzyć aplikację konsolową dla systemu Linux, która pobiera dane SQL Server, komponenty to:

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. Pobierz sterownik ODBC programu SQL Server dla 64-bitowych platform Linux. (Wymagana rejestracja.)
2. Zainstaluj i uzyskaj licencję na sterownik ODBC SQL Server na komputerze, na którym jest lub będzie zainstalowany Asystent Platformy (PA Server).

   Instrukcje dotyczące instalacji znajdują się w dokumentacji sterownika ODBC.

   Uwaga Musisz mieć zainstalowany na swoim komputerze menedżer sterowników unixODBC. Dystrybucja Easysoft zawiera wersję menedżera sterowników unixODBC, z którą przetestowano sterownik ODBC Easysoft SQL Server. Program instalacyjny sterownika Easysoft daje możliwość zainstalowania unixODBC.

3. Utwórz źródło danych ODBC w /etc/odbc.ini, które łączy się z bazą danych SQL Server, do której chcesz uzyskać dostęp z Delphi. Na przykład:

   [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. Użyj isql, aby przetestować nowe źródło danych. Na przykład:

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

   W wierszu polecenia wpisz „pomoc”, aby wyświetlić listę tabel. Aby wyjść, naciśnij return w pustym wierszu zachęty.

   Jeśli nie możesz się połączyć, zapoznaj się z tym artykułem i Bazą wiedzy na temat sterowników ODBC SQL Server, aby uzyskać pomoc.

1. Jeśli jeszcze tego nie zrobiłeś, zainstaluj PA Server na komputerze, na którym zainstalowałeś sterownik ODBC SQL Server.
2. Ustaw środowisko na tym komputerze, aby program Delphi mógł załadować sterownik ODBC SQL Server. Na przykład:

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

   Uruchom serwer PA. Na przykład:

   cd ~/PAServer-19.0
   ./paserver
   

   Jeśli nie zainstalowano menedżera sterowników unixODBC, który jest dołączony do dystrybucji sterowników ODBC programu SQL Server, pomiń /usr/local/easysoft/unixODBC/lib z wartości zmiennej środowiskowej.

3. W RAD Studio utwórz nową aplikację konsoli Delphi.
4. Ustaw platformę docelową aplikacji na 64-bitowy Linux.
5. Edytuj właściwości profilu platformy docelowej, aby określić szczegóły serwera PA.
6. Wstaw do aplikacji kod pokazany na początku tego samouczka.
7. Uruchom aplikację.