BDE 升级到FireDAC

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

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>

#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.