Open HFSQL WINDEV Table error

[Ranja AZ 2]

My objective is to access the tables of a database named GMAO of a WINDEV HFSQL (Hyperfile SQL) server. I try to use ODBC.

Here is my source:

 

procedure TForm1.Button1Click(Sender: TObject);
var
  FDConnectionODBCHFSQL: TFDConnection;
  TableODBC:TFDTable;
begin
  TableODBC := TFDTable.Create(nil);
  FDConnectionODBCHFSQL := TFDConnection.Create(nil);
  try
    FDConnectionODBCHFSQL.Params.Clear;
    FDConnectionODBCHFSQL.DriverName := 'ODBC';
    FDConnectionODBCHFSQL.Params.Add('ODBCDriver=HFSQL');
    FDConnectionODBCHFSQL.Params.Add('Database=GMAO');
    FDConnectionODBCHFSQL.Params.Add('User_Name=admin');
    FDConnectionODBCHFSQL.Params.Add('ExtendedMetadata=True');
    FDConnectionODBCHFSQL.Params.Add('ODBCAdvanced=Server Name=DESKHOLY-PC;Server Port=4900;IntegrityCheck=1');
    FDConnectionODBCHFSQL.Open;

    TableODBC.Connection := FDConnectionODBCHFSQL;
    TableODBC.TableName := 'appartenance';

    try
      TableODBC.Open;
      ShowMessage('Table is open!');
      except
      on E: Exception do
      begin
        ShowMessage('Open Table error : ' + E.Message);
        exit;
      end;
    end;

  except
    on E: Exception do
    begin
      ShowMessage('Connection Error: ' + E.Message);
      exit;
    end;
  end;
end;

 

The connection goes through, but when I try to open a table there is always an error:

 

Error opening Table: [FireDAC][Phys][ODBC][Microsoft][ODBC Driver Manager] The driver does not support this function.

 

Please, can anyone help me to resolve this issue?

 

Regards!

[bravesofts 16]

Try use OLEDB (using AdoConnection) rather using ODBC