Главная страница
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.012 c
1-48158
DeMoN-777
2002-08-01 12:36
2002.08.15
Как обработать событие OnKeyPress у TWebBrowser ?


1-48076
Дмитрий Иванов
2002-08-05 02:04
2002.08.15
проблема с созданием компонет в run-time е


4-48364
greenrul
2002-05-30 17:15
2002.08.15
Смена раскладки на следующую по счету


1-48162
maxim2
2002-08-01 13:13
2002.08.15
Как перевести секунды в формате 34545 в формат 00:00:00


3-47988
Daniil
2002-07-26 16:05
2002.08.15
Как сохранить variant array