Devart Forums

jerduval

Sample project is send, thank you.
Regards

jerduval

Hi Viktor, thank you for replay.
We tried to put fetchall option to false, you're right, the open is much faster but every "next" action on the query is very slow and, finally, the whole loop is still very slow.
When closing connection between 2 query isn't slowly than that.
Please can you try to reproduice problem, we can send you example project if you want ?
Regards,

jerduval

Hi, We have a proble to retrieve some data, it is very slow in this case :
- Open Connection
- Open Select Query From TABLE witch get a single row with 3Mo string value (xml formatting, no need to read this value, juste open the query)
- Close Query
- Open Select Query From TABLE witch get a about 20000 rows => This step takes about 10 minutes !
- Close Query
- Close Connection

If we close and reopen connection between 2 queries, the 2nd open is immediatly !

Connection :
DriverName := 'DevartMySQLDirect';
Params.Clear;
Params.Add('BlobSize=-1');
Params.Add('HostName=xxx:3306');
Params.Add('DataBase=Test');
Params.Add('User_Name=root');
Params.Add('Password=xxxx');
KeepConnection := true;

What's going wrong with that case ?

Code example :

Code: Select all

var
  Query: TSQLQuery;
  Cnx: TSQLConnection;
begin
  Memo1.Lines.Clear;
  Cnx := TSQLConnection.Create(nil);
  try
    Cnx.DriverName := 'DevartMySQLDirect';
    Cnx.Params.Clear;
    Cnx.Params.Add('BlobSize=-1');
    Cnx.Params.Add('HostName=xxxx:3306');
    Cnx.Params.Add('DataBase=Test');
    Cnx.Params.Add('User_Name=root');
    Cnx.Params.Add('Password=xxx');
    Cnx.KeepConnection := true;

    Cnx.Open;
    try
      Query := TSQLQuery.Create(nil);
      try
        Query.SQLConnection := Cnx;
        Query.SQL.Text := 'select params_xml from PARAMS_SESSION_CALCUL where id_sessions_calcul = 118002';
        Query.Open;
        Query.Close;
      finally
        FreeAndNil(Query);
      end;

//      Cnx.Close;
//      Cnx.Open;

      Query := TSQLQuery.Create(nil);
      try
        Query.SQLConnection := Cnx;
        Query.SQL.Add('select * from sim_taches_planning_prev where ps.ID_SIMULATION=118002');}
        Query.Open; // Very slow, about 10 minutes
        try
          Query.First;
          while not Query.Eof do
          begin
            Query.Next;
          end;
        finally
          Query.Close;
        end;
      finally
        FreeAndNil(Query);
      end;
    finally
      Cnx.Close;
    end;
  finally
    Cnx.Free;
  end;

jerduval

ViktoV,
I don't have any further questions.
I tell you that it should be an error in the FAQ : The default value for UseUnicode params is true, if it was right we dont need to add this param (like you said me to do) ?
Regards

jerduval

Hi ViktorV,

Thank you for the idea, it works fine.

Maybe you should modify the FAQ :

UseUnicode
Enables or disables Unicode support. Affects character data fetched from the server. When set to True all character data is stored as WideStrings and TStringField is replaced with TWideStringFiled.
This option is available for Delphi 2006 and higher IDE versions.
Default value of this option is True for Delphi 2009 and higher IDE versions, and False for Delphi 2006 and 2007.

Regards.

jerduval

Hi,

We are migrating our source code from Delphi XE2 to Delphi XE7.
We used dbExpress for Ib version 4.5.8.

When accessing database with "Default character set" set to UTF8, we have problems when string contains non ascii characters (Fields are Varchar(xx) type).
Exemple "é" appears "Ã©"

We initialize the TSQLSconnection like :

Code: Select all

  ACnx.DriverName := {!4}'DevartInterBase';
  ACnx.GetDriverFunc := {!4}'getSQLDriverInterBase';
  ACnx.LibraryName := {!4}'dbexpida40.dll';
  ACnx.VendorLib   := {!4}'fbclient.dll';
  ACnx.Params.Clear;
  ACnx.Params.Values[{!4}'User_Name'] := Username;
  ACnx.Params.Values[{!4}'Password']  := Password;
  ACnx.Params.Values[{!4}'Database'] := Server + {!4}'/' + IntToStr(Port) + {!4}':' + BddFilename;

For information, we done the same initilisation in Delphi XE2.

We tried to add this parameters :

Code: Select all

  ACnx.Params.Values['UseUnicode'] := 'False';
  ACnx.Params.Values['Charset'] := 'UTF8';

But it there is same problem.

Can you help us ?

Regards,

jerduval

It works fine, thank you AlexP.
Have a nice end of year !

jerduval

Hello,

We have this error when updating a table with a BLOLB field with the TOraSql component (TOraQuery works fine).

ORA-22275: le pointeur de LOB indiqué n'est pas valide

We are using Delphi XE2 Updt 4 and ODAC 9.4.13

Fields :
FieldKey is Integer not null
FieldValue is BLOB

Code: Select all

