armazenado num Blop

Os campos do Tipo TBlobField, tem metodos que permitem que sejam armazenados dados contidos em arquivos, ou em um Stream...

No primeiro caso (dos arquivos), o codigo seria algo como:

TBlobField(SuaTabela.FieldByName('SeuCampo')).LoadFromFile('NomedoArquivo');
No segundo caso, poderia ser feito um exemplo com o TRichEdit:

var
Stream : TMemoryStream;
begin
  Stream := TMemoryStream.Create;
  try
  RichEdit1.Lines.SaveToStream(Stream);
  Stream.Seek(0,soFromBeginning);
  TBlobField(SuaTabela.FieldByName('SeuCampo')).LoadFromStream(Stream);
  finally
  Stream.Free;
end;
end;
Ambos os exemplos, assumem que a tabela ja' estaria em modo de Edicao ou de Insercao.


    

Autor : desconhecido

Voltar