14th Developer Camp

Size: px

Start display at page:

Download "14th Developer Camp"

うたろうわにべ
5 years ago
Views:

1 T3 Delphi C++ テクニカルセッション Delphi/C++Builder DB 総ざらい株式会社日本情報システム筑木真志

2 アジェンダ Delphi / C++Builder からデータベースへ接続する際の手順についての概要をまとめて解説します Delphi / C++Builderデータベースプログラミングフレームワーク Firebird / InterBase MySQL PostgreSQL Oracle / SQL Server / DB2 C++Builderで埋め込みSQLを使用する (Oracle / DB2) 2

3 Delphi/C++Builder データベースプログラミングフレームワーク

4 データベースプログラミングフレームワーク Delphi/C++Builder は標準で以下のデータベースプログラミングフレームワークをサポートしています BDE(Borland Database Engine) InterBaseExpress dbgo(ado/oledb) dbexpress その他サードパーティ製品オープンソース製品も多数 ZeosLib FIBPlus IBObjects UniDAC

5 BDE(Borland Database Engine) BDE は Paradox をベースとしたフレームワーク異種 DB 間でのクエリーのサポートなど高度な機能もあるがすでに開発は中止とはいえ結構使われている TDataSource データアクセスコンポーネント TDatabase TTable RDBMS 5

6 InterBaseExpress InterBaseExpress は InterBase と接続するためのフレームワーク InterBaseAPI を直接利用するコンポーネントで構成されているベースは 98 年に公開された FreeIBComponents TIBTransaction コンポーネントが分離しているのが特徴複数のデータベースへの二相コミットに対応出来る TDataSource データアクセスコンポーネント TIBTransaction TIBDatabase TIBTable RDBMS 6

7 dbexpress dbexpress4 は Delphi6 から導入された dbexpress の最新版 Delphi2007 で version 4.0 になったがこれまでのドライバも使うことは出来る 2009 の Professional 版は EULA によりリモート接続は不可 TDataSource データアクセスコンポーネント TDataSetProvider TDataSetProvider dbexpress Driver TSQLConnection TSQLTable RDBMS 7

8 dbgo dbgo は ADO(ActiveX Data Object) をベースとしたフレームワーク Delphi5 で ADOExpress として導入されて Delphi6 から dbgo という名前になった Professional 版でも Oracle や MSSQL などに接続できる Firebird / InterBase に接続するためには ibprovider が利用できる ibprovider Free Edition は Firebird2.0 InterBase6 まで有償版では FB2.5 IB2009 まで対応 TDataSource データアクセスコンポーネント OLEDB Provider TADOConnection TADOTable RDBMS 8

9 ZeosLib ZeosLib は Delphi/C++Builder/Kylix/Lazarus に対応したオープンソースのライブラリ現在の最新版は Delphi2007 まで対応 Delphi2009 対応は今後出る予定の ver.7 までお預け対応するデータベースが多いのが特徴 MySQL (normal and embedded) PostgreSQL Firebird (normal and embedded) Interbase SQLite MS SQL Server Oracle Sybase ADO Connections ver.7 での対応予定 Delphi7~Delphi2009 サポート FPC/Lazarus サポート MSEide/MSEgui サポート ADO MySQL 4.1~6 InterBase 5 / 6 Firebird 1.0~2.1 PostgreSQL 7~8 SQLite 2.8~3 Prepared ステートメントのサポート Firebird/InterBase 以外の DB でイベントサポートプロパティエディタの改良 9

10 各種ネイティブコンポーネント Delphi から各種データベースへの接続を行う際には通常は各データベース毎のクライアントライブラリが必要だが直接データベースと対話出来るプロトコルを実装したものをネイティブコンポーネント ( またはネイティブドライバ ) と呼ぶ IBX もその一例 Direct Oracle Access 最新版は Delphi2009 対応 Oracle11g 対応 VCL Data Access Components (ODAC, MyDAC, PgDAC) Delphi2009 対応 Oracle11g / MySQL6.0 / PostgreSQL8.3 に対応 10

11 Firebird / InterBase

