Buscar por:

Armazenando em um blob

Código

{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.}