🚀 go-pugleaf

It seems that easest way for you is to use native ADO objects. In IDE menu
select "Project\Import type library" and import
"Microsoft ActiveX Data Objects 2.X Library". You will have classes to work
with ADO.

The code for BCB ADO objects is:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 ADOConnection1->ConnectionString = WideString("Provider=SQLOLEDB;"
  "Integrated Security=SSPI;Initial Catalog=XXX;");
 ADOConnection1->Connected = true;

 ADOCommand1->Connection = ADOConnection1;
 ADOCommand1->CommandText = WideString("INSERT INTO ImageTest (ImgColumn)
VALUES (?)");

 ADOCommand1->Parameters->Refresh();

ADOCommand1->Parameters->Items[0]->LoadFromFile(ExtractFilePath(ParamStr(0))
+ "img.jpg", ftBlob);
 ADOCommand1->Execute();
}

//------------------------------------------
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)

"Brad Arant" <barant@barant.com> �������/�������� � �������� ���������:
news:41460f24$1@newsgroups.borland.com...
> I have many examples of using a recordset to store an image into MSSQL
using
> a CRecordset object but I am trying to do this using BCB6.
>
> The question is what is the best way to do this and is there any code
> examples anywhere that can help me? I have done this successfully in VC++
> using the ADO.Stream object but for the life of me I can't figure out the
> details in BCB using the TADO objects.
>
>
>
>
>