BorlandTalk.com

joshua · Guest

Hi all,

Somebody mind giving me some help on how to write to and read from the
Graphic Blob fields in Paradox tables for windows 7.0??
I am trying to make an application that will give the user the choice to
load an image into his/her database; probably via an OpenDialog.
Any ideas and hints please???

thanx all.

Joshua.

bcb · Guest

Hi :-)

A Graphic field makes it very simple, but note that it can only accept
Bmp's. You can use a binary field to hold any type of file you wish.

To view the content of the graphic field just use a TDBImage , to save data
to the graphic field

if (OpenDialog1->Execute())
{
Table1->Edit();
DBImage1->Picture->LoadFromFile(OpenDialog1->FileName);
Table1->Post();
}

or

//you can use this method for a graphic or binary field
if (OpenDialog1->Execute())
{
Table1->Edit();
Table1->FieldByName("Graphic Field
Name")->LoadFromFile(OpenDialog1->FileName);
Table1->Post();
}

If decide to use a binary field to save a jpeg file then use a TImage to
display the image then something like this could work, it's just a sample to
give an idea, doesn't handle errors or check the file format.

#include <Jpeg.hpp>

TMemoryStream *Memory = new TMemoryStream ();
TJPEGImage *Image = new TJPEGImage ();

Table1->FieldByName("Picture Field")->SaveToStream (Memory);
Memory->Seek (0, soFromBeginning);

Image->LoadFromStream (Memory);

if(Memory->Size==0)
Image1->Picture=NULL;

else if(Memory->Size>0)
Image1->Picture->Assign (Image);

delete Memory, Image;

Hope this helps :-)

joshua · Guest

"bcb" <noemail (AT) sorry (DOT) com> wrote