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

Вниз

Картинка в BLOB поле   Найти похожие ветки 

 
Дмитрий757567   (2002-07-25 18:57) [0]

После выполнения этой процедуры поле по прежнему имеет значение NULL. Хотя по загрузки сети явно видно что данные улетают на сервер. В чём дело?


void __fastcall TForm1::Button3Click(TObject *Sender)
{
Query2->Close();
Query2->SQL->Text = "Update PermanentPass set Photo = :photo where Passid = 1" ;
TMemoryStream *ms = new TMemoryStream;
Image1->Picture->Bitmap->SaveToStream(ms);
ms->Position = 0;
Query2->ParamByName("photo")->DataType = ftBlob ;
Query2->ParamByName("photo")->ParamType = ptInput ;
Query2->ParamByName("photo")->SetBlobData(ms->Memory, ms->Size);
Query2->ExecSQL();
delete ms;
}


 
Suntechnic ©   (2002-07-25 19:18) [1]

Сделай лучше так:
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Query2->Close();
Query2->SQL->Text = "Update PermanentPass set Photo = :photo where Passid = 1" ;
TMemoryStream *ms = new TMemoryStream;
Image1->Picture->Bitmap->SaveToStream(ms);
Query2->ParamByName("photo")->LoadFromStream( Stream,ftBlob);
Query2->ExecSQL();
delete ms;
}




 
SuMaga ©   (2002-07-25 21:41) [2]

э как занесло сишника !!!
вообщето вариантов туева туча !!
тока все они на делхи (не обессудьте си не знаю)


 
Дмитрий757567   (2002-07-26 09:55) [3]

>Suntechnic
я так тоже пробовал. Может MSSQL2000 не адекватно себя ведёт?



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
3-47953
KVT2000
2002-07-26 09:30
2002.08.15
Перенос таблиц Paradox в базу на MSSQL сервер


3-47969
kalliopiy
2002-07-26 11:48
2002.08.15
О фильтрах


14-48285
MadMarine
2002-07-21 18:30
2002.08.15
Delphi5 &WinXP


7-48337
Georg
2002-06-03 12:50
2002.08.15
адресное пространство процесса


14-48246
mvg_first
2002-07-18 19:28
2002.08.15
Кто и как использует продукты Rational