SoloCodigo

TJPEGImage *jp = new TJPEGImage();
TMemoryStream *cadena;
jp->LoadFromFile("c:\\francisco.jpg");
TMemoryStream* pms = new TMemoryStream();
jp->SaveToStream(pms);
pms->Position =0;
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("select * from imagenes");
ADOQuery1->Open();
ADOQuery1->Append();
TBlobField *Field = (TBlobField*)ADOQuery1->FieldByName("imagen");
Field->LoadFromStream(pms);
ADOQuery1->Post();


tengo este codigo para guardar imagenes jpeg en mi base de datos pero me da
un error que dice "INVALID CLASS TYPECAST". a que se debe.

que tengo malo en el codigo.

si alguien sabe o tiene algo hecho de lo que necesito por favor ayuda, que en el foro no hay ninguna respuesta a lo que necesito.

gracias