Artigos Delphi Dicas - Armazenamento de Fotos em Banco de Dados

Armazenamento de fotos em banco de dados

Para armazenar fotos num banco de dados, você deve primeiramente criar um campo do tipo Blob numa tabela (em alguns gerenciadores de banco de dados, como o ACCESS, o campo é do tipo OLE). No formulário onde os dados serão editados, insira um componente TDBImage (este componente irá exibir a foto), um TOpenPictureDialog e um TButton próximo ao componente TDBImage. Coloque na propriedade DataField do componente TDBImage, o nome do campo do tipo Blob que você criou na sua tabela. Digite a rotina a seguir no evento onClick do componente TButton:

if OpenPictureDialog1.Execute then
    DBImage1.Picture.LoadFromFile(OpenPictureDialog1.FileName);