怎样在数据库中进行image类型的操作。请各位高手帮忙!!!!!!(50分)

  • 主题发起人 主题发起人 scorpion
  • 开始时间 开始时间
S

scorpion

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样在数据库中进行image类型的操作。
我用query控件在SQL server数据库中进行添加,删除,更改等操作。
不知image类型在数据库中怎么进行添加,删除,更改等操作。
最好举一例子。多谢了!!!!!
 
哈!手上刚好还有,给你吧!
我个人提倡使用:DBImage1.picture.loadfromfile(文件名)
ex:
(1)使用裁剪板
procedure TForm1.Button1Click(Sender: TObject);
var
C: TClipboard;
begin
C := TClipboard.Create;
try
if Clipboard.HasFormat(CF_BITMAP) then
DBImage1.PasteFromClipboard
else
ShowMessage('Clipboard does not contain a bitmap!');
finally
C.Free;
end;
end;
(2)从文件调入
procedure TForm1.Button2Click(Sender: TObject);
begin
Table1Bitmap.LoadFromFile(
'c:/delphi/images/splash/16color/construc.bmp');
end;
(3)从其他控件的BITMAP类中读入
procedure TForm1.Button3Click(Sender: TObject);
var
B: TBitmap;
begin
B := TBitmap.Create;
try
B.LoadFromFile('c:/delphi/images/splash/16color/athena.bmp');
DBImage1.Picture.Assign(B);
finally
B.Free;
end;
end;
 
这位仁兄回答如此全面,让我无法开口了!!!
但是请注意:SQL SERVER的数据库对图片大小有限制(可能)
使用图片、备注可能引起莫名其妙的问题!!!!强烈建议不要用此两种字段!!!(尽量)
 
songjunjie您认为该怎样呢??
 
数据库中进行image类型的操作 : Tstream asblob
 
agree with hqiang
 
agree with "xixi12359"
 
var myfilestream:tfilestream;
myblob:tblobfield;
myfilestream:=tfilestream.Create(图片路径,fmopenread);
myblob:=tblobfield(adoquery1.FieldByName('Photo'));
myblob.LoadFromStream(myfilestream);
myfilestream.Free;
 
hqiang+terry_lzs就全面了,50分太少了
 
多人接受答案了。
 
后退
顶部