У меня возникла трудность при загрузке какого либо файла в BLOB поле MySQL 5.1 пакет компонентов MyDAC
Вот код загрузки файла из BLOB поля и сохранение на жесткий диск клиента
Работает нормально.
Код: Выделить всё
TMemoryStream *M1 = new TMemoryStream();
TStream *B1 = MyTable1->CreateBlobStream(MyTable1->FieldByName("blob"),bmRead);
M1->CopyFrom(B1,B1->Size);
M1->SaveToFile("C:\Image.jpg");
delete B1;
delete M1;
Код: Выделить всё
MyTable1->Edit();
TMemoryStream *M = new TMemoryStream();
M->LoadFromFile("C:\ABOUT.rar");
TStream *B = MyTable1->CreateBlobStream(MyTable1->FieldByName("blob"),bmWrite);
B->CopyFrom(M,M->Size);
delete B;
MyTable1->Post();
delete M;
Код: Выделить всё
TBlobField *Fields;
MyQuery1->Insert();
(MyQuery1->FieldByName("blob"),Fields)->LoadFromFile("C:\Image.jpg");
MyQuery1->Post();
http://www.imageup.ru/img177/bezymyannyjj635947.jpg