Page 19 of 20

Re: Zeos 7.3 testers-thread

Posted: 29.04.2023, 13:16
by miab3
Hi Jan,

In ZEOS 8.0.0 /trunk svn 8015 (Delphi 10.3.3)
In zdbc.dpk
is lacking
ZDbcXmlUtils in '..\..\src\dbc\ZDbcXmlUtils.pas'

After adding this it compiles and works.
Delphi XE2-Win32/Win64 too.

The problem occurs in D2007.
ZDbcXmlUtils needs ZBase64.dcu which does not compile in D2007:
[DCC Error] ZBase64.pas(40): E2003 Undeclared identifier: 'TBytesStream'
[DCC Error] ZBase64.pas(92): E2003 Undeclared identifier: 'TBytesStream'

Interesting here:
https://stackoverflow.com/questions/300 ... elphi-2007
https://www.codenewsfast.com/cnf/thread ... g1919q5001

Michal

Re: Zeos 7.3 testers-thread

Posted: 01.05.2023, 12:02
by marsupilami
Hello Michal,

the missing unit should be fixed now.
miab3 wrote: 29.04.2023, 13:16 Interesting here:
https://stackoverflow.com/questions/300 ... elphi-2007
https://www.codenewsfast.com/cnf/thread ... g1919q5001
I am not sure why that is interesting or what you want to tell me? Do you think about using the Webservice driver with Delphi 2007 or something like that? Or do you get errors on Dephi 2007 when compiling TZMemTable?

Re: Zeos 7.3 testers-thread

Posted: 01.05.2023, 14:05
by miab3
The problem occurs in D2007.
ZDbcXmlUtils needs ZBase64.dcu which does not compile in D2007:
[DCC Error] ZBase64.pas(40): E2003 Undeclared identifier: 'TBytesStream'
[DCC Error] ZBase64.pas(92): E2003 Undeclared identifier: 'TBytesStream'

Michal

Re: Zeos 7.3 testers-thread

Posted: 24.05.2023, 22:26
by miab3
ZEOS 8.0.0 /trunk svn 8038

Compiles and Works:

-Delphi 11.1 Alexandria - Win32/Win64(/Android/Android64- compiles but requires more thorough testing)).

[dcc32 Warning] ZDbcProxyResultSet.pas(1110): W1058 Implicit string cast with potential data loss from 'string' to 'AnsiString'
[dcc32 Warning] ZDbcXmlUtils.pas(170): W1057 Implicit string cast from 'RawByteString' to 'string'
[dcc32 Warning] ZDbcXmlUtils.pas(202): W1057 Implicit string cast from 'AnsiString' to 'string'
[dcc32 Warning] ZDbcXmlUtils.pas(233): W1057 Implicit string cast from 'AnsiString' to 'string'

Michal

Re: Zeos 7.3 testers-thread

Posted: 06.07.2023, 09:56
by miab3
ZEOS 8.0.0 /trunk svn 8041
https://sourceforge.net/p/zeoslib/code-0/8041/tree/

Compiles and Works:

- Lazarus 3.0RC1 Win32,
- Delphi 11.1 Alexandria - Win32/Win64(/Android/Android64- compiles but requires more thorough testing)).

Some Delphi warnings:
[dcc32 Warning] ZDbcProxyResultSet.pas(1110): W1058 Implicit string cast with potential data loss from 'string' to 'AnsiString'
[dcc32 Warning] ZDbcXmlUtils.pas(170): W1057 Implicit string cast from 'RawByteString' to 'string'
[dcc32 Warning] ZDbcXmlUtils.pas(202): W1057 Implicit string cast from 'AnsiString' to 'string'
[dcc32 Warning] ZDbcXmlUtils.pas(233): W1057 Implicit string cast from 'AnsiString' to 'string'

Michał

Re: Zeos 7.3 testers-thread

Posted: 28.08.2023, 20:13
by miab3
ZEOS 8.0.0 /trunk svn 8046
https://sourceforge.net/p/zeoslib/code-0/8046/tree/

Compiles and Works:

- Lazarus 3.0RC1 Win32,
- Delphi 2007(-ZBase64.pas),
- RAD Studio XE2-Win32/Win64/OSX32/C++32,
- Delphi 10.3.3 Rio-Win32/Win64/(Android/Android64- compiles but requires more thorough testing),
- Delphi 11.1 Alexandria - Win32/Win64(/Android/Android64- compiles but requires more thorough testing)).

Tested: SQLite, Firebird, MariaDB, MySQL, PostgreSQL, Oracle Database, MS SQL(ADO, OLE DB, ODBC, FreeTDS)

My mORMot 1.18 r6435 PerfTest passes(Delphi 11.1 Alexandria Win32/Win64, Delphi 10.3.3 Rio Win32/Win64, Delphi 2007)

