Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Image из BLOB поля, как вставить ? 
V
    Опции темы
RA
Дата 25.10.2006, 13:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Брутальный буратина
****


Профиль
Группа: Участник Клуба
Сообщений: 3497
Регистрация: 31.3.2002
Где: Лес

Репутация: нет
Всего: 115



Код



uses axCtrls
    ...
var
OleGraphic: TOleGraphic;
stm : TMemoryStream;
begin
Try
   try
     stm := TMemoryStream.Create;
     OleGraphic := TOleGraphic.Create;
     form3.Query1Image.SaveToStream(stm);
     stm.Position:= 0;
     OleGraphic.LoadFromStream(  stm );
     Image2.Picture.Assign(OleGraphic);
   finally
     Stm.free;
     OleGraphic.Free;
   end;

except
end;

end;



PM   Вверх
Lence
Дата 25.10.2006, 15:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3



RA, 
теперь все заработало !!!!! BMP и JPEG показывает на ура ....!!!! а вот png не показывает - но хоть ошибка не вылетает ... smile



--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
RA
Дата 25.10.2006, 23:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Брутальный буратина
****


Профиль
Группа: Участник Клуба
Сообщений: 3497
Регистрация: 31.3.2002
Где: Лес

Репутация: нет
Всего: 115



Страно что png не показывается, у меня всё прекрасно показывается и png в том числе.
Может ты как-то png не правильно записываешь или читаешь? проверь png отдельно в контроле для отображения png/
PM   Вверх
Lence
Дата 26.10.2006, 18:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Чухарадземадзупэ
*


Профиль
Группа: Участник
Сообщений: 209
Регистрация: 9.5.2006
Где: Ташкент

Репутация: нет
Всего: 3



Цитата(RA @  25.10.2006,  23:12 Найти цитируемый пост)
Страно что png не показывается, у меня всё прекрасно показывается и png в том числе.Может ты как-то png не правильно записываешь или читаешь? проверь png отдельно в контроле для отображения png/


Скорее всего просто у меня нет поддержки png в image, поэтому и не показывает. 

Думаю bmp и jpg в полне хватит. 

RA, Kesh,  Coala
Огромное спасибо !!!! smile 

Это сообщение отредактировал(а) Lence - 26.10.2006, 18:22
--------------------
Шуруп, забитый молотком, крепче сидит чем гвоздь, закрученный отверткой ....  
PM MAIL ICQ Skype   Вверх
Kesh
Дата 26.10.2006, 18:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Эксперт
Сообщений: 2488
Регистрация: 31.7.2002
Где: Германия, Saarbrü cken

Репутация: 3
Всего: 54



Да не за что... smile


--------------------
user posted image
PM MAIL WWW ICQ Skype   Вверх
belousov
Дата 21.11.2006, 22:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 317
Регистрация: 21.11.2006
Где: Москва

Репутация: нет
Всего: 6



Цитата(Kesh @  22.10.2006,  11:36 Найти цитируемый пост)
PNG.Assign((myqryPeopleAdd.FindField('photo') as TBlobField));


Привет всем! Пишу по вашему коду, тока мелнькая проблемка, на TBlobField выводится ошибка "Undeclared identifier: 'TBlobField". Я ещё не очень опыытный в дельфи, поэтому прошу скажите что делать тут.


--------------------
NIHIL VERUM EST LICET OMNIA 
PM MAIL WWW ICQ Skype   Вверх
Kesh
Дата 22.11.2006, 18:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Эксперт
Сообщений: 2488
Регистрация: 31.7.2002
Где: Германия, Saarbrü cken

Репутация: 3
Всего: 54



TBlobField - это не идентификатор, а класс...

Добавь в uses модуля модуль DB... 


--------------------
user posted image
PM MAIL WWW ICQ Skype   Вверх
belousov
Дата 22.11.2006, 21:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 317
Регистрация: 21.11.2006
Где: Москва

Репутация: нет
Всего: 6



Цитата(Kesh @ 22.11.2006,  18:38)
TBlobField - это не идентификатор, а класс...

Добавь в uses модуля модуль DB...

Большое спасибо, заработало)


--------------------
NIHIL VERUM EST LICET OMNIA 
PM MAIL WWW ICQ Skype   Вверх
Kesh
Дата 23.11.2006, 14:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Эксперт
Сообщений: 2488
Регистрация: 31.7.2002
Где: Германия, Saarbrü cken

Репутация: 3
Всего: 54



Всегда пожалуйста... Обращайтесь, если что...


--------------------
user posted image
PM MAIL WWW ICQ Skype   Вверх
belousov
Дата 28.11.2006, 23:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 317
Регистрация: 21.11.2006
Где: Москва

Репутация: нет
Всего: 6



У меня ещё один вопрос, база в аксесе, картинка добавляется. но с таблицей в которую добавляется картинка связаны ещё две, и когда заполняешь все поля, вылезает ошибка и пишет что связанное поле пустое, хотя оно заполнено


--------------------
NIHIL VERUM EST LICET OMNIA 
PM MAIL WWW ICQ Skype   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »


 




[ Время генерации скрипта: 0.0602 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.