用CELL组件显示Access数据库的图片对象

Author: 唐爱平 Date: 1998年 第42期 13版

  Access数据库支持OLE对象字段,其中最常用的是BMP对象,即图片对象。图片对象的加入使Access数据库的可用性得到大大提高,它使数据库不仅仅局限于传统意义上的数据(即数值与字符),提高了信息的质量,并更接近于人们日常生活中的媒体。例如,要作产品介绍,需要保存该产品的图片。图片往往具有比文字更大的说服力。
  然而,直接采用VB等开发工具将Access数据库中的图片对象取出来显示到屏幕上并实现打印输出并不容易。这儿介绍一个简单方法,只用几行代码即可将图片对象显示到屏幕上,并支持图片的缩放,高质量的打印输出。这需要借助CELL组件。
  下面举一个在VB中使用CELL组件显示Access数据库中的图片对象的例子。创建一个Form之后,将CELL ActiveX Control module选中,就把CELL组件添加入控件栏中了,将CELL组件加入Form,在Form的Load过程中加入以下代码∶
  Private Sub Form_Load()
  Cell1.DoOpenFileDbase 0,″e:\tmp\sample.mdb″,tables
  Cell1.DoDumpDbaseData ″Select * from employees″,0,0,0,1,cols,rows
  End Sub
  e:\tmp\sample.mdb是一个含有图片的Access数据库,运行程序就可将其中的图片显示到表格中并打印出来(如^421303a^)。根据SELECT语句的灵活性,你可以将指定的图片显示到表格的任意位置之上。采用CELL组件还有一个好处就是CELL组件强大的打印功能,CELL组件对图片进行无级缩放,使打印出来的图片不失真。
  CELL组件试用版可在站点www.trustsoft.com免费下载。
    #3(编者注:CELL组件3.1+完全试用版已收录在《PC世界3》上了)