使用Query DBImages
[code=c/c++]
TStream *myStream;
DBImage1->Picture->Graphic->SaveToStream(&(*myStream));
Query1->ParamByName("img")->LoadFromStream(&(*myStream),ftBlob);
Query1->Post()
[/code]

        String file="D:\\jpg\\aaa.bmp";
        if(FileExists(file))
          {
            ADOQuery1->Insert();

            TADOBlobStream  *tStream;
            TMemoryStream  *temp=new  TMemoryStream();
            Graphics::TBitmap  *pBitmap=new  Graphics::TBitmap();
            pBitmap->LoadFromFile(file);
            pBitmap->SaveToStream(temp);
            ((TBlobField  *)ADOQuery1->FieldByName("picture"))->LoadFromStream(temp);
          }

        String file="D:\\jpg\\aaa.bmp";
        if(FileExists(file))
          {
            ADOQuery1->Insert();

            TADOBlobStream  *tStream;
            TMemoryStream  *temp=new  TMemoryStream();
            Graphics::TBitmap  *pBitmap=new  Graphics::TBitmap();
            pBitmap->LoadFromFile(file);
            pBitmap->SaveToStream(temp);
            ((TBlobField  *)ADOQuery1->FieldByName("picture"))->LoadFromStream(temp);
          }