🚀 go-pugleaf

Drop TADOCommand to form. Set CommandText to

insert into data (Col1, BlobColumn) values (1, :Blob)

Now when you check Parameters you should see one parameter - Blob. In code 
do:

 ADOCommand1->Parameters->ParamByName(WideString("Blob"))->LoadFromFile("Unit1.cpp",ftBlob); ADOCommand1->Execute();There is also LoadFromStream(). Do not forget to set Stream->Position = 0 orcall Stream->Seek(0, soFromBeginning) before loading from it.//------------------------------------------Regards,Vassiliev V. V.http://www.managed-vcl.com - using .Net objects in Delphi for Win32 +ADO.Nethttp://www.oledbdirect.com - The fastest way to access MS SQL Server,MS Jet (Access) and Interbase (through OLEDB)"James Peterson" <jpeterson@romanmealmilling.com> �������/�������� ��������� ���������: news:425a656e@newsgroups.borland.com...> so I can do the following>> TStream *Blob> =ADODataSet1->CreateBlobStream(ADODataSet1->FieldByName("Notes"),bmWrite);>    try {>        RichEdit8->Lines->SaveToStream(Blob);>    }>    __finally {>        delete Blob;>    }>  comdtext = "insert into data (ItemNumber, UserLog, Date, Time,> SerializedDate, SerializedTime, "+fields;>  comdtext += ",> Notes )values('"+ItemNo+"','"+userID+"','"+dated+"','"+timed+"',> "+SerialDate+", "+SerialTime+", ";>  comdtext += values+"(:Blob))";>  ADOCommand2->CommandType = cmdText;>  ADOCommand2->CommandText = comdtext;>  ADOCommand2->Execute();>>> "Viatcheslav V. Vassiliev" <support@oledbdirect.com> wrote in message> news:42577d85@newsgroups.borland.com...>> Use parameters.>>>> insert into (blobfield) values (:blob)>>>> Then set parameter to anything you need, including stream or string that>> contains quotes or line breaks.>>>> file://------------------------------------------>> 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)>>>> "James Peterson" <jpeterson@romanmealmilling.com> �������/�������� �>> �������� ���������: news:42568316$1@newsgroups.borland.com...>> > is there a way to insert a Stream into an ADOCommand ?>> >>> > Forexample>> > you have a RichText1 and you wanted to save it with formating into the>> > following ADOCommond.>> >>> >  comdtext = "insert into data (ItemNumber, UserLog, Date, Time,>> > SerializedDate, SerializedTime, "+fields;>> >  comdtext +=")values('"+ItemNo+"','"+userID+"','"+dated+"','"+timed+"',>> > "+SerialDate+", "+SerialTime+", ";>> >  comdtext += values+")";>> >  ADOCommand2->CommandType = cmdText;>> >  ADOCommand2->CommandText = comdtext;>> >  ADOCommand2->Execute();>> >>> >>>>>>>