Some Delphi warnings:
[dcc32 Warning] ZDbcProxyResultSet.pas(1110): W1058 Implicit string cast with potential data loss from 'string' to 'AnsiString'
[dcc32 Warning] ZDbcXmlUtils.pas(170): W1057 Implicit string cast from 'RawByteString' to 'string'
[dcc32 Warning] ZDbcXmlUtils.pas(202): W1057 Implicit string cast from 'AnsiString' to 'string'
[dcc32 Warning] ZDbcXmlUtils.pas(233): W1057 Implicit string cast from 'AnsiString' to 'string'

Michał

Re: Zeos 7.3 testers-thread

Posted: 08.05.2024, 09:07
by miab3
Hi Jan,

8.0-patches_8159
Delphi 11 Win32/Win64/Android32/Android64

Only one Warning:

[dcc32 Warning] ZDbcDbLibResultSet.pas(602): W1044 Suspicious typecast of string to PAnsiChar

Code: Select all

        tdsMsTime: begin
            FTempStr := FormatDateTime(GetStatement.GetConSettings^.ReadFormatSettings.TimeFormat, TdsDateTimeAllToDateTime(PDBDATETIMEALL(dbData)^));
{L602:}            Result := PAnsiChar(FTempStr);
            Len := Length(FTempStr);
          end;
Michal

Re: Zeos 7.3 testers-thread

Posted: 08.05.2024, 10:23
by marsupilami
Hello Michal,

this should be fixed in rev. 8160.

Best regards,

Jan

Re: Zeos 7.3 testers-thread

Posted: 08.05.2024, 10:45
by miab3
Hi Jan,

8.0-patches_8160
Delphi 11 Win32/Win64/Android32/Android64

Now three Warnings:

[dcc64 Warning] ZDbcDbLibResultSet.pas(595): W1058 Implicit string cast with potential data loss from 'string' to 'AnsiString'
[dcc64 Warning] ZDbcDbLibResultSet.pas(599): W1058 Implicit string cast with potential data loss from 'string' to 'AnsiString'
[dcc64 Warning] ZDbcDbLibResultSet.pas(603): W1058 Implicit string cast with potential data loss from 'string' to 'AnsiString'

Code: Select all

      end else if tdstype = tdsMsTime then begin
{L595}        FTempStr := FormatDateTime(GetStatement.GetConSettings^.ReadFormatSettings.TimeFormat, TdsDateTimeAllToDateTime(PDBDATETIMEALL(dbData)^));
        Result := PAnsiChar(FTempStr);
        Len := Length(FTempStr);
      end else if tdstype = tdsMsDate then begin
{L599}        FTempStr := FormatDateTime(GetStatement.GetConSettings^.ReadFormatSettings.DateFormat, TdsDateTimeAllToDateTime(PDBDATETIMEALL(dbData)^));
        Result := PAnsiChar(FTempStr);
        Len := Length(FTempStr);
      end else if tdstype in [tdsMsDateTime2, tdsMsDateTimeOffset] then begin
{L603}        FTempStr := FormatDateTime(GetStatement.GetConSettings^.ReadFormatSettings.DateTimeFormat, TdsDateTimeAllToDateTime(PDBDATETIMEALL(dbData)^));
        Result := PAnsiChar(FTempStr);
        Len := Length(FTempStr);
      end else begin

Regards,

Michal

Re: Zeos 7.3 testers-thread

Posted: 08.05.2024, 18:50
by marsupilami
Hello Michal,

the warnings should be fixed now.

Best regards,

Jan

Re: Zeos 7.3 testers-thread

Posted: 08.05.2024, 20:00
by miab3
Hi Jan,

8.0-patches_8167
Delphi 11.1 Win32/Win64/Android32/Android64
Now without Warnings.

My mORMot 1.18 r6435 PerfTest passes - Delphi 11.1 Win32/Win64; Delphi 2007

Regards,

Michal

Re: Zeos 7.3 testers-thread

Posted: 14.05.2024, 07:44
by alexkam75
lazarus win32/win64 ver. 3.99
fpc 3.3.1
firebird 3.0
http://svn.code.sf.net/p/zeoslib/code-0 ... .0-patches

error in file src\plain\ZPlainFirebird.pas

function IMaster.getStatus(): IStatus;
begin
Result := MasterVTable(vTable).getStatus(Self);
end;

Re: Zeos 7.3 testers-thread

Posted: 14.05.2024, 12:56
by marsupilami
Hello,
alexkam75 wrote: 14.05.2024, 07:44 lazarus win32/win64 ver. 3.99
fpc 3.3.1
firebird 3.0
http://svn.code.sf.net/p/zeoslib/code-0 ... .0-patches

error in file src\plain\ZPlainFirebird.pas

function IMaster.getStatus(): IStatus;
begin
Result := MasterVTable(vTable).getStatus(Self);
end;
I am not sure what the problem is in this case? What error message do you get? How do you trigger the problem?

Re: Zeos 7.3 testers-thread

Posted: 14.05.2024, 13:14
by alexkam75
in lazarus 3.99 with fpc 3.2.2. no error, with fpc 3.3.1 access violation error

Re: Zeos 7.3 testers-thread

Posted: 14.05.2024, 16:19
by alexkam75
Image