Subject | TBlobfields in TIBOQuery |
---|---|
Author | tremel@tremel-computer.de |
Post date | 2001-03-09T15:29:38Z |
Hi,
I want to Fill a TBitmap from a Blobfield using a TIBOQuery. With a
TIB_Query I could do it well with Field[2].AssignTo(myBitmap). But
with TIBOQuery I get a TField, not a TIB_Column.
When using the conventional Methods like
function GetBitmapfromBlobField(fld: TBlobField): TBitmap;
var
BlobStream: TBlobStream;
begin
BlobStream := TBlobStream.Create(fld, bmRead);
with BlobStream do
try
Seek(0, soFromBeginning); {Seek to the Begginning of the stream}
Result := TBitmap.Create;
Result.LoadFromStream(Blobstream);
finally
Free;
end;
end;
TBlobStream.Create shows an Error 'wrong Field Type'
Any Idea?
Thanks Dieter Tremel
I want to Fill a TBitmap from a Blobfield using a TIBOQuery. With a
TIB_Query I could do it well with Field[2].AssignTo(myBitmap). But
with TIBOQuery I get a TField, not a TIB_Column.
When using the conventional Methods like
function GetBitmapfromBlobField(fld: TBlobField): TBitmap;
var
BlobStream: TBlobStream;
begin
BlobStream := TBlobStream.Create(fld, bmRead);
with BlobStream do
try
Seek(0, soFromBeginning); {Seek to the Begginning of the stream}
Result := TBitmap.Create;
Result.LoadFromStream(Blobstream);
finally
Free;
end;
end;
TBlobStream.Create shows an Error 'wrong Field Type'
Any Idea?
Thanks Dieter Tremel