io ho provato questo:

codice:
var
  cod,i:integer;
  nome:String;
  bmp: TBitmap;
  buffer:TStream;
begin
    //crea l'immagine dall componente di disegno
    bmp:=TBitmap.create;
    getBmp(foto,Bmp);
    buffer := TMemoryStream.Create;
    bmp.SaveToStream(buffer);
    //inserisce la sagoma nell'archivio
    qry.SQL.Text:='INSERT INTO tabella VALUES(:cod,:nome,:tipo,:imm)';
    qry.ParamByName('cod').asInteger:=cod;
    qry.ParamByName('nome').asString:=nome;
    qry.ParamByName('tipo').asInteger:=e_tipo.ItemIndex;
    qry.ParamByName('imm').LoadFromStream(buffer,ftBlob);
    qry.ExecSQL;
    qry.close;
    buffer.free;

end;
dove cod e nome sono stati precedentemente impostati ed e_tipo è un TListBox..

Il problema ora sta che qualsiasi cosa metto al posto di ftBlob(o se lascio ftBlob) mi da sempre lo stesso errore Invalid Conversion...perchè?

qualcuno sa darmi un esempio usando i TBlobField?