如是D7:
ext := uppercase(ExtractFileExt( ‘图片路径 ’));
if (ext = '.BMP') then
DBimage1.picture.loadfromfile( ‘图片路径 ’ )
else if (ext = '.JPG') then
begin
Image1.picture.LoadFromFile( ‘图片路径 ’ );
if Image1.picture <> NIL then
begin
Image1.picture.SaveToClipboardFormat(AFormat, AData,APalette);
DBImage1.Picture.LoadFromClipboardFormat(AFormat, AData,APalette);
end;
end;
或者
http://218.56.11.178:8020/web/index.aspx