12 Firebird / InterBase Firebird / InterBase は 95 年に Delphi1 C/S に InterBase4.0C がバンドルされて以来 Delphi には必ず InterBase のローカル版や開発版がバンドルされてきた 2000 年に InterBase6 がオープンソース化された後 Firebird がオープンソースプロジェクトとしてフォーク以降 InterBase は 6.5 / 7 / 7.1 / / 2007 / 2009 とバージョンを重ねている Firebird も InterBase6 と互換性のある 1.0 から 1.5 / 2.0 / 2.1 とバージョンを重ね両者の違いも大きくなってきているが今のところ API レベルの互換性はほぼ保たれている Firebird のオープンソースライセンスは MPL ベースの IPL/IDPL 12

13 Firebird / InterBase Firebird / InterBase への接続方法は多種多様なのでここでは dbexpress を基本として説明します dbexpress 標準 INTERBASEドライバ (Firebirdはサポート外) 標準 Firebirdドライバ (Delphi/C++Builder 2010よりサポート ) Devart dbexpress driver for InterBase/Firebird Upscene InterXpress for Firebird dbexpress Driver for Firebird IBX FIBPlus ADO/ODBC 経由での接続 iboledb ZeosLib 13

14 Firebird / InterBase dbexpress で Firebird に接続するテスト条件 :Firebird DBCharSet=UTF8 標準ドライバでパラメータクエリは注意が必要 Devart ドライバ規定値では Unicode 対応が Disable になっているので TSQLConnection の Params に UseUnicode=True を追加する必要がある INTERBASE ドライバ Firebird の UTF8 データベースへの接続には ServerCharSet=UTF8 を指定 InterBase2009 の付属ドキュメントでは UTF-8 とあるが - は使えないのでこれは間違い UTF8 を指定して接続した場合文字型のパラメータが ftwidestring になるこの時に AsString で文字列を渡すとエラーになるので AsWideString を使う InterXpress ドライバ現状では Unicode 対応が出来ていないその他にも動作に注意が必要 14

15 Firebird / InterBase dbexpress で InterBase に接続するテスト条件 :InterBase2009 DBCharSet=UTF8 Firebird と同様標準ドライバでパラメータクエリで注意が必要 Devart ドライバ規定値では Unicode 対応が Disable になっているので TSQLConnection の Params に UseUnicode=True を追加する必要がある INTERBASE ドライバ UTF8 データベースへの接続なので ServerCharSet=UTF8 を指定する UTF8 を指定して接続した場合文字型のパラメータが ftwidestring になるこの時に AsString で文字列を渡すとエラーになるので AsWideString を使う uses 節に DBXInterBase を追加することこれがないとメタデータを取得できないというエラーが発生する ( GetMetadata=False でも ) 15

16 Firebird / InterBase dbexpress のデータを DB 系コンポーネントで利用する ( 共通 ) 一番簡単なのは TSimpleDataSet を利用すること TSimpleDataSet は TSQLConnection+TSQLDataSet+TClientDataSet で一つのコンポーネントにしたようなもの Connection だけ別のコンポーネントを指定することも可能なので複数の TSimpleDataSet で接続を共有することも可能 TSQLDataSet+TDataSetProvider+TClientDataSet と接続して使用した場合と比べると Provider の挙動を指定出来ないので細かいことには向かない dbexpress でデータベース系コンポーネントを使うならこれを使うと大変楽が出来る TSQLDataSet / TSQLQuery / TSQLTable 等を TDataSetProvider+TClientDataSet と接続して利用する Insert / Update / Delete はプロバイダが SQL を自動生成してくれる既定値のままだと Where に全ての項目を指定した Update / Delete 動作になるのでこれは変更する元になるデータセットのフィールドコンポーネントの ProviderFlags でキー項目 ( 普通は主キー ) の pfinkey を True にする TDataSetProvider の UpdateMode を upwherekeyonly にする Firebird/InterBase の場合 SQL を大文字で書くこと 16

17 Firebird / InterBase blob の扱い BLOB SUB_TYPE 1 (TEXT) の Blob は WideMemo 型のフィールドにマッピングされる TField.OnGetText イベントでそのまま展開可能 Text := Sender.AsString; その他の画像データなどの BLOB の INSERT パラメータに対して Assign(hoge) とすればよい標準ドライバでは Firebird に Blob を Insert 出来ない InterBase2009 にはもちろん出来る 17

18 MySQL

