Как работать с блоб полями больших размеров (файлы по 600 -700 Мb) втыкаю в базу так :
ADOtmp->Close();
ADOtmp->SQL->Clear();
ADOtmp->SQL->Add("UPDATE doc ");
ADOtmp->SQL->Add(abuf.sprintf("SET num = '%s' ",doc_num.c_str()));
ADOtmp->SQL->Add(abuf.sprintf(", name = '%s' ",Trim(Edit1->Text).c_str()));
ADOtmp->SQL->Add(abuf.sprintf(", id_doc = '%d' ",id_doc));
ADOtmp->SQL->Add(abuf.sprintf(", id_gr = '%d' ",id_doc));
ADOtmp->SQL->Add(abuf.sprintf(", main = %s ",":file"));
ADOtmp->SQL->Add(abuf.sprintf("WHERE (id = %d) ",id_doc));
ADOtmp->Parameters->ParamByName("file")->LoadFromFile(OpenDialog1->FileName,ftBlob);
ADOtmp->ExecSQL();
база MS SQL2000, поле Image, этот кусок нормально отрабатывает при файлах мегов 14 иначе вываливается ошибка на строчке LoadFromFile "Error creeating vaeiant array" иногда что-то другое не смог сейчас повторить. вопрос как это народ делает.

посмотрел но просвятления не наступило

Так вот я примерно так и делаю:
if (OpenDialog1->Execute()) {
Stream= new TFileStream(OpenDialog1->FileName,fmOpenRead);
ADOsend->Close();
ADOsend->SQL->Clear();
ADOsend->SQL->Add("insert into test(name,main)");
ADOsend->SQL->Add("values(:name,:file)");
ADOsend->Parameters->ParamByName("name")->Value=ExtractFileName(OpenDialog1->FileName);
ADOsend->Parameters->ParamByName("file")->LoadFromStream(Stream,ftBlob);
ADOsend->ExecSQL();
Stream->Free();
}
но получаю ошибку Error creating variant array