在delphi中如何实现添加图片的功能？

1、Delphi在运行时插入本地电脑中的图片：

Image1.picture.loadfromfile('图片文件名')

即可将指定的图片文件显示在Image控件中。（注：如果是JPG格式图片，则需要添加JPEG单元引用： uses jpeg）

2、图片存数sql2000数据库中：

数据库中的图片字段（如：Photo）类型应该为：Image

下面代码可将图片存入Photo字段

ADOQuery1.edit

TBlobField(ADOQuery1.FieldByName['Photo']).LoadFromFile('图片文件名')

ADOQuery1.post

-------------------------------------------

最后，建议：图片不要存放在字段中，而是集中放在某个文件夹内，并规定每个图片文件的文件名为“员工编号.jpg”，这样可根据“员工编号”来读取图片显示，速度要比从数据库中读取快得多；

1、新建一个项目，点击设置，选择BackGround属性。

2、在窗体添加Image1，即可添加delphistringgrid图片。图片是指由图形、图像等构成的平面媒体。

---