TBlob类型的数据在Delphi中如何录入？

Question

我看到树上有写的是用TBlob的LoadFromFile属性，可是我的Tblob是在Table中，我用Table.FieldbyName('xxx').LoadFromFile();却说不存在该方法，请问该怎么办？

Answer 1

TBlobField(Table.FieldbyName('xxx')).LoadFromFile();

Answer 2

TBlobField(Table.FieldbyName('xxx')).LoadFromFile();

Answer 3

LoadFromFile是一种方法，也可以用LoadFromStream
例：
var
  MS: TMemoryStream;
begin
  //如果不在修改或增加状态，改变状态
  if not (table1.State in [dsInsert, dsEdit]) then
    table1.Insert;
  MS := TMemoryStream.Create();
  try
    Image1.Picture.Bitmap.SaveToStream(MS);
    TBlobField(Table.FieldbyName('xxx')).LoadFromStream(MS);
  finally
    MS.Free;
  end;
  Table1.Post; //提交数据
end;