chamar imagem

Estou usando o código abaixo para chamar uma imagem com um evento on exit
ma não sei onde estou errando

o campo imagem é blob e o banco é firebird


procedure TfrCadCalibracao.DBLookupComboBox2Exit(Sender: TObject);
begin
inherited;
DBImage1.Picture:= dmSever.sqlProcedimento.fieldbyname('SELO').Picture;