Munka Firebird Delphi, Delphi-programozó blogja
A feladat előttem nagyon egyszerű volt, kellett egy egységes adatbázis, adatok átvitele egy másik adatbázisba. Az adatbázis szerkezete én ugyanolyanok, így gondolom a feladat még könnyebb, valószínűleg nem.
Telepítettem FireBird 1.5 Server és tedd a mappában alap 2 * .FDB.
Ezután létrehoztam egy projekt Delphi és telepítse a következő alkatrészeket a formában:
- TIBDataBase - 2 db
- TIBQuery - 2 db
- TIBTable - 1 db
- TDataSource - 1 db
- TDBGrid - 1 db
- TIBTransaction - 1 db
- TButton - 7 db
- TComboBox - 1 db
TComboBox komponens szükséges, hogy megjelenik egy lista az első adatbázis táblázat adatai, ahonnan én adja át az adatokat egy másik adatbázisba.
Ami ínszalag összekapcsolt alkatrészeket. Components TIBDataBase felvettem a kapcsolatot TIBTransaction a DefaultTransaction tulajdon. TIBQuery alkatrészek és TIBTable felvettem a kapcsolatot TIBDataBase az adatbázisban tulajdon. TDataSource I. komponens kapcsolatot TIBQuery (a megfelelő számomra) a DataSet tulajdon. és TDataSource I. komponens kötve TDBGrid a DataSource tulajdonság. Ott kell lennie minden tiszta, minden szabvány.
Szintén LoginPromt tulajdon TIBDatabase alkatrész kell állítani hamis A oly módon, hogy nem jelenik meg egy üzenetet, hogy adja meg a jelszót és a felhasználó, és Params tulajdonság, TIBDatabase alkatrész, meg kell adnia kapcsolat paramétereit (felhasználónév és jelszó) alapértelmezés szerint lesz:
Elvégre mi készítettünk, akkor kell csatlakozni az adatbázisunkban. Erre a célra az onclick esemény útvonal választó gomb az adatbázisba, írtam az alábbi kódot: