Migrating from AnyDAC to FireDAC

-

In my last blog I explained how to migrate from ADO to FireDAC. Here I will show you how to migrate a client-server application using AnyDAC to the FireDAC. Migration from Anydac to FireDAC is very easy in compare to other migration as after acquisition of AnyDAC by Embercadero they renamed it to FireDAC. So most of functionalities are same but naming are different.

Difference
The API was renamed, including new unit names and new API prefixes.

1. For Class Names the name prefix changed from TADxxxxx to TFDxxxxx etc.

2. For FireDAC components, the name prefix changed from TADXxxx to TFDXxxx.

3. For global functions, the name prefix changed from ADXxx to FDXxx.

4. For exception classes, the name changed from EADXxx to EFDXxx.

5. For Units, hierarchical namespaces are now implemented. Unit Names are changed from uAD to FireDAC. For examples: uADCompClient -> FireDAC.Comp.Client, uADStanOption -> FireDAC.Stan.Option, uADPhysIB -> FireDAC.Phys.IB

6. Run-time packages are renamed like FireDACCommon190, FireDACCommonDriver190, FireDACADSDriver190, FireDACASADriver190, FireDACDataSnapDriver190, FireDACDb2Driver190, FireDACDBXDriver190

7. Configuration files were renamed from ADXxx.ini to FDXxx.ini and relocated to C:\Users\Public\Documents\Embarcadero\Studio\19.0\FireDAC:

8. The FireDAC configuration registry key was relocated to HKCU\Software\Embarcadero\FireDAC.

9. The key values are pointing to FireDAC configuration files: DriverFile to FDDrivers.ini, ConnectionDefFile to FDConnectionDefs.ini

So lets start in steps.

1. Units Changed
We need to replace used AnyDAC units to FireDAC units.
Find 
uADStanIntf, uADStanOption, uADStanError, uADUIIntf, uADPhysIntf, uADStanDef, uADPhys, uADStanPool, uADStanAsync, uADStanParam, uADDatSet, uADDAptIntf, uADDApt, uADCompClient, uADCompDataSet
Replace
          FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Error, FireDAC.UI.Intf,
FireDAC.Phys.Intf, FireDAC.Stan.Def, FireDAC.Phys, FireDAC.Stan.Pool,
FireDAC.Stan.Async, FireDAC.Stan.Param, FireDAC.DatS, FireDAC.DApt.Intf,
FireDAC.DApt, FireDAC.Comp.Client, FireDAC.Comp.DataSet

2. AnyDAC components classes compatible with FireDAC
Search ANYDAC classes and replace with FireDAC classes

 ANYDAC
 FireDAC
TADConnection
TFDConnection
TADTransaction
TFDTransaction
TADTable
TFDTable
TADQuery
TFDQuery
TADStoredproc
TFDStoredproc
TADCommand
TFDCommand
TADUpdateSQL
TFDUpdateSQL

However to simplify and automate migration of Delphi applications from old to new FireDAC API, Embercadeo provides reFind utility. reFind is a command-line utility, which uses Perl Compatible Regular Expressions (PCRE) to rename entities in the files. You can find the utility in Delphi installed foxed <RAD Studio>\Bin\reFind utility.

A migration sample, located in <RAD Studio Demos> \ Delphi \ Database \ FireDAC \Tool\reFindDemo

If you want to migrate AnyDAC to FireDAC using refind utility please follow these steps :

1. Make a backup copy of your application.

2. Open the RAD Studio Command-line window.

3. Go to your project sources root folder.

4. For units and members, run the next two commands:

<RAD Studio>\Bin\reFind *.pas *.dpk *.dpr *.dproj *.inc /S /Y /I /W /B:0 /X:<RAD Studio Demos> \Delphi \Database \FireDAC \Tool \reFind \AD2FDMigration \FireDAC_Rename_Units.txt

<RAD Studio>\Bin\reFind *.pas *.dfm *.dpk *.dpr *.inc /S /Y /I /B:0 /X:<RAD Studio Demos> \Delphi \Database \FireDAC \Tool \reFind \AD2FDMigration \FireDAC_Rename_API.txt

If your application is built with run-time packages, then rename the package references according to the package names given above.
If your application is using driver configuration and/or persistent connection definition files, then rename the files according to the configuration file names given above.

Notes:
This approach does not guarantee 100% automatic and successful migration, as it is rule-based and there is not an exact, one-to-one name match. So I strongly suggest that you first create a backup copy of all your projects, although you can also use reFind to create backup copies of the changed files.

http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Migrating_AnyDAC_Applications_to_FireDAC

Comments

Post a Comment

Popular posts from this blog

ShellExecute in Delphi

-
ShellExecute in Delphi – Launch external applications. ShellExecute is Delphi Windows API function that is mostly used for launch external applications from our Delphi application. This function is linked to the ShellExecute Windows  API function. The function returns an integer that corresponds to an error code which is very useful when we need to show some status  if the function worked  or not . By using ShellExecute we can also do following operations.... Can print documents from within my program, without explicitly starting the application  that created the document, such as: print a Word-document without starting Word. Can open browser with a local HTML page Can surf to a site i.e. open an external URL link from a Delphi application Can send mails thorugh outlook Syntax of Windows API function HINSTANCE ShellExecute(   _In_opt_        HWND hwnd,   _In_opt_        LPCTSTR lpOperation,   _In_              LPCTSTR lpFile,   _In_opt_        LPC
Read more

MS Excel Automation in Delphi

-
In this blog I will describe how to read and write data from and to an Excel file. Sometime in our application we use Excel for reporting purpose, for data import / export purpose and for other works. So here I will explain how to access an Excel file and use for data read / write. For this Excel 2003 or later should have installed in our system. First use Excel2000 unit to uses clause. This unit comes with Delphi installation it self. You can get the unit in installed path C:\Program Files (x86)\Embarcadero\RAD Studio\10.0\OCX\Servers Uses    Excel2000; Before proceed I would mention an important word  LCID which is required at most places. So what it LCID? LCID = In Microsoft Excel, the LCID indicates the currency symbol to be used when this is an xlListDataTypeCurrency type.  Returns 0 (which is the Language Neutral LCID) when no locale is set for the data type of the column. We can get LCID in Delphi by using  GetUserDefaultLCID  function.. privat
Read more

Drawing Shapes in Delphi

-
Image
Believe me, drawing shapes in Delphi is so easy. To develop a software like CAD, Paint, CorelDraw Delphi provides large number of classes and members that supports to draw shapes on a form or on a graphic control. In Delphi, we draw shapes on canvas of a form or graphic controls. Canvas is an area of form where we can draw shapes, lines and can fill colors on shapes. In Delphi, every form or graphic controls have Canvas property which provides TCanvas object that can be used to draw shapes. TPen object is used to draw lines and we can set size, color of lines. TBrush object is used to set color and style to fill the shapes. Most frequently used classes for drawing shapes are TCanvas , TBitmap, TGraphics, TPen, TBrush TCanvas Use TCanvas as a drawing surface for objects that draw an image of themselves TBitmap   Bitmap is a powerful graphics object used to create, manipulate (scale, scroll, rotate, and paint), and store images in memory and as files on a disk.  TGraphics TGr
Read more