| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Проблема с закачкой картинки на сервер

wik ©   (2004-03-10 13:16:00) 

У меня проблема. Никак не могу закачать на MSSQL картинку, когда использую ClientDataset (Midas)
Код на Delphi следующий :

.....
 strm : TStream;
 param : TParam;
begin
 with DM.spExecute do begin   //spExecute :TClientDataSet
   CommandText:='sp_photos';
   Params.Clear;
   param:=Params.CreateParam(ftBlob, '@image', ptInput);
   param.Size:=MaxInt;
   Params.ParamValues['@par']:=0;
   Params.ParamValues['@emp_id']:=2;

   strm:=TMemoryStream.Create;
   Image.Picture.Bitmap.SaveToStream(strm);
   Params.ParamByName('@image').LoadFromStream(strm,ftBlob);

   Execute;
   strm.Free;
....

На сервере :

CREATE TABLE [dbo].[tbEmployeePhotos] (
[Id] [int] IDENTITY (1, 1) NOT NULL ,
[Photo] [image] NULL
)

CREATE PROCEDURE spst_photos
 @image image
as
 insert into tbEmployeePhotos(photo) values(@image)

.....

При выполнении хр. процедуры Delphi выдает ошибку "Operand Type clash : text is incompatible with image"

Может, кто-нибудь знает, почему это происходит, потому что по логике вещей код правильный.

---

wik   (2004-03-10 18:09:00) [1]

Интересно, мне кто-нибудь ответит ?

---

Наверх