Definitivamente DBX 4 facilita a vida do desenvolvedor, é muito fácil utilizar o framework.
Abaixo um exemplo que mostra o quão fácil é utilizar o Framework do DBX, este exemplo conecta ao banco de dados, lê os parâmetros de conexão, inicia uma transação, executa uma consulta e comita a transação.
program DBX4Example; {$APPTYPE CONSOLE} uses SysUtils, DBXDynalink, Dialogs, DBXCommon; var aConnName: string; aDBXConn: TDBXConnection; aDBXTrans : TDBXTransaction; aCmnd: TDBXCommand; aReader: TDBXReader; aColCount: integer; begin if aDBXConn <> nil then // Start transaction // Prepare and execute the SQL Statement aColCount := aReader.ColumnCount; while aReader.Next do Writeln( '====================================================' ); // Commit transaction Readln; |
O resultado é:
================= Connection Properties ============
DelegateConnection=
DriverName=Interbase
DriverUnit=DBXDynalink
DriverPackageLoader=TDBXDynalinkDriverLoader
DriverPackage=DBXCommonDriver110.bpl
DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader
DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
Database=localhost:C:CodeGearInterBaseexamplesdatabaseemployee.ib
RoleName=RoleName
User_Name=sysdba
Password=masterkey
ServerCharSet=
SQLDialect=3
BlobSize=-1
CommitRetain=False
WaitOnLocks=True
ErrorResourceFile=
LocaleCode=0000
Interbase TransIsolation=ReadCommited
Trim Char=False
ConnectionName=Employee
Results from Query: SELECT * FROM Country
Number of Columns: 2
USA
England
Canada
Switzerland
Japan
Italy
France
Germany
Australia
Hong Kong
Netherlands
Belgium
Austria
Fiji
teste
ss
aaaa
aaa1
brazil
====================================================
Outros artigos do mesmo autor:
DBX 4 Framework - Class Diagram - Delphi 2007 for Win32
Traduções deste artigo:
Versión en Español clic acá
English Version click here
Nenhum comentário:
Postar um comentário