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

Вниз

Вставка BLOB поля в таблицу MySQL   Найти похожие ветки 

 
WolandUSSR   (2004-12-20 08:47) [0]

Нужно вставить BLOB поле в таблицу MYSQL. Использую dbExpress. Вот код:

var BStream:TSQLBlobStream;
   BField:TBlobField;
begin
DataSet.Close;
BField:=TBlobField.Create(Owner);
BField.SetFieldType(ftBlob);
BField.FieldName:="Data";
BField.DataSet:=DataSet;

WorkQuery.SQL.Clear;
WorkQuery.SQL.Add("INSERT INTO tdata (ID,Data) VALUES(1,NULL)");
WorkQuery.ExecSQL;

DataSet.Close;
DataSet.CommandText:="SELECT data FROM tData where ID=1";
DataSet.Open;
BStream:=TSQLBlobStream.Create(DataSet.FieldByName("Data") as TBlobField,bmRead);
DataSet.Edit; <<-- здесь ошибка
OLEContainer.SaveToStream(BStream);
BField.Index:=DataSet.FieldCount;
BField.LoadFromStream(BStream);
DataSet.Post;
end;


Выдает ошибку: Data Set Read only.
В хелпе по этому поводу написано: "There is no built-in editing support: you can only edit the data in an SQL dataset by explicitly creating an SQL UPDATE command or by connecting the dataset to a client dataset using a provider."

Что значит "client dataset using a provider"?
Как с этим вообще бороться?

Решпект.


 
Nikolay M. ©   (2004-12-20 09:50) [1]


> Что значит "client dataset using a provider"?
> Как с этим вообще бороться?

Очевидно, написано, что если ты хочешь делать

DataSet.Edit;
...
DataSet.Post;

то к твоему датасету нужно подцепить DataSetProvider, a к нему - ClientDataSet и работать с данными уже через ClientDataSet. Собственно, такая связка CDS-DSP сводит редактирование полей к генерации провайдером запросов INSERT/UPDATE/DELETE.
А лучше, имхо, взять Zeos library и не мучиться.



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

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

Наверх




Память: 0.47 MB
Время: 0.034 c
4-1102088968
amsdev
2004-12-03 18:49
2005.01.23
Вопрос про CriticalSection


4-1101956312
Maep
2004-12-02 05:58
2005.01.23
Хранение файлов в ресурсах, как? (C++ Builder)


9-1097059695
Viman
2004-10-06 14:48
2005.01.23
Header-файлы DirectX 9 для Delphi


14-1104906582
syte_ser78
2005-01-05 09:29
2005.01.23
емейлы харьковских компьютерных фирм


1-1104846602
Viktop
2005-01-04 16:50
2005.01.23
Рисунок в TStringGrid