Board index » delphi » how to copy a Tbitmap from a Ttable into a Tlist

how to copy a Tbitmap from a Ttable into a Tlist

I am currently trying to make copies of the bitmap field in my paradox
table into a Tlist but am having trouble with it.  It apparently loads ok
but later when I access the list I can only look at the graphic that the
original TTable cursor is pointing to even though I used assign to copy the
bitmap from the table into the list. Can anyone offer a suggestion?

 

Re:how to copy a Tbitmap from a Ttable into a Tlist


Quote
Brian Walz wrote:
> I am currently trying to make copies of the bitmap field in my paradox
> table into a Tlist but am having trouble with it.  It apparently loads ok
> but later when I access the list I can only look at the graphic that the
> original TTable cursor is pointing to even though I used assign to copy the
> bitmap from the table into the list. Can anyone offer a suggestion?

 var
  List : Tlist;
  Bmp : TBitmap;
begin
  List := TList.Create;
  <in the loop where you read your bitmap records from paradox file>
  Bmp := TBitmap.Create;
  Bmp.Assign(Form1.DBImage1.Picture.Bitmap);
  List.Add(Bmp);
  <go to next record>
--
Wayne Herbert
Manager, Computer Products
Key Maps, Inc.
1411 West Alabama
Houston, TX  77006

Vox:  713.522.7949
Fax:  713.521.3202
Email:  wherb...@keymaps.com

"Government is like an old dog turd.  The more you stir it up, the more it
stinks."

Other Threads