The Commands sample shows you how to set up column mappings.
Location
You can find the MappingColumns sample project at:
- Start | Programs | Embarcadero RAD Studio Sydney | Samples and then navigate to:
Object PascalDatabaseFireDACSamplesDApt LayerMappingColumns
- Subversion Repository:
- You can find Delphi code samples in GitHub Repositories. Search by name into the samples repositories according to your RAD Studio version.
How to Use the Sample
- Navigate to the location given above and open
MappingColumns.dproj. - Press F9 or choose Run > Run.
- Click on the Use Connection Definition combo box and select an option.
Files
| File in Delphi | Contains |
|---|---|
MappingColumns.dprojMappingColumns.dpr | The project itself. |
fMappingColumns.pasfMappingColumns.fmx | The main form. |
Implementation
To set up the columns mapping, the sample implements the following steps.
Create table adapter
[crayon-693f198839ec8440134915/]Assign command
[crayon-693f198839ecd032664317/]Set source result set name
[crayon-693f198839ece001786823/]Set the DatSTable name
Set the DatSTable name where the rows are fetched.
[crayon-693f198839ecf886922508/]Set the UpdateTable name
[crayon-693f198839ed0507570599/]Set the UpdateTable name
[crayon-693f198839ed1444477773/]Setup column mappings
[crayon-693f198839ed2667122776/]Fetch rows
[crayon-693f198839ed3843246727/]Update changes to RDBMS
To append rows, implement the following code:
[crayon-693f198839ed4803474386/]Then, the sample updates the changes to the RDBMS.
[crayon-693f198839ed5866142998/]Please go to the link below if you want to check the original post of Embarcadero for this sample:
http://docwiki.embarcadero.com/CodeExamples/Sydney/en/FireDAC.MappingColumns_Sample

