BDE 升级到FireDAC

bde的驱动错误

210d，BDE 2501麻烦的无奈的错误

 

BDE  Query

Replace Str in files   by cnpack tools

TQuery
TFDQuery

 

dmdb->qrypub->Open(sql);

fdmemtb->Data = dmdb->qrypub->Data;

 

TTable
TFDTable

 

TStoredProc
TFDStoredProc

 

->DatabaseName
->Connection

Database1->Connection
->FDConnection1

 

           ADOStoredProc1->Unprepare();
           ADOStoredProc1->Prepare();

TADOStoredProc

TFDStoredProc


dmdb->Database1->Connection;
dmdb->FDConnection1;

TGradientPanel

TPanel

 

 [ilink32 Error] Error: Unresolved external 'Bde::Dbtables::TDatabase::' referenced from E:\unitDB.OBJ

[bcc32 Error] DBTables.hpp(11): E2209 Unable to open include file 'Bde.DBTables.hpp'

remove bde ,change to FDQuery

#include <Db.hpp>

 #include <DBTables.hpp>

 

db.hpp chnage to

 #include <Data.DB.hpp>

 

如果继续用BDE，berlin版本里

 #include <DBTables.hpp>

替换为

 #include <Bde.DBTables.hpp>

 ProcedureName

StoredProcName

 

ADOStoredProc2->Parameters->ParamByName

ADOStoredProc2->ParamByName

 

2019.5.31

bde store存储过程参数不正确，参数值错位了，传参改为value赋值，不要用asString赋值就好了。

 

#include <FireDAC.Comp.Client.hpp>
#include <FireDAC.Comp.DataSet.hpp>
#include <FireDAC.DApt.hpp>
#include <FireDAC.DApt.Intf.hpp>
#include <FireDAC.DatS.hpp>
#include <FireDAC.Phys.Intf.hpp>
#include <FireDAC.Stan.Async.hpp>
#include <FireDAC.Stan.Error.hpp>
#include <FireDAC.Stan.Intf.hpp>
#include <FireDAC.Stan.Option.hpp>
#include <FireDAC.Stan.Param.hpp>

 

 TFloatField

TBCDField

http://blogs.embarcadero.com/davidi/2015/03/25/43870/

http://docs.embarcadero.com/products/rad_studio/firedac/frames.html
 

BDE name	FireDAC name	FireDAC unit
TSession	TADManager	uADCompClient
TDatabase	TADConnection	uADCompClient
Alias*	ConnectionDef*
Database*	Connection*
Session	ADManager	uADCompClient
SessionName
PrivateDir
=====	=================	=================
TQuery	TADQuery	uADCompClient
TStoredProc	TADStoredProc	uADCompClient
TTable	TADTable	uADCompClient
TUpdateSQL	TADUpdateSQL	uADCompClient
TBatchMove	TADDataMove	uADCompDataMove
=====	=================	=================
TParam	TADParam	uADStanParam
TParams	TADParams	uADStanParam
TBlobStream	TADBlobStream	uADCompDataSet
TDBDataSet, TBDEDataSet	TADRDBMSDataSet	uADCompClient
EDBEngineError	EADDBEngineException	uADStanError

 The full list you can find in <FireDAC>\Bin\BDE2FireDAC.txt file.