Can`t load package DataAbstract_BDEDriver_D7.bpl

Anderson_Gregorio · March 9, 2021, 12:42pm

Hi,

We`re trying to update all packages to the last Version.

At moment we having issues while opening Delphi 7 after installed last version of Data Abstract.

Follow:

We`ve installed compile all Legacy packages after install the last version.

Informations:
Windows 7
Delphi 7
DataAbstract: RemObjects Data Abstract for Delphi, Server Edition - 10.0.0.1495.exe

Regards.

EvgenyK · March 9, 2021, 2:00pm

Hi,

Do you have installed the BDE feature in Delphi7 itself?

in general, you may skip using this package.
it is needed only for adding TDABDEDriver to component palette and adding uDABDEDriver unit to uses section when you drop TDABDEDriver to form.

Anderson_Gregorio · March 9, 2021, 2:41pm

Hi

How can I install through DataAbastract Installer?

Can I install stand alone?

I`ve just updated the package to the last version.

Regards.

EvgenyK · March 9, 2021, 2:44pm

Hi,

you can select BDE driver in installer.

Note: It will be available only if bdertl70.bpl is detected on your pc.
Note2: not all driver packages can be installed. most of them require 3rd party commercial libraries.

Anderson_Gregorio · March 9, 2021, 3:02pm

Hi