19 MySQL MySQL は世界でもっとも普及しているオープンソースデータベースで開発元の MySQL 社がサンマイクロシステムズ社に買収され今回 Oracle によって買収されました最新安定版は最新安定版は (13/7/2009) で 6.0-Beta(6/4/2009) がリリースされて開発中だったが 5.4-Beta(17/6/2009) が突然リリースされていますこれは 5.1 のパフォーマンス改善版であるとのことだが現状では 5.1 より遅くなるケースもあるとのこと MySQL はストレージエンジンを差し替えて動作することが出来るのが特徴だが 6.0 では InterBase の生みの親の JimStarkey になる Falcon ストレージエンジンが実装されている Falcon は MVCC による完全なトランザクション制御とメモリ上でのバージョンニングによる高速なロールバックを可能としているオープンソース版と有償版がありオープンソース版のライセンスは GPL 19

20 MySQL MySQL への接続方法は dbexpress ダイレクト接続 ADO/ODBC などなどがある dbexpress MySQLドライバ Devart dbexpress driver for MySQL Devart MyDAC --- direct / non direct access ADO/ODBC 経由での接続 ZeosLib 20

21 MySQL dbexpress で MySQL に接続するテスト条件 :MySQL ServerCharSet=utf8 標準ドライバ uses 節に DBXMySQL を追加することこれがないとメタデータを取得できないというエラーが発生する ( GetMetadata=False でも ) 標準ドライバのサポートは 4.1 と 5.0 のみ MySQL6.0 からサロゲートペアがサポートされる予定だが 6.0 自体がキャンセルになってしまったその他は特に問題無し Devart MySQL ドライバ 21

22 MySQL dbexpress からストアドプロシージャを使用する MySQL5.0 からストアドプロシージャがサポートされている TSQLStoredProc の SQLConnection を設定し必要ならインプットパラメータ (Paramtype=ptInput) のパラメータを設定して ExecProc するだけ dbexpress Driver TSQLConnection TSQLStoredProc MySQL 22

23 PostgreSQL

24 PostgreSQL PostgreSQL は Ingres から派生したオープンソースの ORDBMS( 自称 ) です日本では SRA OSS 社や富士通が担いでいます PostgreSQL は Firebird と同様バージョニングアーキテクチャに基づく RDBMS です最新安定版は 8.3.7(16/3/2009) です 8.3 では HOP(Heap Only Tuples) という新機能が追加され更新処理が劇的に改善されていますレプリケーションやクラスタへの対応等でも対応製品が多く Oracle の対抗馬と位置付けられます属性として幾何データを持たせられる PostGIS による拡張 PostgreSQL のライセンスは BSD ライセンス 24

25 PostgreSQL PostgreSQL への接続方法は dbexpress ダイレクト接続 ADO/ODBC などなどがある dbexpress Devart dbexpress driver for PostgreSQL --- DirectAccess PgExpress driver --- Needs client liblary Devart PgDAC --- direct access ADO/ODBC 経由での接続 ZeosLib 25

26 PostgreSQL dbexpress で PostgreSQL に接続するテスト条件 :PostgreSQL Encoding=UTF8 標準ドライバはないので Devart ドライバ又は pgexpress ドライバが必要だが pgexpress は Delphi2009 に正式対応していない上 Devart ドライバはクライアントライブラリ不要なので Devart がお勧め Devart ドライバ規定値では Unicode 対応が Disable になっているので TSQLConnection の Params に UseUnicode=True を追加する必要がある 26

27 dbgo を使った商用データベースへの接続

28 dbgo を使った商用データベースへの接続 dbgo を使用すれば Professional 版ではサポートしていない RDB にも接続可能 Microsoft SQL Server 2000/2005/2008 Microsoft Access 2003 (Microsoft JET 3.x/4.x) Microsoft Access 2007 (Microsoft Office 12.0 Access Database Engine) Oracle 8i/9i/10g/11g IBM DB2 8.x/9.x など基本的な使用方法は DBExpress と変わりない TSQLConnection TADOConnection TSQLTable TADOTable 28

29 OLE DB プロバイダの選択 Oracle の場合 Oracle Provider for OLE DB (Oracle 製 ) Microsoft OLE DB Provider for Oracle (Microsoft 製 ) SQL Server の場合 SQL Server 2008 Native Client Microsoft OLE DB Provider for SQL Server 29