OraSql := TOraSql.Create(nil);
try
  OraSql.Session := OraSession;
  OraSql.AutoCommit := false;
  OraSql.Sql.text := 'Insert Into TableTest (FieldKey, FieldValue) Values(:Key, :Value)';
  OraSql.Prepared := true;

  OraSql.Params.ParamByName('Key').AsInteger := 1;
  OraSql.Params.ParamByName('Value').ParamType := ptInput;
  OraSql.Params.ParamByName('Value').DataType := ftOraBlob;
  OraSql.Params.ParamByName('Value').LoadFromStream(TmpStream, ftOraBlob);

  OraSql.Execute;
finally
  OraSql.Free;
end;

Can you tell me what's wrong ?

Regards,

jerduval

Dear AndreyZ,

Can you tell me when the next build will be available ?

We currently use 3 products from Devart (dbExpress Fb / DbExpress SQLServer / ODAC), and we are frequently bloqued in our work due to bugs in Devart drivers (you can take a look to my posts to see what I mean).

Regards,

Jerome DUVAL
Holy-Dis

jerduval

Hi AndreyZ

We have the same problem with the 6.1.2 driver and Delphi XE2.
Can you tell me what's going wrong ?

Regards,

Jerome DUVAL
Holy-Dis

jerduval

We have the same problem with the 6.1.2 version and Delphi XE2:

Classe d'exception EAssertionFailed avec le message 'Subtype fldstFIXED used to detect GUID NULL Value in SetParameter method (D:\Projects\Delphi\Dbx\SqlServer\Source\dbxsda.pas, line 1183)

when execute query with sql :

Code: Select all

SELECT * FROM HSYS_Domaines;

For information, here is the sql table creation :

Code: Select all

Create TABLE HSYS_Domaines (
DomRowId NUMERIC(18,0) NOT Null,
DomNom NVARCHAR(50) NOT Null);

Code: Select all

ALTER TABLE HSYS_Domaines ADD CONSTRAINT PK_ HSYS_Domaines PRIMARY KEY NONCLUSTERED (DomRowId);

regards,

Jerome DUVAL
Holy-Dis

jerduval

Thanks, that works fine with the new version.

Best regards,

Jerome DUVAL
Holy-Dis

jerduval

Dear AndreyZ,

We have another problem with the version 4.1.2 of the DbExpress driver for Interbase.

We cannot connect to a Firebird server that is not on port 3050. The following error message is systematically displayed:

The project produced the EIBCError exception class with the message ‘
Unable to complete network request to host "PC-780JDV".
Failed to establish a connection.'.

Here is an example of the code that produces errors (Executed with Delphi XE2):

Code: Select all

procedure TForm1.Button1Click(Sender: TObject);
begin
  SQLConnection1.DriverName := 'DevartInterBase';
  SQLConnection1.LibraryName := 'dbexpida40.dll';
  SQLConnection1.VendorLib   := 'fbclient.dll';
  SQLConnection1.GetDriverFunc := 'getSQLDriverInterBase';
  SQLConnection1.Params.Clear;
  SQLConnection1.Params.Values[{!4}'DataBase'] := 'PC-780JDV/3052:C:\Base\Master.fdb';
  SQLConnection1.Params.Values[{!4}'User_Name'] := 'SYSDBA';
  SQLConnection1.Params.Values[{!4}'Password']  := 'masterkey';
  SQLConnection1.LoginPrompt := false;
  SQLConnection1.Open;
  SQLConnection1.Close;
end;

If you carry out the same test with Delphi 6 (and if we change the LibrairyName into "dbexpida.dll"), the same problem occurs.
It seems that the problem occurs whatever the version of the Firebird server used (1.5.6, 2.1.x, 2.5.x).

When we carry out the same test with the version 4.0.1 of the DbExpress driver for Interbase, the problem does not occur.

Can we have an answer from you about this problem please?

Regards,

Jerome DUVAL
Holy-Dis

jerduval

Hello,
We have bought the update of the driver and have tested the same code:
The settings are not truncated anymore but contain several spaces after their "real" name to obtain a fixed length of 32 characters:

Code: Select all

'TEST_PARAMNAME                 '
'TEST_RETURNNAME                '

This time, the problem is present whatever the Firebird version (1.5.6, 2.1.3, 2.5.2).

The work-around you indicated cannot be implemented because we need to manage Unicode in our programs.

Code: Select all

SQLConnection1.Params.Values[sUseUnicode] := 'False';

Looking forward to an early reply.

Jerome DUVAL
Holy-Dis

jerduval

Hello,
Could you tell when the next release will be available ?
Regards,
Jerome DUVAL
Holy-Dis

Devart Forums

Search found 23 matches

Re: Slow Retrivial data

Re: Slow Retrivial data

Slow Retrivial data

Re: Non ascii characters problems DXE7 / DbExpress 4.5.8

Re: Non ascii characters problems DXE7 / DbExpress 4.5.8

Non ascii characters problems DXE7 / DbExpress 4.5.8

Re: TORASql : ORA-22275: le pointeur de LOB indiqué n'est pas valide

TORASql : ORA-22275: le pointeur de LOB indiqué n'est pas valide

Re: DBX4 / D2007 / TStoredProcName Params problem

Re: DBX4 / D2007 / TStoredProcName Params problem

Re: EAssertionFailed error V6.1 D2009 Pro

Re: Can only connect to server on port 3050

Can only connect to server on port 3050

Re: Problem with TSQLStoredProc parameters name / dbexpida40.dll v3.1.2

Re: DBX4 / D2007 / TStoredProcName Params problem