急！如何将DBImage中的图片(.bmp)读到一个OleVariant类型变量中？

Question

  procedure TForm1.Button2Click(Sender: TObject);
  var
    B: TBitmap; //OleVariant is OK
  begin
    B := TBitmap.Create;
    try
      B.Assign(Table1Bitmap);
      Image1.Picture.Bitmap.Assign(B);
    finally
      B.Free;
    end;
  end;

Answer 1

Table1Bitmap是一个什么？table?bitmap?
请说的详细些，谢谢！

Answer 2

上面的程序是从一个数据表中的DBImage字段组件即Table1Bitmap中将图象读入到变量B中，同时显示在另一个Image1组件中。
　sorry,如果将变量B改为Variant型变量似乎不行。