Главная страница
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.009 c
1-48147
Малограмотный
2002-08-01 13:52
2002.08.15
Вопрос чайника


4-48353
anod
2002-06-09 14:19
2002.08.15
TrackBar


3-47916
DAO
2002-07-28 17:34
2002.08.15
Как NULL поменять на 0 в SQL?


14-48317
goliaph
2002-07-22 19:52
2002.08.15
Кто знает где можна найти список функций API с коротким описанием


1-48041
Are you want a tea?
2002-08-03 20:23
2002.08.15
TStrings и ему подобные