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

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

параметры типа битмап [D7, IB6.x]


Страницы:   1 2

dimds ©   (2004-07-27 14:01:00) 

параметический запрос на вставку записи в таблицу, нужно записать фотографию.
можно ли присвоить картинку параметру? пробовал через потоки, загружать из файла, из буфера обмена. ничего не получается. уже даже мыслей нету.


stud   (2004-07-27 17:23:00) [1]

заработало!!!


stud   (2004-07-27 17:14:00) [2]

ошибка при попытке выполнить запрос


Соловьев   (2004-07-27 17:07:00) [3]


> ibx - 7.08 к ним есть патч?


> http://www.ibase.ru/v6/ibx708del.zip

тогда не надо :)


Соловьев   (2004-07-27 17:06:00) [4]

http://www.ibase.ru/v6/ibx708del.zip


dimds   (2004-07-27 16:53:00) [5]

facefoto - это timage
ibx - 7.08 к ним есть патч?


Соловьев   (2004-07-27 16:51:00) [6]


> ibx.

а патч стоит под них? может баг?


Johnmen   (2004-07-27 16:50:00) [7]

На какой строке AV ?
Что такое facefoto ?


dimds   (2004-07-27 16:39:00) [8]

чмтал и делал так - результат аксес виалешн
я уже не знаю что еще попробовать и что делать?!)))


Johnmen   (2004-07-27 16:32:00) [9]

ms := TMemoryStream.Create;
facefoto.Picture.Bitmap.SaveToStream(ms);
ParamByName('docphoto').DataType := ftBlob;
ParamByName('docphoto').LoadFromStream(ms,ftBLOB);


Вместо последних 3 строк.
И не забудь убить поток. И почитай про них...:)


dimds   (2004-07-27 16:18:00) [10]

ibx.

.SQL.Text:='insert into person (id,fname,mname,lname,birthdate,document,docnumber,docser,docsource,docphoto,guesttype) '+
                       ' values (gen_id(gen_person_id,1),:fname,:mname,:lname,:birthdate,:document,:docnumber,:docser,:docsource,:docphoto,:guesttype)';
 data.toolsq.ParamByName('fname').AsString:=fname.Text;
 data.toolsq.ParamByName('mname').AsString:=mname.Text;
 data.toolsq.ParamByName('lname').AsString:=lname.Text;
 data.toolsq.ParamByName('birthdate').AsDate:=db.Date;
 data.toolsq.ParamByName('document').AsInteger:=document.LookupKeyValue;
 data.toolsq.ParamByName('docnumber').AsString:=docnumber.Text;
 data.toolsq.ParamByName('docser').AsString:=docser.Text;
 data.toolsq.ParamByName('docsource').AsString:=docsource.Text;
 facefoto.Picture.Bitmap.SaveToFile('c:\temp\foto1.bmp');
 data.toolsq.ParamByName('docphoto').DataType:=ftGraphic;
 data.toolsq.ParamByName('docphoto').LoadFromFile('c:\temp\foto1.bmp',ftGraphic);


Johnmen   (2004-07-27 16:16:00) [11]

Текст запроса ? Компоненты доступа ?


dimds   (2004-07-27 16:08:00) [12]


> data.toolsq.ParamByName('docphoto').Assign(facefoto.Picture.Bitmap);

пробовал и так. ошибка - аксес виалешн...


Соловьев   (2004-07-27 16:06:00) [13]


> data.toolsq.ParamByName('docphoto').

data.toolsq.ParamByName('docphoto').Assign(facefoto.Picture.Bitmap);


dimds   (2004-07-27 16:01:00) [14]

facefoto.Picture.Bitmap.SaveToFile('c:\temp\foto1.bmp');
 data.toolsq.ParamByName('docphoto').DataType:=ftGraphic;
 data.toolsq.ParamByName('docphoto').LoadFromFile('c:\temp\foto1.bmp',ftGraphic );

ошибка ..... unsupported feature..


Johnmen   (2004-07-27 15:51:00) [15]

Код в студию.


Sandman25   (2004-07-27 14:43:00) [16]

+ попробуйте AsBlob


dimds   (2004-07-27 14:43:00) [17]


> BLOBfield.LoadFromFile();

вылезает ошибка либо аксес виалешн, либо фьючерс нот супортед


MORA   (2004-07-27 14:40:00) [18]

ааа.
дык через БЛОБ-поля должно получиться.
типа BLOBfield.LoadFromFile();


dimds   (2004-07-27 14:39:00) [19]

еще нет


Sandman25   (2004-07-27 14:38:00) [20]

SetBlobData пробовали?


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо