Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.10;
Скачать: CL | DM;

Вниз

Вставка картинки в BLOB   Найти похожие ветки 

 
makvell   (2006-06-24 02:22) [0]

Доброго времени суток!
Вопрос такой: Как вставить запись запросом (insert into...), если одно из полей BLOB, а всавить в него нужно картинку (*.jpg)?
Заранее спасибо.


 
ЮЮ ©   (2006-06-24 05:49) [1]

Имно, как всегда
Insert Into MyTable(field1, ..., BlobField, ...) Values(:field1, ..., :BlobField, ...)

А дальше как в Helpe:

TParam.AsBlob

Specifies the value of the parameter when it represents a binary large object (BLOB) field.

type TBlobData = String;
property AsBlob: TBlobData;

Description

Set AsBlob to assign the value for a Blob field to the parameter. AsBlob takes a TBlobData value, which is an untyped string of bytes. Setting AsBlob sets the DataType property to ftBlob.

For example, if the variable Buffer is of type PChar and contains binary data read from a file, the contents of Buffer are directly assigned to the BLOB parameter using the AsBlob property:

Query1.Params[0].AsBlob := Buffer;

Note: Applications seldom need to read AsBlob because Blob fields can’t be used as output parameters.


 
Desdechado ©   (2006-06-24 15:35) [2]

типовой развнедельный пример
Query1.Sql.Text :=
  "INSERT INTO testblob " +
  " ( " +
  "  fBlob" +
  " )" +
  " VALUES" +
  " (" +
  " :ParamBlobField" +
  ")";
Query1.ParamByName("ParamBlobField").DataType := ftBlob;
Query1.ParamByName("ParamBlobField").ParamType := ptInput;
Query1.ParamByName("ParamBlobField").LoadFromFile("MyFile",ftBlob);
Query1.ExecSql;


 
makvell   (2006-06-24 21:06) [3]

Спасибо!


 
0bsid ©   (2006-06-28 13:52) [4]

а как для ADO ?


 
Desdechado ©   (2006-06-28 14:42) [5]

А что не ясно?


 
0bsid ©   (2006-06-29 11:57) [6]

Query       : TADOQuery;
Query не имееет ParamByName
:(


 
ЮЮ ©   (2006-06-29 12:02) [7]

у TADOQuery есть Parameters, которй имеет.


 
0bsid ©   (2006-06-29 12:28) [8]


> у TADOQuery есть Parameters, которй имеет.

спасибо большое!
полегчало :)


 
0bsid ©   (2006-06-29 12:37) [9]

при вставке текста длиной более 8000 знаков вываливается:
"String or binart data would by truncated"
         Ms:=TMemoryStream.Create;
         MessMemo.Lines.SaveToStream(MS);

         Query:=TADOQuery.Create(nil);
         Query.Connection:=ADOConn;
         Query.SQL.Clear;
         Query.SQL.Add(QueryTxt);
         Query.Parameters.ParamByName("MemoText").DataType:=ftMemo;
         Query.Parameters.ParamByName("MemoText").Direction:=pdInput;
         Query.Parameters.paramByName("MemoText").LoadFromStream(MS,ftMemo);
         Query.ExecSQL;
         Query.Close;
         Query.Free;
         Ms.Free;

если использовать ftBlob, то ошибка: Operand type clash: image is incompatible with varchar :(


 
Desdechado ©   (2006-06-29 12:45) [10]

какой тип поля в БД?


 
ЮЮ ©   (2006-06-29 12:46) [11]

а если просто (без потоков и  DataType-ов)
Query.Parameters.ParamByName("MemoText").Value := MessMemo.Lines.Text


 
0bsid ©   (2006-06-29 14:24) [12]


> какой тип поля в БД?

тип поля - text . БД - MSSQL2000


 
0bsid ©   (2006-06-29 14:29) [13]


> а если просто (без потоков и  DataType-ов)
> Query.Parameters.ParamByName("MemoText").Value := MessMemo.
> Lines.Text

всё равно ругается если более 8000 символов :(


 
Виталий Панасенко   (2006-06-29 15:35) [14]

По-моему, это есть максимальная длинна для данного типа поля. вот тебя и посылают


 
Кщд ©   (2006-06-30 12:41) [15]

Storage size of text also depends on the length of the data entered, but can store up to 231-1 (2,147,483,647) bytes.


 
Кщд ©   (2006-06-30 12:43) [16]


> Кщд ©   (30.06.06 12:41) [15]

поправочка - конечно же power(2, 31) :)



Страницы: 1 вся ветка

Текущий архив: 2006.09.10;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.035 c
2-1155756022
ronyn
2006-08-16 23:20
2006.09.10
В результате чего возникают ошибки типа хххххххх уууууу?


1-1154061576
Константин_
2006-07-28 08:39
2006.09.10
Можно ли запретить перерисовку формы до определенного момента?


15-1155795515
cyborg
2006-08-17 10:18
2006.09.10
Игровые контролёры


8-1138372576
AlexXXX
2006-01-27 17:36
2006.09.10
Сравнить два изображения


3-1151502224
antoxa2005
2006-06-28 17:43
2006.09.10
Вопросик. Сколько клиентов можно подк MS SQL 2005 Server Express