Save BLOB using BdpCommand

Thread View: borland.public.delphi.database.bdp

3 messages

[T] Back to Threads [V] Tree View [G] Group Articles

3 total messages Started by Ken Engels Henriksen Thu, 02 Nov 2006 15:06

#139

Author: Ken Engels Henriksen
Date: Thu, 02 Nov 2006 15:06

25 lines
1213 bytes

I try to save a string in a blob field (interbase). How do I transfer a array of byte to a parameter ?

Var
    b: array of Byte;
    text : string;

..
..
        SetLength(b, text.length);
        for i := 1 to Length(b) do
          b[i-1] := Ord(text[i]);

        c.Parameters.Add('NOTE', DbType.Binary);
        c.Parameters[0].Value := b;

        c.ExecuteNonQuery;


Any examples is appreciated. 

Thanks

Ken Engels Henriksen
ken@dbmail.dk

Re: Save BLOB using BdpCommand

#140

Author: Robin
Date: Thu, 02 Nov 2006 21:40

50 lines
2066 bytes

Ken Engels Henriksen wrote:
> I try to save a string in a blob field (interbase). How do I transfer a array of byte to a parameter ?
> 
> Var
>     b: array of Byte;
>     text : string;
> 
> ..
> ..
>         SetLength(b, text.length);
>         for i := 1 to Length(b) do
>           b[i-1] := Ord(text[i]);
> 
>         c.Parameters.Add('NOTE', DbType.Binary);
>         c.Parameters[0].Value := b;
> 
>         c.ExecuteNonQuery;
> 
> 
> Any examples is appreciated. 
> 
> Thanks
> 
> Ken Engels Henriksen
> ken@dbmail.dk
> 

Hi Ken,

I don't think I have ever /saved/ a blob using BDP, but I display them 
often enough.

To do it, I use code like the following.  It may be reversable into 
saving but I honestly haven't tried it.

Step 1.  Declare a type:

type
   TArrayOfChar = Array Of Char;

Step 2.  Use it to cast the field.

Convert.ToString(TArrayOfChar(MyDataSet.Tables['MyTable'].Rows[IndexOfRow].Item[IndexOfBlob]));

*Note:* This example is for Char blobs, but it also works for Byte blobs.

-- 
Robin.

Re: Save BLOB using BdpCommand

#141

Author: Nevena Komarova
Date: Tue, 07 Nov 2006 04:18

34 lines
1599 bytes

set bdptype to Blob

c.Parameters.Add('NOTE', BdpType.Blob);
c.Parameters[0].Value := b;



Ken Engels Henriksen wrote:
> I try to save a string in a blob field (interbase). How do I transfer a array of byte to a parameter ?
> 
> Var
>     b: array of Byte;
>     text : string;
> 
> ..
> ..
>         SetLength(b, text.length);
>         for i := 1 to Length(b) do
>           b[i-1] := Ord(text[i]);
> 
>         c.Parameters.Add('NOTE', DbType.Binary);
>         c.Parameters[0].Value := b;
> 
>         c.ExecuteNonQuery;
> 
> 
> Any examples is appreciated. 
> 
> Thanks
> 
> Ken Engels Henriksen
> ken@dbmail.dk
>

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads