🚀 go-pugleaf

Thanks for that but I accomplished the task with

ADOQuery1->SQL->Text = "SELECT TOP 1 * FROM Test";
ADOQuery1->Open();
ADOQuery1->Insert();
TBlobField *BlobField = dynamic_cast <TBlobField*>
(ADOQuery1->FieldByName("Image"));
BlobField->LoadFromFile(ImageFile);
ADOQuery1->Post();
ADOQuery1->Close();

-Scott


"Viatcheslav V. Vassiliev" <support@oledbdirect.com> wrote in message
news:40993d7a$1@newsgroups.borland.com...
> Code is not tested but it should look like this:
>
> TFileStream * Blob = new TFileStream(ImageFile, fmOpenRead);
> try
> {
>  ADOQuery1->SQL->Text = "SELECT * FROM ImgQueue";
>  ADOQuery1->Open();
>  ADOQuery1->Inert();
>  ((TBlobField*)ADOQuery1->FieldByName("Image"))->LoadFromStream(Blob);
>  ADOQuery1->Post();
>  ADOQuery1->Close();
> }
> __finally
> {
>  delete Blob;
> }
>
> //------------------------------------------
> Regards,
> Vassiliev V. V.
> http://www.managed-vcl.com - using .Net objects in Delphi for Win32 +
> ADO.Net
> http://www.oledbdirect.com - The fastest way to access MS SQL Server,
> MS Jet (Access) and Interbase (through OLEDB)
>
> "Scott Elgram" <SElgram@verifpoint.com> �������/�������� � ��������
> ���������: news:4092e332$1@newsgroups.borland.com...
> > Hello,
> >     I am in need to stream TIF images into a MS SQL database.  I am
using
> > BCB6 and am more familiar with ADO then any of the other DB components
> > offered.  I know in Delph 7 the code to do this is;
> >
> > -------------Begin Delphi Code---------------
> > Blob := TFileStream.Create(ImageFile, fmOpenRead);
> >   With ADOQuery1 do
> >       begin
> >           SQL.Text := 'SELECT * From ImgQueue';
> >           Open;
> >           Insert;
> >           (FieldByName('Image') AS TBlobField).loadfromStream(Blob);
> >           Post;
> >           Close;
> >       end;
> > --------------End Delphi Code--------------
> >
> > Can anyone tell me how I can accomplished this in C++?
> >
> > thanks,
> > -- 
> > -Scott Elgram
> >
> >
>
>