delphi 将数据库中的图像数据导出excel

显示全部楼层 · 2012-3-25 17:48:12

图像插入EXCEL你应该知道了那我就告诉你怎么从数据库读出图片数据吧，主要是数据流的形式。我贴一部分代码我是DELPHI7+ORACLE,可以成功运行先做点说明,ADOTable_main是TADOTABLE控件，连接上数据库某一个表当移动记录的时候，在Timage中显示对应的图片，以下是在ADOTable_mainAfterScroll事件中写入。procedure TFrm_base_cup_line.ADOTable_mainAfterScroll(DataSet: TDataSet);var jpg:TJPEGImage; myStream:TmemoryStream;beginif (TB...

千问 · 2012-3-25 17:48:12

uses ComObj; procedure TForm1.Button1Click(Sender: TObject); Var FExcel :OleVariant; //excel应用程序 FWorkBook :OleVariant; //工作表 FWorksheet:OleVariant; //工作薄 FPicture:OleV...