if fDBMS in [dPostgreSQL,dFireBird] then begin
    {$ifdef ZEOS72UP} // new since 7.2up
    // Always load the lobs? Or just on accessing them?
    // if you allways copy the data by fetching the row than it doesn't make sense.
    fStatementParams.Add('cachedlob=false'); //default = False
    {$endif}
  end;







  {$ifdef ZEOS72UP} // new since 7.2up
  with (MainConnection as TSQLDBZEOSConnection).Database do
  // ZDBC: MultipleValuesInsertFirebird is buggy, MultipleValuesInsert slower
  if UseMetadata and not (fDBMS = dFirebird) then
    if GetMetadata.GetDatabaseInfo.SupportsArrayBindings then begin
      fBatchSendingAbilities := [cCreate, cUpdate, cDelete];
      OnBatchInsert := nil;
      fSupportsArrayBindings := true;
    end;

  {$endif}
end;

destructor TSQLDBZEOSConnectionProperties.Destroy;
begin
  FreeAndNil(fURL);
  FreeAndNil(fStatementParams);

  if fDBMS in [dPostgreSQL,dFireBird] then begin
    {$ifdef ZEOS72UP} // new since 7.2up
    // Always load the lobs? Or just on accessing them?
    // if you allways copy the data by fetching the row than it doesn't make sense.
    fStatementParams.Add('cachedlob=false'); //default = False
    {$endif}
  end;
  // ZEOS_PREVENT_CONN will prevent unexpected connection creation inside ConnectionProperties.Create
  // TODO - rethink code below to prevent create connection inside this fucntion
  // Reasons: on the moment Properties are created (usually during server startup)
  // 1) actual database may not exists (multitenancy server what create DB's in runtime)
  // 2) in case of several connection props inside one process some of them may be used
  // occasiously or not used at all, so creating connection during server startup of overhead
  {$ifndef ZEOS_PREVENT_CONN}
  {$ifdef ZEOS72UP} // new since 7.2up
  with (MainConnection as TSQLDBZEOSConnection).Database do
  // ZDBC: MultipleValuesInsertFirebird is buggy, MultipleValuesInsert slower
  if UseMetadata and not (fDBMS = dFirebird) then
    if GetMetadata.GetDatabaseInfo.SupportsArrayBindings then begin
      fBatchSendingAbilities := [cCreate, cUpdate, cDelete];
      OnBatchInsert := nil;
      fSupportsArrayBindings := true;
    end;
  {$endif}
  {$endif}
end;

destructor TSQLDBZEOSConnectionProperties.Destroy;
begin
  FreeAndNil(fURL);
  FreeAndNil(fStatementParams);