【DO!BOOK・ページリンク】
2008_migaro_techreport_001   123 / 136

BOOKをみる

10秒後にBOOKのページに移動します


121 9.一覧明細での 画像表示 ファイルサーバやローカルにある 画像ファイルを、一覧検索の明細 に表示できますか? DB のファイルレコード上にない 画像を表示する場合、TImage を 使用することになる。  DBCtrlGrid 上で一覧明細として表示し たい場合は、描画を行うOnPaintPanel イ ベントを利用することで実現が可能であ る。【図9】  OnPaintPanel イベントでの画像読み込 みの例を示す。【ソース7】 ソース7 OnPaintPanelイベントでの画像読み込み例 procedure Tfrm1.DBCtrlGrid1PaintPanel(DBCtrlGrid: TDBCtrlGrid; Index: Integer); begin with DBCtrlGrid.DataSource.DataSet do begin if not(Active) then Exit; // 画像出力 try // 画像を読み込み(bmp 画像) Image1.Picture.LoadFromFile(‘フィールド内容で画像を指定’); except    try Image1.Picture.LoadFromFile(‘対象画像ファイルがない場合の画像'); except end; end; end; end; Q. A. 図9 実装イメージ