Hallo,

I use Firebird with BDE.
In my program I want to save a TBlobField which is working. But if
the
file will be bigger than 20k it will take some minutes if the
post-call
will return.

In BDE I use BLOB SIZE = 4000
BLOBS TO CACKE = 4000

The code looks like:

meinVTDataModule.LZA_VERSION.Filter := 'lzanr = ' +
IntToStr(lza.m_id)
+ ' and new_version = ' + versionNr + ' and new_status = ''' +
status +
'''';
meinVTDataModule.LZA_VERSION.Filtered := TRUE;
meinVTDataModule.LZA_VERSION.Open();
meinVTDataModule.LZA_VERSION.Edit();

TBlobField(meinVTDataModule.LZA_VERSION.FieldByNam
e('ZIP_BLOB')).LoadFromFile(archivDir
+ '.zip');

// the next line ist very slow
meinVTDataModule.LZA_VERSION.Post();

meinVTDataModule.LZA_VERSION.Close();
Is there a way to make the Post faster?
Werner Hofmann