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

Картинки формата jpg в Paradox   Найти похожие ветки 

← →
Юра   (2002-10-09 12:02) [0]

Как наилучшим образом организовать хранение в Paradox картинок формата jpg? С bmp все понятно - объявляешь графическое поле, связываешь с ним TDBImage и все происходит само. С jpg, как я понимаю, надо объявлять BLOB поле и дальше работать с ним руками.

---

← →
Lola ©   (2002-10-09 12:26) [1]

И bmp и jpg можно хранить в BLOB поле. Для JPG в uses добавляешь JPEG.
var
Bm: TMemoryStream;
Jp: TJpegImage;
begin
Table1.Edit;
Jp:=TJpegImage.Create;
Jp.Assign(Image1.Picture.Bitmap); //Помещаешь изображение в класс TJpegImage;
Bm:=TMemoryStream.Create;
Jp.SaveToStream(Bm); // Сохраняешь Jpeg в потоке
Bm.Seek(0,0);
Dm.Table1PHOTO.LoadFromStream(Bm); //Загружаешь Jpeg в поле через поток
Bm.Free;
Jp.Free;
Table1.Post;
end;

---

← →
Юра   (2002-10-09 14:54) [2]

Да, это я сделал вот так:
tblPhoto.Insert;
tblPhotoPhoto.LoadFromFile(OpenDialog1.FileName);
tblPhoto.post;
Теперь для того, чтобы вытащить из BLOB в TImage - надо будет создать поток, записать в него содержимое поля, потом из стрима - в TJpegImage, а уж из него - в TImage, верно? А можно короче?

---

← →
Lola ©   (2002-10-09 15:02) [3]

Это самый надежный путь и , по-моему, не очень и длинный :)

---

← →
Юра   (2002-10-09 15:21) [4]

Ну, наверное это уже в потрепаться, но меня как-то не радует, что левой рукой правое ухо... Вместо того, чтобы напрямую переслать - создается поток, туда пишется, сикается, грузится в промежуточный жпег, потом оттуда в картинку... Как-то оно... Гм.
Правда, работает :-)

---

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

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



Память: 0.45 MB
Время: 0.008 c