Вниз
Скачать: CL | DM;

DBGridEh и отображение содержимого BLOB поля   Найти похожие ветки 

← →
ixen   (2011-05-13 10:52) [0]

Здравствуйте! СУБД Firebird. Отображение данных DBGridEh. Таблица с полем BLOB хранящая в себе изображения JPG. Отобразить эти изображения на форме через Image проблем не вызывало. Может ли DBGridEh без обработки OnDrawColumnCell отображать эти изображение в соответствующей колонке?


← →
OW ©   (2011-05-13 11:23) [1]

Columns.ImageList


← →
OW ©   (2011-05-13 11:27) [2]

или не понимаю чего хочешь :)


← →
ixen   (2011-05-13 11:30) [3]

нет... это не то... изображения хранятся не в ImageList, а в поле таблицы... вот эти изображения и хотелось бы вывести в ячейку грида.


← →
ixen   (2011-05-13 11:32) [4]

вобщем я передумал так делать... картинки весят много, и грид будет тормозить... сделаю по другом.. всем спасибо..


← →
Anatoly Podgoretsky ©   (2011-05-13 14:26) [5]

Ага размером 2584*1560, ну а вторую причину ты сам указал.


← →
ixen   (2011-05-20 10:10) [6]

Все таки я сделал отображение картинок в гриде, содержащиеся в BLOB поле. При этом грид не тормозит как предполагалось, хотя фотографии грузил достаточно тяжелые с большим разрешением. Код оказался достаточно простым. Вот мое решение:

uses JPeg;
var pic:Tgraphic;

procedure TFfotos.FormCreate(Sender: TObject);
begin
   pic:=Tjpegimage.Create;
   TJPEGImage(pic).Scale:=jsEighth;// уменьшаем картинку в 8 раз
   TJPEGImage(pic).Performance:=jpBestSpeed; // уменьшаем цветопередачу и увеличиваем скорость отрисовки
end;

procedure TFfotos.FormClose(Sender: TObject; var Action: TCloseAction);
begin
     pic.Free;
end;

procedure TFfotos.fotos_grdDrawColumnCell(Sender: TObject;const Rect: TRect; DataCol: Integer; Column: TColumnEh;  State: TGridDrawState);
var Field: TBlobField;
begin
   field:=TDBGridEh(sender).DataSource.DataSet.FieldByName("foto") as TBlobField;
   pic.Assign(Field);
   TJPEGImage(Pic).DIBNeeded; // оптимизируем перед отрисовкой
   TDBGridEh(sender).Canvas.Draw(Rect.Left,Rect.Top,pic); // рисуем в гриде
end;

Использовал DBGridEh, если включить поддержку изменения высоты строк, то вообще красота получается. Пользователь сам может выбрать высоту строки чтобы помещалась вся фотография.


← →
Плохиш ©   (2011-05-20 11:31) [7]


> ixen   (20.05.11 10:10) [6]
>
> Все таки я сделал отображение картинок в гриде, содержащиеся
> в BLOB поле.

Молодец.

PS. Сделай pic полем формы и объяви с типом Tjpegimage.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.004 c
15-1304428633
istok
2011-05-03 17:17
2011.09.04
delphi and mac...


1-1265789474
bilov
2010-02-10 11:11
2011.09.04
Приложение к среде Delphi - закладки


2-1305899107
Leon-Z
2011-05-20 17:45
2011.09.04
ADOTable.LoadFromFile(...)


8-1216362230
Azat
2008-07-18 10:23
2011.09.04
максимально быстро считать цвет пикселя с экрана


2-1305751066
vasja123
2011-05-19 00:37
2011.09.04
Ассоциация с типом файлов




   Наверх