delphi中如何将TCANVAS上的内容转化为一幅图象

DELPHI上的很多控件都有一个画布，不知怎样才能将其转化为位图呢？最好是双色的和彩色的两种.比方说，我想把标签上的内容存成位图，应该怎么做？ 用一个TIMAGE控件，用BITBLT() API函数把那个CANVAS的图象COPY到这个TIMAGE控件上，然后再用TIMAGE.PICTURE的savetofile方法应该可以吧!
　
先声明一个TBitmap,然后使用控件Canvas.copy到声明的TBitmap上，再使用TBitmap的PICTURE属性的SaveToFile方法保存到磁盘上。