In the Data Abstract Installer I coudn`t find this option.

Follow:

Optional Components

Additional Tasks

Regards.

EvgenyK · March 9, 2021, 3:21pm

Hi,

Sorry, we doesn’t have possibility to choose DA drivers.

BDE driver is installed automatically if bdertl70.bpl and DBTables.dcu are detected on your pc.

Anderson_Gregorio · March 9, 2021, 6:25pm

Hi

OK, i just skipped the package check.

Acctually Im in another problem. uDAAnyDACDriver isnt compiling.

Delphi 7.

[Error] uDAAnyDACDriver.pas(1593): Incompatible types
[Hint] uDAAnyDACDriver.pas(258): Private symbol ‘FCol’ declared but never used
[Hint] uDAAnyDACDriver.pas(259): Private symbol ‘FCmd’ declared but never used
[Hint] uDAAnyDACDriver.pas(260): Private symbol ‘fParent’ declared but never used
[Error] uDAAnyDACDriver.pas(262): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetNativeObject’
[Error] uDAAnyDACDriver.pas(263): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.isTFieldCompatible’
[Error] uDAAnyDACDriver.pas(264): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetFieldName’
[Error] uDAAnyDACDriver.pas(265): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetDataType’
[Error] uDAAnyDACDriver.pas(266): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetSize’
[Error] uDAAnyDACDriver.pas(267): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetDecimalPrecision’
[Error] uDAAnyDACDriver.pas(268): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.SetDecimalPrecision’
[Error] uDAAnyDACDriver.pas(269): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetDecimalScale’
[Error] uDAAnyDACDriver.pas(270): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.SetDecimalScale’
[Error] uDAAnyDACDriver.pas(271): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.SetDataType’
[Error] uDAAnyDACDriver.pas(272): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetFieldIndex’
[Error] uDAAnyDACDriver.pas(273): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.GetValue’
[Error] uDAAnyDACDriver.pas(274): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.IsNull’
[Error] uDAAnyDACDriver.pas(276): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeField.Create’
[Hint] uDAAnyDACDriver.pas(283): Private symbol ‘FCmd’ declared but never used
[Hint] uDAAnyDACDriver.pas(284): Private symbol ‘FTab’ declared but never used
[Hint] uDAAnyDACDriver.pas(285): Private symbol ‘FFlags’ declared but never used
[Hint] uDAAnyDACDriver.pas(286): Private symbol ‘FRowIndex’ declared but never used
[Hint] uDAAnyDACDriver.pas(287): Private symbol ‘FRowsPurged’ declared but never used
[Hint] uDAAnyDACDriver.pas(288): Private symbol ‘FBuffs’ declared but never used
[Hint] uDAAnyDACDriver.pas(289): Private symbol ‘FSQLCommand’ declared but never used
[Hint] uDAAnyDACDriver.pas(290): Private symbol ‘fCorrectType’ declared but never used
[Hint] uDAAnyDACDriver.pas(291): Private symbol ‘fDAEConnection’ declared but never used
[Hint] uDAAnyDACDriver.pas(292): Private symbol ‘First’ declared but never used
[Hint] uDAAnyDACDriver.pas(293): Private symbol ‘CheckActive’ declared but never used
[Hint] uDAAnyDACDriver.pas(294): Private symbol ‘CheckBidir’ declared but never used
[Hint] uDAAnyDACDriver.pas(295): Private symbol ‘LocateRecord’ declared but never used
[Hint] uDAAnyDACDriver.pas(297): Private symbol ‘IsNull’ declared but never used
[Error] uDAAnyDACDriver.pas(305): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.QueryInterface’
[Error] uDAAnyDACDriver.pas(306): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess._AddRef’
[Error] uDAAnyDACDriver.pas(307): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess._Release’
[Error] uDAAnyDACDriver.pas(310): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.ClearFieldDefs’
[Error] uDAAnyDACDriver.pas(311): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetRecordCount’
[Error] uDAAnyDACDriver.pas(312): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetBOF’
[Error] uDAAnyDACDriver.pas(313): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetEOF’
[Error] uDAAnyDACDriver.pas(314): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetActive’
[Error] uDAAnyDACDriver.pas(315): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.SetActive’
[Error] uDAAnyDACDriver.pas(316): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.Next’
[Error] uDAAnyDACDriver.pas(317): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.Locate’
[Error] uDAAnyDACDriver.pas(318): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.Lookup’
[Error] uDAAnyDACDriver.pas(319): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetFieldName’
[Error] uDAAnyDACDriver.pas(320): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.DisableControls’
[Error] uDAAnyDACDriver.pas(321): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.EnableControls’
[Error] uDAAnyDACDriver.pas(322): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetIsEmpty’
[Error] uDAAnyDACDriver.pas(323): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.FreeBookmark’
[Error] uDAAnyDACDriver.pas(324): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetBookMark’
[Error] uDAAnyDACDriver.pas(325): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GotoBookmark’
[Error] uDAAnyDACDriver.pas(326): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetState’
[Error] uDAAnyDACDriver.pas(327): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.ControlsDisabled’
[Error] uDAAnyDACDriver.pas(328): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.Prepare’
[Error] uDAAnyDACDriver.pas(329): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetFields’
[Error] uDAAnyDACDriver.pas(330): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.FieldCount’
[Error] uDAAnyDACDriver.pas(331): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.FindField’
[Error] uDAAnyDACDriver.pas(332): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.IsTDatasetCompatible’
[Error] uDAAnyDACDriver.pas(333): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetNativeFieldData’
[Error] uDAAnyDACDriver.pas(334): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetNativeFieldDataType’
[Error] uDAAnyDACDriver.pas(335): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.GetNativeFieldValue’
[Error] uDAAnyDACDriver.pas(336): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.CanUseNativeFieldData’
[Error] uDAAnyDACDriver.pas(338): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.Create’
[Error] uDAAnyDACDriver.pas(339): Unsatisfied forward or external declaration: ‘TDAEAnyDACNativeDatabaseAccess.Destroy’
[Error] uDAAnyDACDriver.pas(345): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.GetNativeObject’
[Error] uDAAnyDACDriver.pas(347): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.CreateDataset’
[Error] uDAAnyDACDriver.pas(348): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.CreateNativeObject’
[Error] uDAAnyDACDriver.pas(349): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.CreateNativeDatabaseAccess’
[Error] uDAAnyDACDriver.pas(351): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.DoPrepare’
[Error] uDAAnyDACDriver.pas(352): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.DoExecute’
[Error] uDAAnyDACDriver.pas(353): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.DoGetSQL’
[Error] uDAAnyDACDriver.pas(354): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.DoSetSQL’
[Error] uDAAnyDACDriver.pas(355): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.ClearParams’
[Error] uDAAnyDACDriver.pas(357): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.SetParamValues’
[Error] uDAAnyDACDriver.pas(358): Unsatisfied forward or external declaration: ‘TDAEAnyDACQueryNative.GetParamValues’
[Error] uDAAnyDACDriver.pas(366): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.GetNativeObject’
[Error] uDAAnyDACDriver.pas(368): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.CreateDataset’
[Error] uDAAnyDACDriver.pas(369): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.CreateNativeObject’
[Error] uDAAnyDACDriver.pas(370): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.CreateNativeDatabaseAccess’
[Error] uDAAnyDACDriver.pas(372): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.RefreshParams’
[Error] uDAAnyDACDriver.pas(373): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.GetStoredProcedureName’
[Error] uDAAnyDACDriver.pas(374): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.SetStoredProcedureName’
[Error] uDAAnyDACDriver.pas(375): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.DoExecute’
[Error] uDAAnyDACDriver.pas(376): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.Execute’
[Error] uDAAnyDACDriver.pas(378): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.SetParamValues’
[Error] uDAAnyDACDriver.pas(379): Unsatisfied forward or external declaration: ‘TDAEAnyDACStoredProcedureNative.GetParamValues’
[Fatal Error] dDBFarmConn.pas(19): Could not compile used unit ‘uDAAnyDACDriver.pas’

Could you help with this one?

Regards.

RemObjectsSoftware · March 10, 2021, 8:52am

Thanks, logged as bugs://85701

RemObjectsSoftware · March 10, 2021, 8:54am

bugs://85701 got closed with status fixed.

EvgenyK · March 10, 2021, 8:57am

pls update uDAAnyDACDriver.pas as

...
{$IFDEF ENABLE_DIRECTMODE} // <-------------- added, ~253 line
  TDAEAnyDACNativeDatabaseAccess = class;
...
{$ENDIF} // <-------------- added, ~384 line
procedure Register;
...
function TDAEAnyDACConnection.GetQueryGenerator: TDASQLQueryGenerator;
..
    Result := inherited GetQueryGenerator; //<------------- changed, ~1598 line 
  end;
end;
...

Anderson_Gregorio · March 10, 2021, 2:18pm

Hi

Seems It war ok.

But now, while compiling in Delphi 7. Is shown this one.

function TSQLParser.ParseBitString(s: string): Variant;
var
i, len: Integer;
str: string;
u: UInt64;
p: PChar;
begin
str := String_Substring(s, 1 , Length(str) - 2);
u := 0;
len := Length(str)-1;
p := PChar(str);
for i := len downto 0 do
if p[i] = ‘1’ then
u := u + (1 shl len);
if u shr 32 = 0 then
Result := u and $FFFFFFFF // uint32
else
Result := u; // uint64 - Exactly here ~Line 1612
end;

I don`t know if it is a Delphi 7 bug or some incompatibility

Regards.
[Fatal Error] uDASQLParser.pas(1613): Internal error: C1118

EvgenyK · March 10, 2021, 2:28pm

try to launch C:\Program Files (x86)\RemObjects Software\Build\install_DA.cmd.
after that check dataabstract_log.html in that folder.
will this error be shown in this log file?

if I compile uDASQLParser.pas with dcc32.exe, I have no C1118:

Borland Delphi Version 15.0
Copyright (c) 1983,2002 Borland Software Corporation

C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\source\uDAWhere.pas(2034) Warning: Return value of function 'TDAWhereBuilder.XMLToExpression' might be undefined

uDASQLTokenizer.pas(950) Warning: Variable 'lCurrLen' might not have been initialized

uDASQLTokenizer.pas(951) Warning: Variable 'lTok' might not have been initialized

uDASQLParser.pas(946) Warning: Variable 'loperator' might not have been initialized
139403 lines, 0.22 seconds, 14089 bytes code, 4 bytes data.

Anderson_Gregorio · March 10, 2021, 3:38pm

This one is a Fatal Error, I didn’t find him inside this file.

Looking for it on google I just found that is a bug relationed with Uint64 on Delphi 7, I`ve replaced to Int64. And seems it worked.

Regards.