MyClassesUni assign

[a.alekizoglou]

In latest version 5.1.4 procedure Assign in MyClassesUni should copy FEmbParams as follows:

Code: Select all

procedure TMySQLConnection.Assign(Source: TCRConnection);
var
  Src: TMySQLConnection;
begin
  inherited;

  Src := TMySQLConnection(Source);
  FConnectionTimeout := Src.FConnectionTimeout;
  FDatabase := Src.FDatabase;
  FPort := Src.FPort;
  FCompress := Src.FCompress;
  FUseUnicode := Src.FUseUnicode;
  FCharset := Src.FCharset;
  FProtocol := Src.FProtocol;
  FMySQLAPI := Src.FMySQLAPI;
  FDirect := Src.FDirect;
{$IFNDEF CLR}
  FIPVersion := Src.FIPVersion;
{$ENDIF}
  FEmbedded := Src.FEmbedded;
//QUALISYS
  FEmbParams.Assign(Src.FEmbParams);
  FOptimizedBigInt := Src.FOptimizedBigInt;
  FNullForZeroDelphiDate := Src.FNullForZeroDelphiDate;
  FCheckPrecision := Src.FCheckPrecision;
  FInteractive := Src.FInteractive;
end;

[AndreyZ]

Thank you for the information. We have fixed this problem. This fix will be included in the next UniDAC build.