Delphi - guardar una imagen en un campo blob(binary)

he olvidado como ya lo hecho pero no recuerdo el codigo.
tengo un opendialog, un image , un boton de comando EXAMINAR que tiene lo siguiente:
if opendialog1.execute then
begin
image1.(aqui me marca error):=opendialog1.filename
luego guardo almaceno la imagen en un campo pero no recuerdo como
end;

si alguien me puede hechar la mano

GRACIAS