使用delphi11编写一个基于xls作为数据库的照片展示程序

1、创建xls文档可以参考前一篇博客，并使用wps将文档保存为2003格式xls后缀。

2、在form上面放置adoconnection、adotable、datasource、spinedit、timer、checkbox、image、4个button组件。

image的设置：

  Image1.Align := alClient;
  Image1.Center := True;
 

编写代码：

1、 在unit中use Vcl.Imaging.PngImage单元。

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
  System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Data.DB,
  Data.Win.ADODB, Vcl.StdCtrls, Vcl.Grids, Vcl.DBGrids, Vcl.ExtCtrls,Vcl.Imaging.PngImage;

2、在1button的onclick事件中。