如何通过TIMAGE或TDBIMAGE将图片存入到数据库picture字段里?

Question

如题!

Answer 1

先保存成文件：
  Image1.Picture.SaveToFile('d:\test.bmp');
再写到数据库中：
  with Query1 do begin
    Close;
    Sql.Clear;
    Sql.Add('Insert into TableName (Picture)');
    Sql.Add('Values(:P_Picture)');
    ParamByName('P_Picture').LoadFromFile('d:\z.bmp');
    ExecSql;
    Close;
  end;

Answer 2

table1.Fields[3].Assign(image1.Picture);

Answer 3

用ado连接数据库
adotable1.(FieldByName('picture') as TBlobField).LoadFromFile(FileName);
filename为图片存储路径,可从opendialog控件中获得!