30 接続出来ない場合の確認事項標準のクライアントから普通に接続出来るか? SQL Plus / SQL Developer (Oracle) SQL Server Management Studio (SQL Server) コントロールセンター (DB2) など TADOTable の TableName プロパティにスキーマ名を含める例 ) スキーマ名 :Foo テーブル名 :Bar TableName = "Bar"; TableName = "Foo.Bar"; TADOConnection の CursorLocation プロパティの値を変更する cluseserver( カーソルをサーバー側で持つ ) に変更する 30

31 C++Builder で埋め込み SQL を使用する

32 埋め込み SQL とは C/C++ のソースコードに直接 SQL 文を記述して実行する int main(int argc, char* argv[]) { EXEC SQL BEGIN DECLARE SECTION; VARCHAR filename[8]; VARCHAR mapname[128]; double frame_lu_b; EXEC SQL END DECLARE SECTION; EXEC SQL CONNECT :user IDENTIFIED BY :passwd USING :host; EXEC SQL DECLARE CURSOR1 CURSOR FOR SELECT FILENAME, MAPNAME, FRAME_LU_B FROM MAPTABLE ORDER BY FILENAME; EXEC SQL OPEN CURSOR1; EXEC SQL WHENEVER NOT FOUND DO BREAK; while (1) { EXEC SQL FETCH CURSOR1 INTO :filename, :mapname, :frame_lu_b; printf("filename = %s, MAPNAME = %s frane_lu_b = %.4f n", filename.arr, mapname.arr, frame_lu_b); } EXEC SQL CLOSE CURSOR1; } return 0; 32

33 DB コンポーネントとの違い特徴データベースとのやりとりはソースコードに直接記述するプリコンパイラでホスト言語 (C/C++) に変換してからコンパイルするデータベースの API を直接呼び出すのでパフォーマンスがよいクエリ結果を配列にまとめてフェッチできる欠点デバッグが非常に面倒データベースの実装に大きく依存するため汎用性が悪くなる文字コードの変換等は自前で行う必要がある GUI とのやりとりも自前で行う必要がある 33

34 データベースとのやりとりホスト変数ホスト言語と埋め込み SQL との間でデータをやりとるする変数 C/C++ の基本型のみ可 (Oracle の場合 VARCHAR 型が用意 ) ホスト変数は BEGIN DECLARE SECTION と END DECLARE SECTION でくくる EXEC SQL BEGIN DECLARE SECTION; VARCHAR filename[8]; VARCHAR mapname[128]; double frame_lu_b; EXEC SQL END DECLARE SECTION; ホスト変数を SQL に組み込むには変数の前にコロン (:) をつける EXEC SQL FETCH CURSOR1 INTO :filename, :mapname, :frame_lu_b; 実行結果変数 sqlca.sqlcode で SQL の実行結果 ( エラーコード ) を参照する 34

35 Oracle の場合 coff2omf.exe を使って $(ORACLEHOME) precomp LIB orasql11.lib を C++Builder で使用できるようにする coff2omf orasql11.lib orasql11omf.lib プリコンパイラの実行 proc code=cpp cpp_suffix=cpp File1.pc 35

36 DB2 の場合 implib.exe を使って $(DB2PATH) bin db2app.dll の C++Builder 用のインポートライブラリを作る implib db2app.dll db2appomf.lib プリコンパイラの実行 DB2 のコマンドウィンドウで以下を実行する db2 connect to db2 user scott using tiger db2 prep DB2Test.sqx OUTPUT DB2Test.cpp db2 connect reset インクルードパスの設定 $(DB2PATH) include を検索パスの最初にする 36

37 最後にご静聴ありがとうございました!! Special thanks to: アナハイムテクノロジー株式会社はやしつとむ様 37

Embarcadero Developer Camp

Embarcadero Developer Camp A2 Delphi/C++ テクニカルセッション Delphi/C++ DB 総ざらいアナハイムテクノロジー株式会社代表取締役はやしつとむアジェンダ Delphi からオープンソース系データベースへ接続する際の手順についての概要をまとめて解説します Delphiデータベースプログラミングフレームワーク Firebird / InterBase MySQL PostgreSQL 2 Delphi