|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
Добавление картинки в MS SQL Server
Доброе утро!
На форме есть компонент FilenameEdit, как только выбрана картинка, она должна отображаться в image1, который также есть на форме. А после по нажатию на кнопку сохраняться в базу данных. Помогите пожалуйста реализовать. |
#2
|
||||
|
||||
Насчёт показа картинки
Код:
Image1.Picture.LoadFromFile(FilenameEdit.Text); Код:
ADOQuery1.Edit; TBLOBField(ADOQuery1.FieldByName('myField')).LoadFromFile(FilenameEdit.Text); ADOQuery1.Post; З.Ы. Оказалось, всё не так уж и просто. Вот про сабжевый вариант, или вот, ещё. А вот с нашего форума Я не понял Вашего вопроса, но всё же Вам на него отвечу! Последний раз редактировалось Alegun, 14.05.2013 в 08:24. |
Этот пользователь сказал Спасибо Alegun за это полезное сообщение: | ||
Ludo (14.05.2013)
|
#3
|
|||
|
|||
Спасибо Вам Большое!!!!!
|
#4
|
|||
|
|||
Я реализую через StoredProc, ошибок не выдает но в таблицу не записывает, подскажите в чем может быть причина?
Код:
DataModule1.StoredProc.Close; DataModule1.StoredProc.ProcedureName:='InsertScan'; DataModule1.StoredProc.Parameters.Clear; DataModule1.StoredProc.Parameters.CreateParameter('nom_scan', ftInteger, pdInput, 10, null); DataModule1.StoredProc.Parameters.ParamValues['nom_scan']:=1; DataModule1.StoredProc.Parameters.CreateParameter('nom_doc', ftInteger, pdInput, 10, null); DataModule1.StoredProc.Parameters.ParamValues['nom_doc']:=1; DataModule1.StoredProc.Parameters.CreateParameter('scan', ftBlob, pdInput, 10, null); DataModule1.StoredProc.Parameters.ParamValues['scan']:=FilenameEdit.Text; //DataModule1.QLogTable.Edit; //TBLOBField(DataModule1.QLogTable.FieldByName('scan')).LoadFromFile(FilenameEdit.Text); //DataModule1.QLogTable.Post; ShowMessage('Картинка удачно сохранена!'); Последний раз редактировалось Admin, 14.05.2013 в 09:20. |
#5
|
||||
|
||||
З.Ы. А что, через запрос QLogTable не добавляет?
Я не понял Вашего вопроса, но всё же Вам на него отвечу! Последний раз редактировалось Alegun, 14.05.2013 в 08:49. |
#6
|
|||
|
|||
Я не знаю как это поле привести в blob DataModule1.StoredProc.Parameters.ParamValues['scan']:=FilenameEdit.Text;
А Вы? |